Я использую 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
Как узнать, что элемент управления завершил получение файла, когда заголовок не содержит Content-Length
?
Я слышал о некоторых способах, например, когда Winsock1.state
равен 0
, это означает, что соединение закрыто, но иногда оно остается в каком-то другом состоянии, например 7
, поэтому мне нужно другое решение.