vbs rasdial与电话簿输入

时间:2013-03-27 11:10:18

标签: vbscript connect vpn

有人可以帮助我完成我的小项目。我没有得到正确的代码...

当标准电话簿正在使用时,使用用户名和通行证的rasdial工作。唯一的办法是在脚本中绑定另一个电话簿以拨打此电话。

这里是我的例子:

Set WshShell = WScript.CreateObject("WScript.Shell")

vbConnectionName = "test"
vbConnectionUser = "user"
vbConnectionPassword = "pass"
vbConnectWith = "rasdial" & " """ & vbConnectionName & """ """ & vbConnectionUser & """ """ & vbConnectionPassword & """ /phonebook:"%programfiles%\test program\rasphone.pbk""

我希望这是可以理解的。

1 个答案:

答案 0 :(得分:1)

引用最后一个参数是不正确的。你有这个:

... & """ /phonebook:"%programfiles%\test program\rasphone.pbk""

但你需要这个:

... & """ /phonebook:""%programfiles%\test program\rasphone.pbk"""

使用引用功能有助于避免引用:

Function qq(str)
  qq = Chr(34) & str & Chr(34)
End Function

'...

vbConnectWith = "rasdial " & qq(vbConnectionName) _
  & " " & qq(vbConnectionUser) _
  & " " & qq(vbConnectionPassword) _
  & " /phonebook:" & qq("%programfiles%\test program\rasphone.pbk")