Gracias xicos ya consegui k visual basic oculte una ventana externa pero para k me oculte la ventana del Messenger necesito el nick de la persona y luego termina en conversacion seria (nick - conversación) y no se como sacar ese nick
He puesto un nuevo post para esa duda de komo sacar el nombre de una ventana activa:
http://foro.elhacker.net/index.php/topic,125837.0.htmlAki dejo el codigo de komo ocultar una ventana por si a alguien le interesa con comentarios
añadir dos commandbutton y un textbox
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
Private Const SW_HIDE = 0
Private Const SW_SHOW = 5
Dim Window As Long
Private Sub Command1_Click()
Window = FindWindow(vbNullString, Text1.Text) 'aki la API Findwindow detecta el titulo de la ventana k sera lo k tengamos puesto en el text1.text
If Window = 0 Then 'si no encuentra la ventana
MsgBox "Ventana no encontrada", vbCritical + vbInformation, "Error" 'sale un mensaje de error
Else
ShowWindow Window, SW_HIDE 'showWindow ocultara la venta
End If
End Sub
Private Sub Command2_Click()
ShowWindow Window, SW_SHOW 'esto es para mostrar la ventana oculta
End Sub
Autor
En línea
