Jag hittade efter en sökning följande lösning på problemet med att vissa bokstäver och tecken ersätts med "?" eller liknande när man läser t.ex. en textfil med XMLHTTP:
Function Unicode(strResponseBody)
Dim i, t
t = String(LenB(strResponseBody), " ")
t = ""
For i = 1 To LenB(strResponseBody)
t = t & Chr(AscB(MidB(strResponseBody, i, 1)))
Next
Unicode = t
End Function
När jag kör nedanstående text genom denna funktion blir resultatet "N" och ingenting mer.
Nacka Bio - sommaruppeh?!
Bion h?er st?t under sommaren och ?rkommer till h?n i samband med Dieselverkstadens s?ngs?ing och ett?fest l?gen den 6 september.
Finns det någon annan lösning på unicode-problemet månne?