how would i close a prorgam already running? like notepad
Printable View
how would i close a prorgam already running? like notepad
You can use SendMessage API function with WM_Close parameter. You need to know WindowsClass of the running application, which you can find with Spy++ (VS tool). Or send me your E-Mail address and I'll send you Class to kill Application by its name.
My e-mail [email protected]
Vlad
1) Make a command button (command1) and place this code into a form:private Declare Function FindWindow Lib "user32" Alias _
"FindWindowA" (byval lpClassName as string, _
byval lpWindowName as string) as Long
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 Sub Command1_Click()
wHandle = FindWindow(vbNullString, "Notepad")
target = PostMessage(wHandle, &H10, 0&, 0&)
If target = 0 then MsgBox "Closed"
End Sub