中国DOS联盟论坛

中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --
联盟域名:www.cn-dos.net 论坛域名:www.cn-dos.net/forum
游客 | 登录 | 注册 | 会员 | 搜索 | 中国DOS联盟
中国DOS联盟论坛
现在时间是 2026-08-05 07:59
48,038 主题排行 / 350,123 发帖 / 今日 0 篇 / 48,251 会员排行
DOS批处理 & 脚本技术(批处理室) » 请帮我看下这段批处理用VBS怎么写``
可打印版本  746 / 0
第1楼 fengzi 发表于 2007-07-08 19:06
中级用户 发帖 152 积分 315
请帮我看下这段批处理用VBS怎么写``
:kaishi
ping -n 30 127.0.0.1
tasklist | find /i "ssp.exe" >nul 2>nul || shutdown /s /t 30
goto kaishi


可不可以加到其他的VBS里面``功能不变
set Ws = WScript.CreateObject("WScript.Shell")
count=0
for each ps in getobject("winmgmts:\\.\root\cimv2:win32_process").instances_
if ps.name="wscript.exe" then count=count+1
next
if count > 2 then wscript.quit
i=1
for i = 1 to 3
i=i-1
WScript.Sleep(1000*60*0.1)
ws.run "arp -s 192.168.0.1 00-e0-4c-39-70-9e",0
next
[ 联系联盟系统管理团队 - 中国DOS联盟 - 标准版 ]
Sponsored by ifanr Inc | © 2001–2023