open an external program

[duc]

hey i need a code to open an external program

[James Stanich]

Shell "C:\Windows\System32\notepad.exe", vbMaximizedFocus

[duc]

man u got posts everywhere, how does your brain fit in your head ( i dont mean that offensively) thanks

[James Stanich]

Originally posted by duc
man u got posts everywhere, how does your brain fit in your head ( i dont mean that offensively) thanks

I have a fast modem, a know a little VB

[duc]

how do you close a program?

edit: is it true that U.S.A Residents arent allowed to have a GIF in their signature, cuz thats what Alien_Poo keeps saying

[James Stanich]

Originally posted by duc
how do you close a program?

edit: is it true that U.S.A Residents arent allowed to have a GIF in their signature, cuz thats what Alien_Poo keeps saying

Close a program :

Dim Frm as Form
 
Form Each Frm in Forms
 
Unload Frm
 
Set Frm = Nothing
 
Next
 
End

[duc]

i dont mean the app i creat, like external programs. like say i want to close AIM

edit: Create*

[James Stanich]

' Kill an app
 
Private Declare Function PostMessage Lib "user32" Alias "PostMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As Long
Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long
Private Const WM_CLOSE = &H10
 
 
Private Sub Form_Load()
    Dim tWnd As Long
    tWnd = FindWindow(vbNullString, "Untitled - Notepad")
    PostMessage tWnd, WM_CLOSE, 0&, 0&
End Sub

[duc]

how bout an .exe

like say i have AIM (aol instant messanger)

i want to close the program. if i type whats in the window it just puts it down to the Systray

[James Stanich]

Originally posted by duc
how bout an .exe

like say i have AIM (aol instant messanger)

i want to close the program. if i type whats in the window it just puts it down to the Systray

Why so you can do a search and post old threads to this one. Go play elsewhere...