Quote Originally Posted by xxdoc123 View Post
Code:
     flag = ""
    WinSockHttp1.Post_data = Text4.Text
    WinSockHttp1.Head_cookie = CoS
    WinSockHttp1.Successflags = "flag xxxx" ’Set a flag to determine whether all required web pages have been downloaded. Sometimes we only need part of the webpage content
    WinSockHttp1.SockHttp "http://XXX.COM,", mPOST, "1011101"

Private Sub WinSockHttp1_ReturnComplete( Arraydata() As Byte, Flags As String)
    
    strWeb = WinSockHttp1.Return_webstring ‘download complete string
                                                 ‘’Arraydata is bytearrays。
    'Debug.Print index
    'raw.debug_print strweb


End Sub
The code logic is not very clear. Modify it yourself, I suggest you use winhttp
i am gettting error: Ambiguous name detected: BytesToBstr
Attachment 178764