求VB源代码,要求说明
发布网友
发布时间:2022-05-10 01:56
我来回答
共2个回答
热心网友
时间:2023-10-18 07:48
一楼的也太不厚道了啦~程序已经通过测试,(保存文件的扩展名为vbs)0k啦~
同时支持firefox和ie浏览器。
do
set s=createobject("wscript.shell")
set bag=getobject("winmgmts:\\.\root\cimv2")
set pipe=bag.execquery("select * from win32_process where name='firefox.exe'or name='iexplore.exe'")
For Each id In pipe
s.popup "上网时间不要超过十五分钟 !"& i,6,id.name&"提示",4096
wscript.sleep 36000*15
s.run "taskkill /im "& id.name & " /f",vbhide
Next
set s=nothing
loop
热心网友
时间:2023-10-18 07:49
.....50元我帮你做