0

次のコードを使用して、サイトからデータを取得しています。

    Dim htttpObj As Object
    Set htttpObj = CreateObject("MSXML2.ServerXMLHTTP.6.0")


    htttpObj.SetTimeouts 10000, 10000, 10000, 300000  

    htttpObj.Open "POST", url, False

    htttpObj.setRequestHeader headerName, headerValue

    htttpObj.Send ("func1=" & func1 & "&func2=" & func2 & "&username=" & login & "&psd=" & password)

    answer = htttpObj.responseText

このコードは、"Cat"、"dog"、"Hello World!" などの文字列を取得するときにうまく機能します。ただし、「Ações」のような文字列を取得する場合は機能しません。たとえば、「Ações」は「Ações」またはその他の特殊文字になります。

この問題の解決策を知っている人はいますか?

Ps:WinHttp メソッドを使用すると、この結果が得られません。しかし、WinHttp のバックアップとして ServerXMLHTTP メソッドを維持する必要があります。

4

0 に答える 0