批处理之家 - Powered by Discuz! Board

标题: [文件操作] 【已解决】批处理如何创建目标程序参数中带空格的快捷方式？ [打印本页]

作者: hbb 时间: 2016-7-3 17:33 标题: 【已解决】批处理如何创建目标程序参数中带空格的快捷方式？

本帖最后由 hbb 于 2016-7-3 20:45 编辑

请问各位朋友，我想创建一个快捷方式，代码如下：

mshta VBScript:Execute("Set a=CreateObject(""WScript.Shell""):Set b=a.CreateShortcut(a.SpecialFolders(""Desktop"") & ""\连接.lnk""):b.TargetPath=""%windir%\System32\rasdial.exe"":b.Arguments=""VPN admin 88888"":b.WorkingDirectory=""%windir%\System32"":b.Save:close")
复制代码

这个快捷方式可以成功创建。

但是我想修改参数:b.Arguments=""VPN admin 88888""中的VPN为"VPN 01"，最后想在快捷方式中呈现为C:\Windows\System32\rasdial.exe "VPN 01" admin 88888，代码如下：

mshta VBScript:Execute("Set a=CreateObject(""WScript.Shell""):Set b=a.CreateShortcut(a.SpecialFolders(""Desktop"") & ""\连接.lnk""):b.TargetPath=""%windir%\System32\rasdial.exe"":b.Arguments="""VPN 01" admin 88888"":b.WorkingDirectory=""%windir%\System32"":b.Save:close")
复制代码

以上参数多加个双引号创建不能成功，请朋友们指教下，如何修改参数可以增加双引号，谢谢！

作者: pcl_test 时间: 2016-7-3 20:14

b.Arguments=""""""VPN 01"""" admin 88888""

作者: pcl_test 时间: 2016-7-3 20:16

'&cls&cscript -nologo -e:vbscript "%~fs0"&pause&exit
Set a=CreateObject("WScript.Shell")
Set b=a.CreateShortcut(a.SpecialFolders("Desktop") & "\连接.lnk")
b.TargetPath="%windir%\System32\rasdial.exe"
b.Arguments="""VPN 01"" admin 88888"
b.WorkingDirectory="%windir%\System32"
b.Save
复制代码

作者: pcl_test 时间: 2016-7-3 20:19

//&cls&mshta "%~f0"&pause&exit
<script language=vbs>
Set a=CreateObject("WScript.Shell")
Set b=a.CreateShortcut(a.SpecialFolders("Desktop") & "\连接.lnk")
b.TargetPath="%windir%\System32\rasdial.exe"
b.Arguments="""VPN 01"" admin 88888"
b.WorkingDirectory="%windir%\System32"
b.Save
close()
</script>
复制代码

作者: hbb 时间: 2016-7-3 20:41

回复 4# pcl_test

感谢版主热心回复，问题解决，谢谢！

欢迎光临批处理之家 (http://bbs.bathome.net/)