0

次のような vbs コードがあります。

Message4 = "Please enter Check Out Path"           
 Title4 = "Check Out Path "
 variable1 = InputBox(Message4, Title4,"", 4500, 4500)

 Message5 = "Please enter SVN URL"           
 Title5 = "SVN URL "
 variable2 = InputBox(Message5, Title5, "", 4500, 4500)

 Folder\batchfile.bat"""
 objWshell.Run "batxhfile.bat"

また、名前付きのバッチファイルbatchfile.bat

@echo off

Color 42
 echo. [ SVN Updater ]

set Checkout_path=checkout path
set SVN=C:\Program Files\TortoiseSVN\bin
set svn_url=SVN path

 echo. Updating %Checkout_path% to SVN...
"%SVN%\TortoiseProc.exe" /command:checkout /url:"%svn_url%" /path:"%Checkout_path%" /closeonend:2
 echo. done.
 echo.
echo. Operation complete.

variable1ここで、vbs コードの値とvariable2vbs コードの値をバッチ ファイルの代わりに渡したいと思います。多くの方法を試しましたがcheckout path、svn pathplz ヘルプまで成功しませんでした。

4

1 に答える 1

0

VBS から単に「TortoiseProc.exe」を呼び出さない理由には同意しますが、バッチ スクリプトを介して呼び出す理由があるかもしれません。VBS から引数をバッチに渡すだけです。

`Const ERR_SUCCESS = 0
Const BAT_SCRIPT = "<folder>\batchfile.bat"
Dim oWSH, sCmd, iRC, sVar1, sVar2
Set oWSH = WScipt.CreateObjects("WScript.Shell")
Do While sVar1 <> ""
  sVar1 = InputBox("Please enter Check Out Path", "Check Out Path", 4500, 4500)
Loop
Do While sVar2 <> ""
  sVar2 = InputBox("Please enter SVN URL", "SVN URL", 4500, 4500)
Loop  
sCmd = "cmd.exe /c """ & BAT_SCRIPT & "" "" & sVar1 & "" "" & sVar2 & """" 
WScript.Echo "COMMAND: sCmd"
On Error Resume Next
iRC = oWSH.Run(sCmd, 0, True)
If iRC <> ERR_SUCCESS And Err.Number <> ERR_SUCCESS Then 
  MsgBox "ERROR: [" & Err.Source & "] " & CStr(Err.Number) & " - " & Err.Description & vbCrLf & _
         "       '" & BAT_SCRIPT "' return code = '" & CStr(iRC) & "' from command:" & vbCrLf & _
         "       COMMAND:  " & sCmd, vbOkOnly, "Batch Script Error"
End If
Err.Clear
Set oWSH = Nothing`

結果のバッチ スクリプト コマンドは、次のように呼び出す必要があります。
cmd.exe /c "<folder>\batchfile.bat" "<var1>" "<var2>"

バッチ スクリプトが引数を収集し、文字列の二重引用符を削除し、正しく検証されることを確認します。

`set Checkout_path=%1
set Checkout_path=%Checkout_path:~1,-1%
set svn_url=%2
set svn_url=%svn_url:~1,-1%
if /i "%Checkout_path%" ne "" (
  exit /b 99
)
if /i "%svn_url%" ne "" (
  exit /b 99
)`

お役に立てれば ;）

于 2012-08-12T01:15:44.997 に答える