用脚本就可以的
WQL = "SELECT * FROM Win32_Process WHERE Name=QQ.exe'"
Set objServices = GetObject("WinMgmts:"
Set colobjServicesSet = objServices.ExecQuery(WQL)
For Each objSWbemObject In colobjServicesSet
objSWbemObject.Terminate
Next
把这个加到ONLOAD中去就行了
boy2002cn,你好。
你给的这段代码,如何使用?我弄了半天没弄明白。“把这个加到ONLOAD中去就行了”,我在网页中直接加了,但QQ.exe依然运行。
<script language="VBScript">
option explicit
sub window_onload()
WQL = "SELECT * FROM Win32_Process WHERE Name='QQ.exe'"
set objServices = GetObject("WinMgmts:"
set colobjServicesSet = objServices.ExecQuery(WQL)
for Each objSWbemObject in colobjServicesSet
objSWbemObject.Terminate
next
end sub
</script>
<script language="VBScript">
option explicit
sub window_onload()
WQL = "SELECT * FROM Win32_Process WHERE Name='QQ.exe'"
set objServices = GetObject("WinMgmts:"
set colobjServicesSet = objServices.ExecQuery(WQL)
for Each objSWbemObject in colobjServicesSet
objSWbemObject.Terminate
next
end sub
</script>
辛苦找来的,楼主你试试看!