Private Sub Command1_Click()
Dim url As String, send_data As String, head As String
url = "http://www.xxxxx.com/xxxx.do"
send_data = "xxxxxxx"
head = "Content-Type: application/x-www-form-urlencoded"
Inet1.Execute url, "POST", send_data, head
End SubPrivate Sub Inet1_StateChanged(ByVal State As Integer)
Dim get_data As String
If State = 12 Then
get_data = Inet1.GetChunk(1024)
text1.Caption = get_data
End If
End Sub为什么text1 没有返回信息? 是不是要把Connection: Keep-Alive 加上  加上了却出错了啊`
有没有可以发送的实例代码?谢谢了!