Tek-Tips is the largest IT community on the Internet today!
Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!
-
Congratulations TouchToneTommy on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!
Close down a program
- Thread starter clear88
- Start date
ralphtrent
Programmer
you might want to use WMI:
Set oWmi = GetObject("winmgmts:{impersonationlevel=impersonate}!\\.\root\cimv2"
query = "Select * from Win32_Process Where name = 'IEXPLORER.EXE'"
Set wql = oWmi.execQuery(query)
For Each item In wql
item.terminate()
next
Set wql = Nothing
Set owmi = Nothing
Set oWmi = GetObject("winmgmts:{impersonationlevel=impersonate}!\\.\root\cimv2"
query = "Select * from Win32_Process Where name = 'IEXPLORER.EXE'"
Set wql = oWmi.execQuery(query)
For Each item In wql
item.terminate()
next
Set wql = Nothing
Set owmi = Nothing
- Thread starter
- #3
- Status
Similar threads