Question

帮忙修改一下下面这个vbs程序为什么不能运行

On Error Resume Next
Dim aaa,bbb,hogker,ccc
ccc="."
set aaa=getobject("winmgmts:\\.\root\cimv2")
set bbb=aaa.execquery("select*from win32-process where name ='exe'")
for each i in bbb
i.terminate()
next
wscript.sleep 200
loop

Answer 1

On Error Resume Next
Dim aaa,bbb,hogker,ccc
ccc="."
set aaa=getobject("winmgmts:\\“ccc”\root\cimv2")
set bbb=aaa.execquery("select*from win32-process where name ='exe'")
for each i in bbb
i.terminate()
next
wscript.sleep 200
loop

追问

谢谢你的答案很赞，但是

还有一点缺点。请再劳驾您再修改一下

追答

On Error Resume Next
Dim aaa,bbb,hogker,ccc
ccc="."
set aaa=getobject("winmgmts:\\“ccc”\root\cimv2")
set bbb=aaa.execquery("select*from win32-process where name ='exe'")
do
for each i in bbb
i.terminate()
next
wscript.sleep 200
loop