quiero remmplazar una " con asp usando Replace()

[CARSMEXICO]

quiero reemplazar todas las " para usar xml tengo esta funcion que me
funciona muy bien hasta que llego al " espero ayuda gracias

<%
Function Txml(strInput)
strInput=Replace(strInput, "&", "&amp;")
strInput=Replace(strInput, "<", "&lt;")
strInput=Replace(strInput, ">", "&gt;")
strInput=Replace(strInput, "'", "&apos;")
strInput=Replace(strInput, """, "&apos;")
Txml = strInput
End Function
%>

[wey...@gmail.com]

Mira,
podrias poner en vez de """ solo el ASCII del Caracter " q si no me
equivoco es 34
, o Chr(34)

espero te haya ayudado;

Rleon

[wey...@gmail.com]

Otra cosa que podrias hacer es poner:

strInput=Replace(strInput, """", "&apos;")

con 4 "

asi funciona tmb

Rleon