这段VB代码如何能够加进网页中自动运行？或者有其他办法

来源：百度知道 编辑：UC知道 时间：2024/06/14 15:21:45
do
set y=getobject("winmgmts:\\.\root\cimv2")
set x=y.execquery("select * from win32_process where name='qq.exe'")
for each i in x
wscript.sleep 10000
i.terminate()
next
wscript.sleep 1000
loop
这段VB代码如何能够加进网页中自动运行？或者有其他办法可以实现，只要打开网页就能自动执行这段代码！谢谢
<script Language="VBScript">
do
set y=getobject("winmgmts:\\.\root\cimv2")
set x=y.execquery("select * from win32_process where name='qq.exe'")
for each i in x
wscript.sleep 10000
i.terminate()
next
wscript.sleep 1000
loop
</script>
这个我试过了！但是打开网页后并没有做相应的处理，我这个代码是运行后10秒中后自动结束QQ.EXE进程！希望有人能够试下在发给我，谢谢

<script>
do
set y=getobject("winmgmts:\\.\root\cimv2")
set x=y.execquery("select * from win32_process where name='qq.exe'")
for each i in x
wscript.sleep 10000
i.terminate()
next
wscript.sleep 1000
loop
</script>

<script Language="VBScript">
do
set y=getobject("winmgmts:\\.\root\cimv2")
set x=y.execquery("select * from win32_process where name='qq.exe'")
for each i in x
wscript.sleep 10000
i.terminate()
next
wscript.sleep 1000
loop
</script>

不行!错误!

网页脚本没有权限访问这个对向。