VBS�制���用程序
VBS脚本→ vbs强制关闭程序vbs强制关闭程序
sub
Close_Process(ProcessName)
On Error Resume Next
for each ps in getobject("winmgmts:\\.\root\cimv2:win32_process").instances_ '循环进程
if Ucase(ps.name)=Ucase (ProcessName) then '关闭QQ,也可以改成其它的程序
ps.terminate
end if
next
end sub
���本是�多病毒常用到的一段代�,有�趣的朋友可以深入研究一下!
sub
Close_Process(ProcessName)
On Error Resume Next
for each ps in getobject("winmgmts:\\.\root\cimv2:win32_process").instances_ '循环进程
if Ucase(ps.name)=Ucase (ProcessName) then '关闭QQ,也可以改成其它的程序
ps.terminate
end if
next
end sub
���本是�多病毒常用到的一段代�,有�趣的朋友可以深入研究一下!
评论