中国DOS联盟
-- 联合DOS 推动DOS 发展DOS --联盟域名：www.cn-dos.net 论坛域名：www.cn-dos.net/forum
|
中国DOS联盟-- 联合DOS 推动DOS 发展DOS --联盟域名：www.cn-dos.net 论坛域名：www.cn-dos.net/forum |
| 游客 | 登录 | 注册 | 会员 | 搜索 | 中国DOS联盟 |
|
中国DOS联盟论坛 现在时间是 2026-08-12 14:24 |
共 47,811 主题排行 / 349,897 发帖 / 今日 0 篇 / 48,256 会员排行 |
| DOS批处理 & 脚本技术（批处理室） » [求助]克盘后自动解锁万象脚本 |
| 可打印版本 1,098 / 5 |
| 第1楼 jycel | 发表于 2008-09-27 21:10 |
| 初级用户 发帖 46 积分 75 | |
|
[求助]克盘后自动解锁万象脚本 网吧克盘后,全部重启都是同一IP如果挨着挨着一个去解锁太麻烦了!不知道有没有方法可以自动解锁?在网上看到了一段VBS代码
Set tx=CreateObject("Wscript.Shell") Wscript.Sleep 8000 tx.SendKeys "{F3}" Wscript.Sleep 3000 tx.SendKeys "Password" Wscript.Sleep 3000 tx.SendKeys "{Enter}" Set fso=Wscript.CreateObject("scripting.FileSystemObject") fso.DeleteFile(Ws cript.scriptName) 运行后出错,不知道是不行还是怎么回事! 高手请帮帮忙哈!用的是万象最新版 |
|
| 第2楼 jycel | 发表于 2008-09-27 21:28 |
| 初级用户 发帖 46 积分 75 | |
|
查资料发现,有的Wscript是Ws cript但不管怎么改都会提示错误
|
|
| 第3楼 jycel | 发表于 2008-09-27 21:48 |
| 初级用户 发帖 46 积分 75 | |
|
终于搞定!
Set tx=CreateObject("Wscript.Shell") Wscript.Sleep 8000 tx.SendKeys "{F3}" Wscript.Sleep 3000 tx.SendKeys "qinghongjingyong" Wscript.Sleep 3000 tx.SendKeys "{Enter}" Set fso=Wscript.CreateObject("scripting.FileSystemObject") |
|
| 第4楼 sqwxd | 发表于 2009-09-10 00:02 |
| 新手上路 发帖 8 积分 10 | |
|
太好了~~
多谢你！！！ |
|
| 第5楼 image72 | 发表于 2009-10-25 22:28 |
| 新手上路 发帖 6 积分 6 | |
|
CreateObject("WScript.Shell").SendKeys "^{ESC}~"
着样不更好用~？ |
|
| 第6楼 zhxy9804 | 发表于 2009-10-28 20:23 |
| 中级用户 发帖 97 积分 208 | |
|
很好，对网吧维护很管用。
|
|
|
[ 联系联盟系统管理团队 -
中国DOS联盟 -
标准版 ] Sponsored by ifanr Inc | © 2001–2023 |