Caracteres raros al llamar XML desde ASP

[yomesmo]

Solucionado, la dejo aqui porque he visitado décenas de posts y nadie da con la solución... pero la tiene. Eso si, es vergonzoso que Microsoft no haya resuelto este problema.

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)
%>

Aqui lo dejo para la posteridad y de paso me cago en Mocosoft y sus chapuzas prehistóricas (Con permiso del moderador del foro).