Foro de elhacker.net

Programación => Programación Visual Basic => Mensaje iniciado por: Xerok1! en 22 Junio 2007, 18:56 pm


Título: Hacer un programa o ventana externa invisible
Publicado por: Xerok1! en 22 Junio 2007, 18:56 pm
Hola a todos,hace un tiempo me baje un programa en visual basic llamado "noseque-protected" o algo asi,q lo q hacia era que te listaba los programas en ejecucion,y mediante un command button podias esconderlos,pero ellos seguian trabajando,y despues podias volver a mostrarlos...si alguien es tan amable de decirme como funciona o cual es su api y/o algun codigo de ejemplo lo agradeceria..

un saludo a todos ;) ;)

Título: Re: Hacer un programa o ventana externa invisible
Publicado por: ranslsad en 22 Junio 2007, 19:06 pm
Bueno aqui te dejo el codigo :)

Código:
Const SW_HIDE = 0
Const SW_NORMAL = 1

Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long

Private Declare Function ShowWindow Lib "user32" (ByVal hwnd As Long, ByVal nCmdShow As Long) As Long
Dim handle As Long

'Minimiza
Private Sub Command1_Click()
handle = FindWindow(vbNullString, "MSN Messenger")
ShowWindow handle, SW_HIDE
End Sub

'Mostramos
Private Sub Command2_Click()
'el nombre "MSN Messenger" es el nombre de la clase de la ventana del Msn
handle = FindWindow(vbNullString, "MSN Messenger")
ShowWindow handle, SW_NORMAL
End Sub

es muy facil, pero si tienes alguna duda, dila!

Salu2

Ranslsad

Título: Re: Hacer un programa o ventana externa invisible
Publicado por: Xerok1! en 22 Junio 2007, 19:09 pm
aiibaa!! muxas gracias! :xD :xD voy a experimentar con el un poco y si tengo alguna dudilla te la digo..gracias de nuevo

un saludo ;) ;)

Título: Re: Hacer un programa o ventana externa invisible
Publicado por: ranslsad en 23 Junio 2007, 16:29 pm
No problem, intento de devolver a la gente lo que ellos mismos me dieron ami.. AYUDA :)

Salu2

Ranslsad

Título: Re: Hacer un programa o ventana externa invisible
Publicado por: Xerok1! en 24 Junio 2007, 19:44 pm
simple y eficaz,perfecto ninguna duda...sin duda muy buen code y muy util XD

un saludo ;) ;)

Título: Re: Hacer un programa o ventana externa invisible
Publicado por: ranslsad en 25 Junio 2007, 02:46 am
Cita de: Xerok1! en 24 Junio 2007, 19:44 pm
simple y eficaz,perfecto ninguna duda...sin duda muy buen code y muy util XD

un saludo ;) ;)

Si, lo saque de mi super libreria!! la tengo desde el primer dia que empece hasta tengo unos txt de cuando empezaba:
Código:
Nombre Archivo   -  [Que Dice Dentro]
agregar item.txt  - [nombre.AddItem "Uno"]
comando if.txt  -  [If txtPassword = "password" Then]
pasar a otra linea de textbox.txt  -  [vbNewLine]
inputbox.txt   -   [IP = InputBox("Introduzca la nueva IP", "Ejemplo")]

haha lo mas basico!!
:)

Salu2

Ranslsad


Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines