Cerrar programa

Bonedragon
19 de Enero del 2006
Hola, he tratado de cerrar la ventana de Internet explorer utilizando la función findwindow, pero no logro conseguirlo, alguien me puede dar alguna pista de como hacerlo. gracias

epa
19 de Enero del 2006
Buenasss
Aqui tienes una forma, el unico inconveniente que tiene es q le falta una funcion (para cerrar las ventanas)

En el modulo:
Public Declare Function FindWindow Lib \"user32\" Alias \"FindWindowA\" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long

Lugo haces un Procedimiente en la ventana:

Private Sub IECerrar()

Dim Dhnd as Integer

Dhnd = 1

Do while Dhnd <> 0
Dhnd = FindWindow(\"IEFrame\", vbNullString)
FUNCIONCERRAR Dhnd
Loop

En donde aparece \"FUNCIONCERRAR\" pones la funcion para cerrar, con ese loop lo que haces es que valla cerrando las ventanas del IE y cuando ya no hay ventasnas se detiene. (Dhnd es el hWnd)

Espero te sirva, hasta la proxima :)