Send packet

Iniciado por ElChispa, 25 Enero 2012, 09:22 AM

0 Miembros y 2 Visitantes están viendo este tema.

ElChispa

Hola gente necesito una mano si alguien me puede guiar
Necesito crear una aplicación que edite los paketes de otra aplicación
Como el Wpe Pro , que envia Sock , necesito hacer lo mismo
Pero que mi aplicación lo haga , Si alguien me puede ayudar
Estaría muy agradecido
ya que en esto estoy hace 2 semanas buscando ya eh hecho muchos post
en otros foros , pero no ahi respuestas S: . Espero que alguien me responda esta vez
Hasta luego !  :-[

BlackZeroX

inyecta una dll y hookea las apis que manejan Winsock...

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

BlackZeroX

The Dark Shadow is my passion.

ElChispa


Le puedo implentar algo para que este codigo funcione ? o algo asi

Option Explicit


Private Sub about_Click()
frmAbout.Show
End Sub

      Private Sub Command1_Click()
        winsock1.SendData "7D 05"
      End Sub

Private Sub credits_Click()
frmCredits.Show
End Sub

      Private Sub Form_Load()
         Command1.Enabled = False
         winsock1.Connect "61.19.250.152", 2104
         frmSplash.Show

      End Sub

      Private Sub Form_Unload(Cancel As Integer)
         winsock1.Close
         frmSplash.Hide
      End Sub

      Private Sub Winsock1_Connect()
         Command1.Enabled = True
      End Sub

      Private Sub Winsock1_DataArrival(ByVal bytesTotal As Long)
         Dim temp As String
         temp = String(bytesTotal, Chr$(0))
         winsock1.GetData temp, vbString, bytesTotal
         MsgBox temp
      End Sub

Para hacer algo como esto