基本的には、[Enter] や [ファイルの実行] などで、ファイルを実行できる のであまり意味が無いかも知れませんが、ショートカットファイルなども実行 できます。

***** RunFile.vbs *****

'////////////////////////////////////////////////////////////////////
'//
'//     ファイルを実行する
'//
'//                                                 2004年12月17日
Option Explicit
Dim args
Dim objWS

'// 実行ファイルが指定されていなければ、終了
Set args = Wscript.Arguments
If args.Count = 0 Then
    MsgBox "実行ファイルが指定されていません。",48
    WScript.Quit
End If

'// ファイルを実行する
Set objWS = CreateObject("WScript.Shell")
objWS.Run args.Item(0)


【ランチャー設定例】




戻る