遇到一个问题,就是VB6.0操作Excel的过程中,往往会出现无法停掉Excel进程的问题。这个问题尤其出现在操作Excel2000的过程中,所以想强制终止Excel进程。
从网上查了好久,不是调用API就是,就是那一大堆的代码。
嘻嘻~不过从同事那里请教俩一个方法
Dim objWMIService As Object
Dim colProcesslist As Object
Dim objProcess As Object
Set objWMIService = CreateObject("winmgmts:{impersonationLevel=Impersonate}!root/cimv2")
Set colProcesslist = objWMIService.ExecQuery("select * from win32_process where name='EXCEL.exe'") '进程名
For Each objProcess In colProcesslist
objProcess.Terminate
Next
呵呵~现在还不知道他Create出来的是个什么东东,不过这个方法确实从程序上十分简便。
嘻~研究具体的含义中...(知其然,还要知其所以然)