burz yo tambien tuve exactamente ese problema..
tienes un troyano con muchas acciones eso hace la cosa mas dificil, es decir que el programa identifique cada accion que querramos..
debes tener en cuenta esto.. en cada winsock SOLO puede almacenar una variable a la vez
bueno una opcion es que uses los bloques if
por ejemplo yo presiono el boton que dice BEEP le envio los datos con el senddata del WS y la victima recibira en su ejecutable getdata datos
'SERVIDOR==============
private sub enviarbeep_cli
ck()
winsock1.senda
ta "enviar_beep"
end data
private sub mensajemortal_
click
winsock1.senda
ta "morir"
'CLIENTE================
dim datos as string 'varible para almacenar los datos del envio
'ya que nos haya llegado los datos los procesamos en una caja de texto
private sub text1_change
if datos = "enviar_beep" then Beep
if datos = "morir" then msgbox "creo que tu pc va a necesitar urgentemente un funeral"
end sub
otra opcion que tienes burz es colocar otro winsock pero a la vez hara que se hagan mas pesados los envios
espero que al menos te de una idea
salu2
