i = 1
  Do
    s = MeltCmdLine( cmdline, i )
    If i = 0 Then Exit Do
  Loop

サンプル

コマンドラインの１項目を取り出し、通常の文字列に戻す。

Function  ArrayFromBashCmdLine( CmdLine as string ) as array of string

bash シェルのコマンドラインの１行を解析して、それぞれの項目を配列に格納する。

ArrayFromCmdLine

の bash 版です。

→ T_CmdLine.vbs # [T_ArrayFromBashCmdLine]

テスト

Function  MeltBashCmdLine( Line as string, in_out_Start as integer ) as string

MeltCmdLine

Function  ParseCmdLine( CmdLine as string ) as CmdLineArgs

Function  CmdLineFromStr( Str as string or array ) as string

文字列、または文字列の配列から、コマンドラインを作成します。

【引数】

Str

文字列、または文字列の配列

返り値

コマンドライン

ファイル：

Function  GetCmdLine() as string

現在のスクリプトを起動したときのコマンドラインを返します。

(src)

実行ファイル名と、パラメーターの両方を含みます。

関連

→ WScript.Arguments

→ ParseCmdLine

→ g_debug_params

Function  ArgumentExist( Name as string ) as boolean

【引数】

Name

コマンドライン・オプション名

返り値

オプションが指定されているかどうか

指定した名前のコマンドライン・オプションが指定されているかどうかを返します。

/Opt1:1 ではなく /Opt1 では、WScript.Arguments.Named.Item("Opt1") は
Empty を返し、/Opt1 を指定しなかったときと、区別ができません。
ArgumentExist は、区別ができます。
Name の大文字小文字は区別します。

→ パラメータを取得する (VBS)

(src)

Function  GetCommandLineOptionName( OneParameter as string ) as string

オプション名＋値から、オプション名を返します。

【引数】

OneParameter

返り値

オプション名＋値

オプション名

サンプル：

Function  GetCommandLineOptionValue( OneParameter as string ) as string

オプション名＋値から、値を返します。

【引数】

OneParameter

返り値

オプション名＋値

値

サンプル：

Function  ModifyCmdLineOpt( CmdLine as string,
            OptionName as string, NewOptionNameAndParam as string ) as string

【引数】

CmdLine

NewOptionNameAndParam

コマンドラインの１行

オプション名と、変更後の値。 削除=Empty

OptionName

オプション名

（出力） 変更後のコマンドラインの１行

返り値

Sub  include( path as string )

path に環境変数を含めることができます。 （%var% 形式）
クラス定義や関数定義が入った VBS ファイルのパスを指定します。

VBS ファイルで定義されたグローバル変数や関数は、include を呼び出した
関数の外から参照することはできません。

Sub  Test_start( tests )
  Set section = new SectionTree
'//SetStartSectionTree  "T_Sample2"  '// 一部のセクションだけ実行するときは有効にする

  If section.Start( "T_Sample1" ) Then
      '// ここは実行されません
  End If : section.End_

  '// section.Start 〜 End_ の外は、常に実行する

  If section.Start( "T_Sample2" ) Then
      '// ここから実行されます
  End If : section.End_  '// ここで、「終了しました」と確認メッセージが表示される

  If section.Start( "T_Sample2" ) Then
      '// ここも実行されます
  End If : section.End_
  Pass
End Sub

サンプル

T_Sample2

Start

End_

(src)

SetStartSectionTree

ネストしているとき

サンプル

Function  SectionTree::Start( SectionName as string ) as boolean

セクションの開始を指定します。

ファイル：

Sub  SectionTree::End_()

セクションの終了を指定します。

ファイル：

<SectionTree CurrentSectionNames="Sec1"/>

Sub  EchoTestStart( TestSymbol as string )

テストシンボルをエコー出力します。

SkipToSection  Array( 5, 2 )

サンプル： セクション番号 5,2 から実行する（ 5,1 より前は実行をスキップする。）

Function  SkipSection::Start() as boolean

Sub  SkipSection::End_()

参考

→ SkipSection::Start

Function  NotSkipSection() as boolean

本関数を呼び出した場所をセクションの開始場所とします。

【引数】

返り値

SkipToSection で設定されたセクション以降かどうか

サンプル：

Sub  SetBreakAtSection( Num )

指定のセクションでブレークするようにします。

(src)

Function  call_vbs( path as string, func as string, param as variant )

指定した VBScript ファイルの中の関数を呼び出し、終了するまで待ちます。

【引数】

path

func

VBScript ファイルのパス

呼び出す関数の名前

path に環境変数を含めることができます。 （%var% 形式）

関数に渡すパラメータ

param

関数の返り値

返り値

現在のプロセスのまま、別の .vbs ファイルを呼び出します。

(src)

→ コールや include を相対パスで指定するときの注意

グローバル変数は、呼び出し先で宣言したものが、使えるようになります。

呼び出し先に関数を実行するときのカレントフォルダは、そのスクリプト
ファイルがあるフォルダになります。

path に相対パスを指定するときは注意が必要です。