VBS调用CMD命令无法通过 - DOS批处理 & 脚本技术（批处理室） - 中国DOS联盟论坛

作者:

标题: VBS调用CMD命令无法通过

上一主题 | 下一主题

5872169
高级用户

积分 959
发帖 474
注册 2007-10-25
状态离线

『楼主』: 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

2008-10-31 12:21

查看资料发送邮件发短消息网志

编辑帖子回复引用回复

HAT
版主

积分 9023
发帖 5017
注册 2007-5-31
状态离线

『第 2 楼』:

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"

2008-10-31 12:25

查看资料发短消息网志

编辑帖子回复引用回复

5872169
高级用户

积分 959
发帖 474
注册 2007-10-25
状态离线

『第 3 楼』:

我想用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%

2008-10-31 13:27

查看资料发送邮件发短消息网志

编辑帖子回复引用回复