I cannot seem to get the senddata method to work. it doesnt error, it just appears to not send anything. Any ideas?
------------------
Joe1223
[email protected]
The BlueAura Project.
Printable View
I cannot seem to get the senddata method to work. it doesnt error, it just appears to not send anything. Any ideas?
------------------
Joe1223
[email protected]
The BlueAura Project.
Did you check the port numbers?
Try this..(this comes from my head and might not work, email me if you want a working example)
Private Sub Command1_Click()
winsock1.connect "www.vb-world.net", 80
End Sub
Private Sub Winsock1_Connect()
winsock1.senddata "GET /index.htm HTTP/1.0" & chr(13) & chr(13)
End Sub
Private Sub Winsock_DataArrival(bytes as long)
winsock1.getdata TempStr, vbString
text1.text = text1.text & TempStr & vbcrlf
End Sub
------------------
Regards,
Paul Rivoli
-------------------
[email protected]
http://users.bigpond.com/privoli