Programación General > Visual Basic 6.0 e inferiores
Cerrar Una Aplicación Externa Desde Visual Basic 6
(1/1)
Mellileo:
Hola Genios:
Necesito crear el código en VB 6.0 que me cierre una aplicacón externa (SnapView.exe) que se carga al ejecutar un informe.
No tengo la más mínima idea de como hacerlo, por eso cualquier ayuda será muy agradecida.
Gracias.
Saludos,
Mellileo!
martin campos quintero:
Tirar Tareas de Windows desde VB
Esta función busca el identificador de la aplicación que quieres tirar, y despues envia el mensaje al Windows para destruir ese identificador. Hace la función de Ctrl-Alt-Supr... Finalizar Tarea.
Pon este código en un módulo y llama a la función enviando la cabecera (nombre/descripción) del programa que quieres tirar.
--- Código: Text --- Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As Long, _ ByVal lpWindowName As String) As LongDeclare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, _ ByVal wParam As Long, lParam As Any) As Long Function TirarPrograma(Programa As String) As Boolean TirarPrograma = IIf(SendMessage(FindWindow(0&, Programa), &H10, 0, 1) = 0, True, False)End Function
Aqui tienes un ejemplo de como funciona. Debes compilar el proyecto para que funcione ya que ignora la orden en diseño.
--- Código: Text --- Private Sub Command1_Click() TirarPrograma "titulo del programa a cerrar"End Sub
En donde dice "titulo del programa a cerrar", debes poner lo que aparece en la barra de título del programa.
Ejemplo:
Para cerrar la calculadora de windows XP
Su título es: Calculadora
Entonces debes poner
TirarPrograma "Calculadora"
Espero te sirva. Saludos
Mellileo:
Hola Martín:
Muchas gracias por tu aporte, pues me ha dado la solución al problema, claro que el manejo de las API, las tuve que copiar en un modulo clase, de esta forma se puede ejecutar la función TirarPrograma en modo de Diseño.
Mil gracias!!!
Saludos,
Mellileo!!!
Navegación
Ir a la versión completa