Winsock ( Enviar Paquete )
Publicado por Jorge (9 intervenciones) el 22/09/2007 19:40:34
Buenos dias, necesito crear un programa en Visual Basic que haga lo siguiente:
Al tocar la tecla "X" se envie el paquete de informacion ( 05 0E por ejemplo ) a tal direcion de ip mediante tal socket ...
Tengo el ip, tengo el socket, tengo el paquete, me faltaria solo saber como enviarlo, alguna solucion? ...
El programa consta en enviar un paquete a una aplicacion online en curso, por ende la conexion con esa ip esta previamente establecida ...
Notas:
Ip Remoto: 205.12.25.100 ( por ejemplo)
Socket: 1000
Puerto Remoto: 7500
Packet: 05 0E
Codigo:
Private Sub Command1_Click()
Dim myArr(1) As Byte
myArr(0) = 5
myArr(1) = 0
Winsock1.RemoteHost = "205.12.25.100"
Winsock1.RemotePort = 7500
Winsock1.LocalPort = "1234"
Winsock1.SendData myArr
End Sub
Error:
http://img227.imageshack.us/img227/1200/errorsd9.jpg
:)
Al tocar la tecla "X" se envie el paquete de informacion ( 05 0E por ejemplo ) a tal direcion de ip mediante tal socket ...
Tengo el ip, tengo el socket, tengo el paquete, me faltaria solo saber como enviarlo, alguna solucion? ...
El programa consta en enviar un paquete a una aplicacion online en curso, por ende la conexion con esa ip esta previamente establecida ...
Notas:
Ip Remoto: 205.12.25.100 ( por ejemplo)
Socket: 1000
Puerto Remoto: 7500
Packet: 05 0E
Codigo:
Private Sub Command1_Click()
Dim myArr(1) As Byte
myArr(0) = 5
myArr(1) = 0
Winsock1.RemoteHost = "205.12.25.100"
Winsock1.RemotePort = 7500
Winsock1.LocalPort = "1234"
Winsock1.SendData myArr
End Sub
Error:
http://img227.imageshack.us/img227/1200/errorsd9.jpg
:)
Valora esta pregunta
0