caracteres acentuados y ñ con AJAX

Hola. Te paso la solución que encontré en un foro. A mi al menos me
funcionó.


Solo teneis que poner esto en el ASP donde esta la función para cargar al
XML:
<script language="vbscript" runat="server">
'Función para llamar a un XML desde ASP
Function bts(data)
dim sOut
'Convertimos datos binarios a string
sOut = ""
For i = 0 to UBound(data)
sOut = sOut & chrw(ascw(chr(ascb(midb(data,i+1,1)))))
Next
bts=sOut
End Function
</script>

Y ahora llamamos al XML, aplicando la función anterior:

<%
dim conn,htmltext
url="http:www.urldelxml.com"
set conn = Server.CreateObject("Msxml2.XMLHTTP.3.0")
conn.Open "get", url, false
conn.Send()
htmltext=bts(conn.responseBody) 'Aplico la función de convertir los datos
binarios a string
Response.Write(htmltext)
%>

SALUDOS


"Piolin Net" wrote in message
news:

Hola!

He buscado y he hecho pruebas hasta la saciedad y no consigo que el texto
enviado x post con ajax se guarde correctamente.

Los acentos y ñ se guardan con caracteres extraños (à¡ é à­ ó .)

El texto lo recoge una pag. ASP clasic.

Lo curioso es que cada vez que guardo esa página ASP, la 1ª vez almacena

el

texto OK pero después lo hace mal.

Alguien ha tratado con este problema?

Slt.

Gracias.

pero creo que no es lo que busco.

yo necesito recoger los datos enviados desde el cliente con ajax y
guardarlos en una tabla con los caracteres correctos, sin simbolos raros.

"Jaime Lucci" wrote:

Hola. Te paso la solución que encontré en un foro. A mi al menos me
funcionó.


Solo teneis que poner esto en el ASP donde esta la función para cargar al
XML:
<script language="vbscript" runat="server">
'Función para llamar a un XML desde ASP
Function bts(data)
dim sOut
'Convertimos datos binarios a string
sOut = ""
For i = 0 to UBound(data)
sOut = sOut & chrw(ascw(chr(ascb(midb(data,i+1,1)))))
Next
bts=sOut
End Function
</script>

Y ahora llamamos al XML, aplicando la función anterior:

<%
dim conn,htmltext
url="http:www.urldelxml.com"
set conn = Server.CreateObject("Msxml2.XMLHTTP.3.0")
conn.Open "get", url, false
conn.Send()
htmltext=bts(conn.responseBody) 'Aplico la función de convertir los datos
binarios a string
Response.Write(htmltext)
%>

SALUDOS


"Piolin Net" wrote in message
news:
> Hola!
>
> He buscado y he hecho pruebas hasta la saciedad y no consigo que el texto
> enviado x post con ajax se guarde correctamente.
>
> Los acentos y ñ se guardan con caracteres extraños (à¡ é à­ ó .)
>
> El texto lo recoge una pag. ASP clasic.
>
> Lo curioso es que cada vez que guardo esa página ASP, la 1ª vez almacena
el
> texto OK pero después lo hace mal.
>
> Alguien ha tratado con este problema?
>
> Slt.
>
>
>