Mi troyano no conecta

[HARDDRAKE]

Hola  a todos estoy desarrollando mi troyano con muchas funciones pero a la hora de probar la comunicación desde otra red el server no se conecta, estoy usando una cuenta de no-ip para que alguien me ayude adjunto el código en visual 6

Private Sub Form_Load()
On Error Resume Next
'Me.Hide
winsck1.Close
winsck1.Connec t "cuenta no-ip", 16666
Label1.Caption = "Conectando"
If Err Then Exit Sub
End Sub

Private Sub Form_Unload(Cancel As Integer)
MsgBox "terminó el cliente", 48 + 4096, "server"
winsck1.Close
End
End Sub

Private Sub TCP1_Connect()
Label1.Caption = "Conectado"

End Sub

Private Sub winsck1_DataAr rival(ByVal bytesTotal As Long)
On Error Resume Next
Dim Dato As String
Dim opcion As String
winsck1.GetDat a Dato
Text1.Text = Dato
opcion = Dato
 
Select Case opcion
Case 1
MsgBox "enviando opcion1 desde el cliente", 48 + 4096, "server"
End Select
End Sub

[>> s E t H <<]

me parece qeu el problema esta en la cuenta... tenes q poner una ip

claro que igual se puede hacer con no-ip pero al winsock le tenes q pasar la ip. para esto podrias hacer ping y sacar la ip

[Simonss]

Hola  a todos estoy desarrollando mi troyano con muchas funciones pero a la hora de probar la comunicación desde otra red el server no se conecta,

Supongo que ya probaste en tu misma pc, si conectaba server y cliente, ahora si conectas desde otra red, debes tener redireccionada las conecciones entrantes en tu Modem, Router u otro hacia tu Ip privada (en el pc que tendra el server) y el puerto especificado, podria ser el motivo de la falla.