中国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-11 22:47 |
共 47,811 主题排行 / 349,897 发帖 / 今日 0 篇 / 48,256 会员排行 |
| DOS批处理 & 脚本技术（批处理室） » 为什么我的vbs脚本在我系统不能实现待机 |
| 可打印版本 922 / 9 |
| 第1楼 yufalai | 发表于 2009-06-04 08:14 |
| 新手上路 发帖 6 积分 6 | |
|
为什么我的vbs脚本在我系统不能实现待机 set WshShell = CreateObject("WScript.Shell")
WshShell.SendKeys "^{ESC}u" WshShell.SendKeys "S" 在以前的系统可以 现在不能 |
|
| 第2楼 slore | 发表于 2009-06-04 11:44 |
| 铂金会员 发帖 2,478 积分 5,212 | |
|
开始菜单上有S开头的？
还是要小写s？ 用VBS的话打开对话框还是不要用sendkeys Dim ShellApp,WshShell Set WshShell = CreateObject("WScript.Shell") Set ShellApp = CreateObject("Shell.Application") ShellApp.ShutdownWindows() WshShell.Sendkeys "s" |
|
| 第3楼 wl00560 | 发表于 2009-06-04 12:26 |
| 银牌会员 发帖 709 积分 1,384 | |
|
你文件的意思是：启动开始菜单，然后再按u与s……
这个在Windows XP下没问题，可是别的系统就不见得是这些键了，如Windows Server 2003…… |
|
| 第4楼 yufalai | 发表于 2009-06-05 00:36 |
| 新手上路 发帖 6 积分 6 | |
|
我现在用的也是xp
开始菜单是一样的 就是不能用 具体是能 按出win键 但是u键就没有按出来 |
|
| 第5楼 yufalai | 发表于 2009-06-05 00:41 |
| 新手上路 发帖 6 积分 6 | |
|
2楼的能执行win键+u键
但是没有执行s |
|
| 第6楼 slore | 发表于 2009-06-05 01:08 |
| 铂金会员 发帖 2,478 积分 5,212 | |
|
2楼的能执行win键+u键
不是执行win+U 是直接调用了关机对话框 我随便写的。。。 这个我有不能试。。。 S可以么？ 或者是需要延时下。。。sendkeys太快了？你的对话框还没有出来？ alt+s sendkeys 怎么表示alt忘了，你自己查下。 。。。 |
|
| 第7楼 yufalai | 发表于 2009-06-05 03:00 |
| 新手上路 发帖 6 积分 6 | |
|
就是s没执行
delay也不行 |
|
| 第8楼 slore | 发表于 2009-06-05 16:55 |
| 铂金会员 发帖 2,478 积分 5,212 | |
|
你查下 alt+S。。。
|
|
| 第9楼 slore | 发表于 2009-06-06 01:58 |
| 铂金会员 发帖 2,478 积分 5,212 | |
|
测试成功 Dim ShellApp,WshShell
Set WshShell = CreateObject("WScript.Shell") Set ShellApp = CreateObject("Shell.Application") ShellApp.ShutdownWindows() WSH.Sleep 1000 '延时1秒 WshShell.Sendkeys "s" |
|
| 第10楼 yufalai | 发表于 2009-06-09 12:41 |
| 新手上路 发帖 6 积分 6 | |
|
thank you very much!
|
|
|
[ 联系联盟系统管理团队 -
中国DOS联盟 -
标准版 ] Sponsored by ifanr Inc | © 2001–2023 |