日志正文
|
||
''2、强制退出excel进程 Dim objSet Set objSet = GetObject("winmgmts:").InstancesOf("Win32_Process") For Each Item In objSet If Item.Name = "EXCEL.EXE" Then pid = Item.Handle ''Shell "ntsd -c q -p " & pid Shell "TASKKILL /PID " & pid End If Next
最后修改于 2012-06-14 19:53
阅读(?)评论(0)
上一篇: 该日志被锁定
下一篇:关于 环形线圈检测器
|
||
评论 想第一时间抢沙发么?