【发布时间】:2011-12-24 19:23:32
【问题描述】:
我正在使用Winsock 控件:
Private Sub Form_Load()
Winsock1.Connect "stackoverflow.com", 80
End Sub
Private Sub Winsock1_Close()
Winsock1.Close
End Sub
Private Sub Winsock1_Connect()
Winsock1.SendData "GET /questions/8624871/vb6-alternative-to-inet-webbrowser-control HTTP/1.1" & vbCrLf & "Host: stackoverflow.com" & vbCrLf & vbCrLf
End Sub
Private Sub Winsock1_DataArrival(ByVal bytesTotal As Long)
Dim s As String
Winsock1.GetData s, vbString
RichTextBox1.Text = RichTextBox1.Text & s
End Sub
header中不包含Content-Length怎么知道控件已经接收完文件?
我听说过一些方法,比如Winsock1.state 是0 时表示连接已关闭,但有时它仍处于其他状态,如7,所以我需要另一种解决方案。
【问题讨论】: