Foro de elhacker.net

Programación => Programación Visual Basic => Mensaje iniciado por: S@DiHaCk en 3 Marzo 2008, 18:26 pm



Título: un poco de ayuda!!!
Publicado por: S@DiHaCk en 3 Marzo 2008, 18:26 pm
hola , estoy en la creacion de un keylogger ( que ya eh terminado )  pero derrepente se me ocurrio tambien que el keylogger vaya guardando imagenes de la pc, creo que le llaman "Print Screen", cosa que me falta muy poco asi que pues tras estar buscando un largo dia en SAN GOOGLE y no encontrar nada les pido si  alguien conoce alguna forma de hacer esto.

el keylogger tiene que ir creando imagenes (jpg) que se guardaran en una carpeta pero para eso las imagenes tienen que tener diferente nombre asi que se me ocurrio insertar el comando "Now()" como nombre de la imagen asi cada imagen que se vaya creando tendra de nombre algo asi:

01:44 p.m. 01/03/2008.jpg
03:22 p.m. 01/03/2008.jpg
07:59 p.m. 03/03/2008.jpg

pero  pues no me funciona,ya eh intentado poner Now() como nombre de salida para la imagen y pues no me funciona espero alguien me pueda ayudar y ante todo gracias.


Título: Re: un poco de ayuda!!!
Publicado por: rdzlcs en 3 Marzo 2008, 18:37 pm
Creo que por hay http://www.elguille.info/vb/VB_API.HTM encontre algo una ves pero no me acuerdo en que parte la buscas...

Hay unas cuantas API`s utiles...

SAludos


Título: Re: un poco de ayuda!!!
Publicado por: naderST en 3 Marzo 2008, 18:53 pm
Ponle de nombre esto:
Código:
Format(Now, "dd_MM_yyyy-hhmmss")


Título: Re: un poco de ayuda!!!
Publicado por: cassiani en 3 Marzo 2008, 19:07 pm
Citar
se me ocurrio insertar el comando "Now()" como nombre de la imagen asi cada imagen que se vaya creando tendra de nombre algo asi:

01:44 p.m. 01/03/2008.jpg
03:22 p.m. 01/03/2008.jpg
07:59 p.m. 03/03/2008.jpg

pero  pues no me funciona,ya eh intentado poner Now() como nombre de salida para la imagen y pues no me funciona

Quizás no concatenaste.

Código
  1. MsgBox "Now.jpg" 'Sin concatenar
  2.  
  3. MsgBox Now & ".jpg" 'Concatenado


Título: Re: un poco de ayuda!!!
Publicado por: S@DiHaCk en 3 Marzo 2008, 19:57 pm
naderST y C@ss¡@n¡ muchas gracias ya lo solucione tomando en cuenta lo que me respondieron, por separada ninguna me  funcionaba:

Citar
Format(Now, "dd_MM_yyyy-hhmmss")

y

Citar
MsgBox Now & ".jpg"

asi pues las mezcle

Citar
Format(Now, "dd_MM_yyyy-hhmmss") & ".jpg"
y mi resultado fue "03_03_2008-124902.jpg"

muchas gracias.