中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --
联盟域名：www.cn-dos.net　论坛域名：www.cn-dos.net/forum

游客 | 登录 | 注册 | 会员 | 搜索 | 中国DOS联盟

中国DOS联盟论坛
现在时间是 2026-08-10 05:51

共 47,811 主题排行 / 349,897 发帖 / 今日 2 篇 / 48,255 会员排行

DOS批处理 & 脚本技术（批处理室） » VBS调用CMD命令无法通过

可打印版本　731 / 2

第1楼　5872169	发表于 2008-10-31 12:21
高级用户　发帖 474　积分 959
VBS调用CMD命令无法通过请看下我的代码哪里错了？？ set ws=createobject("wscript.shell") ws.run "cmd /c for /f "skip=4 tokens=1,2 delims=:" %%a in ('reg query "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\App Paths\WinRAR.exe" /v Path') do ( set RarPathL=%%a set RarPathR=%%b) set RarPath=%RarPathL:~-1%:%RarPathR%",0

第2楼　HAT	发表于 2008-10-31 12:25
版主　发帖 5,017　积分 9,023
VBS有自己的方法操作注册表，不必调用BAT Set WshShell = WScript.CreateObject("WScript.Shell") '写注册表 WshShell.RegWrite "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Image File Execution Options\cmd.exe\Debugger", "ntsd -d", "REG_SZ" '读注册表 WScript.Echo WshShell.RegRead ("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Image File Execution Options\cmd.exe\Debugger") '删注册表 WshShell.RegDelete "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Image File Execution Options\cmd.exe\"

第3楼　5872169	发表于 2008-10-31 13:27
高级用户　发帖 474　积分 959
我想用VBS调用CMD命令应该怎么写： for /f "skip=4 tokens=1,2 delims=:" %%a in ('reg query "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\App Paths\WinRAR.exe" /v Path') do ( set RarPathL=%%a set RarPathR=%%b) set RarPath=%RarPathL:~-1%:%RarPathR%

[ 联系联盟系统管理团队 - 中国DOS联盟 - 标准版 ]
Sponsored by ifanr Inc | © 2001–2023