Mrrrr's Forum (VIEW ONLY)
Un forum care ofera solutii pentru unele probleme legate in general de PC. Pe langa solutii, aici puteti gasi si alte lucruri interesante // A forum that offers solutions to some PC related issues. Besides these, here you can find more interesting stuff.
|
Lista Forumurilor Pe Tematici
|
Mrrrr's Forum (VIEW ONLY) | Reguli | Inregistrare | Login
POZE MRRRR'S FORUM (VIEW ONLY)
Nu sunteti logat.
|
Nou pe simpatie: angela31 Profile
| Femeie 24 ani Buzau cauta Barbat 24 - 60 ani |
|
TRaP
Moderator
Inregistrat: acum 6 ani
Postari: 739
|
|
Add the following snippet below the objWord.Quit code:
Set objWMIService = GetObject("winmgmts:{impersonationLevel=impersonate}!\\.\root\cimv2")
Set colProcess = objWMIService.ExecQuery("Select * from Win32_Process Where Name = 'winword.exe'") For Each objProcess in colProcess objProcess.Terminate() Next |
Note that this will close any other word file you might have open.
Source:
Modificat de TRaP (acum 3 ani)
|
|
pus acum 3 ani |
|