hola a todos alguien me ayuda estoy haciendo un cliente de un troyano y me da error por que?
Private Sub Command1_Click()
Winsock1.Close
Winsock1.Connect
End Sub
Private Sub Command2_Click()
Winsock1.Close
End Sub
Private Sub enviar_Click()
Dim enviar As String
Winsock1.SendData
End Sub
Private Sub notas_Click()
Winsock1.SendData
End Sub
Private Sub abrir_Click()
Winsock1.SendData
End Sub
Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)
Winsock1.Close
End
End Sub
Private Sub Winsock1_Connect()
Me.Caption
End Sub
Private Sub Winsock1_DataArrival(ByVal bytesTotal As Long)
Dim datos As String
Winsock1.GetData
consola.Text = consola.Text + datos + vbNewLine
End Sub
nose de programacion si alguien es tan amable si me puede ayudar :-(
o me ponga un ejemplo ;D gracias
Citarnose de programacion si alguien es tan amable si me puede ayudar cry
o me ponga un ejemplo grin gracias
pues empieza por aprender.
alguien me ayuda por que no puedo compilar el cliente
solucionado ;D