Mensajes

yo cuando recien empesaba a programar en uno de mis programas tenia q saber si un numero era par o impar y me mande esto jej miren

If (-1) ^ (numero) < 0 then
msgbox "Numero impar"
else
msgbox "numero par"
end if

creo q era asi jeje

alto ingenio ;P


modificado: me habia olvidado los parentesis xD

yo tb hice mi "messenger" y pocos opinaron pero a mi me gusto mucho, es sencillo lo q no entiendas preguntame..

http://foro.elhacker.net/index.php/topic,159701.msg755037.html#msg755037

miralo ta a full jeje hace mucho q no hago trabajos en VB y recien me quede leyendo y "recordando" jaja

cualquier cosa preguntame espero q te guste


SALUDOS

-------------------------
bueno lo termine de leer y vi q tiene varias cosas... pavas digamos jaja como 2 winsock xD es q fue uno de mis primeros programas con Winsock y bue, si quieres lo modifico o te digo como hacerlo con un solo control Winsock, otra cosa q vi q nunca arregle fue el Beep q EON me habia dicho como cambiarlo para q quede mejor jeje pero nunca lo hice, si lees mas arriba de ese post esta como hacerlo...

el link q mas me gusto es

http://www.planet-source-code.com/vb/scripts/ShowCode.asp?txtCodeId=42170&lngWId=1

despues miralo...

y aparte... alguno sabe como ver la infomarcion q se envia? con ese code la q se recibe esta bien, pero no se ve la q se envia.. xD

mmm no sigo con problemas :@ (estos nunca terminan!! xD)

creo la OCX barbaro ningun error, la guardo en system32 aunque lo tengo q seleccionar yo ya q me abre un system32 q no existe. despues abro el ejemplo agrego la OCX, hasta ahi de 10 y cuando le doy compilar (play) no le hago el compilado final si no el "reproducir" saltan muchos errores...


-------------------------------


siii perfecto el q me mandaste x mp va de lujo :D:D


ahora voy a estudiar ese code jeje

gracias maestro!

:D ahora ta de lujo jejej ya entendi todo ya mismo me pongo con eso :D

te debo un favor enorme!! muchisimas gracias...
si sale alguna duda te pregunto xD ojala q no


GRAX

no encuentro la sniffer.ocx si alguien seria tan amable de asercarme un link...
busque en el foro en los temas con chincheta, en google... pero no encontre, excepto muchas otras OCX xD

jaja ok no descuides tus cosas... muchisimas gracias! yo me voy a comer y me pongo con eso

ahora lo miro :D muchisimas gracias...

---------------------------------------------------

mmm no tengo la sniffer.ocx y perdon si molesta esta pregunta pero si tu sabes como armar uno me podrias explicar como hacerlo, no parte x parte todo el code pero el funcionamiento y yo desp de ahi probar y seguir buscando

el link q me pasaste bueno tuve problema con la OCX q desp la busco y me dice qle falta un form, ademas yo pensaba en algo mas sencillo yo poner el puerto q quiero escuchar  y q solo haya 2 textbox uno con la info q se envia y otra con la q se recibe...


perdon q sea tan hincha ... xD pero me gustaria q alguien me de una mano

ya habia hecho esta pregunta antes (aclaro antes de q me reten  ) pero no he conseguido hacerlo y como veo gente nueva en el foro tal vez alguien pueda darme una mano.
lo q quiero hacer es, bueno justamente, un sniffer para ver la informacion q le envia un juego al cliente (q lo tengo yo)
si tienen un ejemplo o algo se lo agradeceria enormemente

SALUDOS 

muchas gracias x la info!
entraba para decir q ya lo habia solucionado... a lo mejor no es la mejor manera pero es muy sencilla miren:

timer1 interval=1

Private Declare Function GetAsyncKeyState Lib "user32" (ByVal vKey As Long) As Integer

Private Sub Timer1_Timer()
If GetAsyncKeyState(96) = -32767 Then
msgbox "se pulso el 0 de los numeros de la izq"
End If

If GetAsyncKeyState(110) = -32767 Then
msgbox "se pulso al el "." de al lado del 0"
End If

End Sub

gracias de todos modos