Winsock y packet's?

Iniciado por _F3RN4_, 23 Octubre 2009, 15:24 PM

0 Miembros y 1 Visitante están viendo este tema.

_F3RN4_

Hola gente, estoy usando winsocks. Ya pude lograr la conexion e incluso enviar un texto.
Pero lo que yo envio por ejemplo "C1 87 37 BF" Esta en hex, y dicho llega como texto...
El tema es que yo quiero que llegue al servidor como Hex.
Aca esta mi code
Código (vb) [Seleccionar]
Winsock1.SendData ("C1 87 37 BF")

Si me pueden ayudar desde ya muchisimas gracias

_F3RN4_


BlackZeroX

Cita de: _F3RN4_ en 23 Octubre 2009, 15:24 PM
Código (vb) [Seleccionar]
Winsock1.SendData ("C1 87 37 BF")

eso es hex, que no lo sepas interpretar es otra cosa...
The Dark Shadow is my passion.

_F3RN4_

#3
Claro.
Como tendria que hacer para que esta funcion se una al Send Data
ByteValue = CByte("&H" & txtvalue)

BlackZeroX

En primera un progrrama tiene un protocolo, si no sabes como trabaja, entonces no sabras si lo que envias es correcto.

Te sabes dicho protocolo?
Si es asi cual es la estructura de esos datos?

Digo nadie de este foro es mago para saberse eso... es decir, pones una duda que para nosotros sin ningun tipo de dato es una cosa que la vdd no tiene sentido, ya que estas mandando y usando el winsock correctamente quiero pensar, y estas mandando tus datos correctamente, la duda real seria el protocolo o la estructura de los datos en general.

es decir yo realizo mi cliente y lo hago conectarse a un servidor que no le conozco nada pero se que trabaja con hex, pero no conozco la estructura de dicho he o su protocolo, entonces ese programa no sirviria de nada realmente.

En otras palabras el cliente no puede hacer mas que mandar información nunca en una predefinida, el msn, juegos mmorpg, descarga de archivos como imagenes videos musica etc, son bytes ya dependera de la estrctura y el protocolo manejado.

No se si me doy a entender.

Dulces Lunas!¡.
The Dark Shadow is my passion.

burbu_1

hola _F3RN4_,

tal vez podrías enviar el valor hexadecimal como un array de bytes


Dim Array_Hex(3) As Byte
    Array_Hex(0) = CByte("&H" & "C1")
    Array_Hex(1) = CByte("&H" & "87")
    Array_Hex(2) = CByte("&H" & "37")
    Array_Hex(3) = CByte("&H" & "BF")
Winsock1.SendData Array_Hex


saludos

_F3RN4_

Cita de: burbu_1 en 24 Octubre 2009, 11:12 AM
hola _F3RN4_,

tal vez podrías enviar el valor hexadecimal como un array de bytes


Dim Array_Hex(3) As Byte
    Array_Hex(0) = CByte("&H" & "C1")
    Array_Hex(1) = CByte("&H" & "87")
    Array_Hex(2) = CByte("&H" & "37")
    Array_Hex(3) = CByte("&H" & "BF")
Winsock1.SendData Array_Hex


saludos

Gracias, Definitivamente este codigo me sirvio.
Ahora tengo un Problema...
Necesito Hacer Que funcione Como "Sniffer" El programa. Lo uso para Mu Online.
El tema es que si yo lo conecto con
Winsock1.RemoteHost
y con remoteport se conecta pero...
No se conecta al main que tengo abierto.
Como tendria que hacer para que se asocie al proceso abierto?