http-request Problem Unicode

04/03/2008 - 19:57 von Alex Egert | Report spam
Hallo an Alle,

habe folgendes Problem mit einem Http-request.
Ich rufe die sende einen Request über winhttp und erhalte über eine API
eines Systems eine Antwort.

Soweit alles klar... Ich kann auch sàmtliche Daten verarbeiten bis auf die
Datensàtze die Sonderzeichen enthalten.

Ich erhalte ein ' als ein Fragezeichen ? .Ich gehe mal davon aus, dass es
mit der Encodierung zu tun hat, leider hat aber die Methode setRequestheader
keine Wirkung auf meinen zurückerhaltenen String wenn ich versuche ihn in
ISO umzuwandeln.

Hat jemand eine Idee wie ich das lösen kann?

hier mein Code bislang. Wie gesagt die Datensàtze kommen bis auf die
Sonderzeichen alle sauber an.

Meine Datensàtze kommen mit einem ; als Zeilenabschluss an diese lese ich
dann in mein Array ein. Ich erhalte hier ein mit | getrennten Text als
Response.
Const ApiURL = "http://hier ist die URL drin" Dim MyRequest As New
WinHttpRequestDim RequestUrl As StringDim a As Long, e As Long, i As Long, x
As LongDim text As String, text1 As String, text2 As String, sql As
StringDim RSD As DAO.RecordsetDim DBD As DAO.DatabaseDim arr() As String,
stparse() As StringDim lResolve, lConnect, lSend, lReceive As Long
Debug.Print Time() RequestUrl = ApiURL lResolve = 5 * 100000
lConnect = 5 * 100000 lSend = 15 * 100000 lReceive = 15 * 100000
MyRequest.SetTimeouts lResolve, lConnect, lSend, lReceive MyRequest.Open
"GET", RequestUrl Debug.Print Time() 'hier habe ich versucht gehabt
den setrequestheader zu setzen!!! MyRequest.send Debug.Print Time()
'ViewRequest = MyRequest.responseText text = MyRequest.responseText
Debug.Print text '***********Lese nun die erstmal die einzelnen
Zeilen******** arr = Split(MyRequest.responseText, ";")

ich danke schon mal für die Hilfe, habe heute bereits 10 Stunden damit
verbracht...
 

Lesen sie die antworten

#1 Thomas Möller
04/03/2008 - 20:16 | Warnen spam
Hallo Alex,

Alex Egert schrieb:
habe folgendes Problem mit einem Http-request.
Ich rufe die sende einen Request über winhttp und erhalte über eine
API eines Systems eine Antwort.

Soweit alles klar... Ich kann auch sàmtliche Daten verarbeiten bis
auf die Datensàtze die Sonderzeichen enthalten.

Ich erhalte ein ' als ein Fragezeichen ? .Ich gehe mal davon aus,
dass es mit der Encodierung zu tun hat, leider hat aber die Methode
setRequestheader keine Wirkung auf meinen zurückerhaltenen String
wenn ich versuche ihn in ISO umzuwandeln.

Hat jemand eine Idee wie ich das lösen kann?

hier mein Code bislang. Wie gesagt die Datensàtze kommen bis auf die
Sonderzeichen alle sauber an.

Meine Datensàtze kommen mit einem ; als Zeilenabschluss an diese lese
ich dann in mein Array ein. Ich erhalte hier ein mit | getrennten
Text als Response.
Const ApiURL = "http://hier ist die URL drin" Dim MyRequest As New
WinHttpRequestDim RequestUrl As StringDim a As Long, e As Long, i As
Long, x As LongDim text As String, text1 As String, text2 As String,
sql As StringDim RSD As DAO.RecordsetDim DBD As DAO.DatabaseDim arr()
As String, stparse() As StringDim lResolve, lConnect, lSend, lReceive
As Long Debug.Print Time() RequestUrl = ApiURL lResolve = 5 *
100000 lConnect = 5 * 100000 lSend = 15 * 100000 lReceive = 15
* 100000 MyRequest.SetTimeouts lResolve, lConnect, lSend, lReceive
MyRequest.Open "GET", RequestUrl Debug.Print Time() 'hier habe
ich versucht gehabt den setrequestheader zu setzen!!!
MyRequest.send Debug.Print Time() 'ViewRequest > MyRequest.responseText text = MyRequest.responseText Debug.Print
text '***********Lese nun die erstmal die einzelnen Zeilen********
arr = Split(MyRequest.responseText, ";")
ich danke schon mal für die Hilfe, habe heute bereits 10 Stunden damit
verbracht...



die Struktur Deines Codes kann man nur erahnen. ;-)

Sei doch bitte so nett und poste en Code noch einmal in formatierter
Form.

CU
Thomas

Homepage: www.Team-Moeller.de

Ähnliche fragen