strComputer="."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colProcessList=objWMIService.ExecQuery ("select * from Win32_Process where Name='qq.exe' ")
For Each objProcess in colProcessList
objProcess.Terminate()
next
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colProcessList=objWMIService.ExecQuery ("select * from Win32_Process where Name='qq.exe' ")
For Each objProcess in colProcessList
objProcess.Terminate()
next
解决方案 »
- 请高手帮忙修正一个注册表模块!已经做成工程文件,有详细的实例的!
- 怎样把TXT文本中的数据在Datagrid显示,并且能够生成报表?
- 关于简繁体的问题
- 关于 发送文本到 POPO & QQ (2004版) 的编辑框
- 高分求救拉~~~~~~~~~一个关于SQL日期的比较问题!!!!!!!!
- MSHFlexGrid控件,怎样隔行显示不同颜色,并且隔几行才有横格线
- 如何将一个窗体中的值通过双击传到另一个窗体中
- 求高手们帮忙看看吧!为什么不识别 "select 表A.名称 from 表A," & Comb.Item(1).Text & " where 表A.名称=" & Comb.Item(1).Text & ".名
- 大虾帮忙!!!!!55555555^^^^^^^^^
- 怎样制作???????
- 100高分求助!vb如何删掉一段文本里的软硬回车和空格!
- 求助VS2010下VB载入图片的代码
这个就是
找到 QQ 就结束它
2、枚举属于QQ.EXE的所有进程,并结束属于QQ.EXE的所有进程。