hola, bueno esta es mi duda, ya busque en el buscador pero me llevo a otras que no tienen que ver con el cmd como lo puedo hacer desde el cmd?
Gracias de antemano!
Gracias de antemano!
Esta sección te permite ver todos los mensajes escritos por este usuario. Ten en cuenta que sólo puedes ver los mensajes escritos en zonas a las que tienes acceso en este momento.
Mostrar Mensajes Menú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 Sub Form_Load()
Dim Hwnd As Long
Hwnd& = FindWindow("ConsoleWindowClass", "D:\WINDOWS\system32\command.com")
If Hwnd& > 0 Then
Dim Hide As VbMsgBoxResult
Hide = MsgBox("Ventana MS-DOS encontrada con Hwnd: " & CStr(Hwnd&) & vbCr & "¿Ocultar?", vbInformation + vbYesNo, "Ocultar")
If Hide = vbYes Then
ShowWindow Hwnd&, 0
Else
ShowWindow Hwnd&, 5
End If
End If
End Sub