06/10/18 15:06:25 Ajj1Eguz0
WSHを利用するVBスクリプトファイル(*.vbs)の場合、こんな感じかな。
ファイルやフォルダの名前に空白などの記号が含まれていても正常に使えるはず。
Option Explicit
Dim WS,FS,Ag,RT,i,FL
Set WS = CreateObject("WScript.Shell")
Set FS = CreateObject("Scripting.FileSystemObject")
Set Ag = WScript.Arguments
If Ag.Count > 0 Then
For i = 0 to corArgs.Count - 1
FL = Chr(34) & FS.GetAbsolutePathName(Ag(i)) & Chr(34)
RT = WS.Run("C:\Program Files\Unlocker\Unlocker.exe " & FL & " /S" , 1, true)
Next
End If
Set Ag = Nothing
Set FS = Nothing
Set WS = Nothing
WScript.Quit()
ちなみにバッチファイル(*.bat)の場合、ファイルやフォルダの名前に空白などの記号が含まれていると
XPより前に発売されたWindowsでしか動かないようだ。