背景
あるフォルダ配下のファイルを取得して変数に格納。⇒それをFor文で回して同じ処理をしたいことがあった
ふつうの開発でよく使う配列はまず配列を定義する。
↓
変数一覧に登録するかぁ あれっ? 変数名に配列はどう書くんだ?
↓
Answer:普通に書く ex:test
test[]、test(5)、test(1 to 5)じゃないんだね
配列を初期化
Dim rootArray
arrayName = !配列名!
'ルート配列の存在確認
Set rootArray = WScript.CreateObject("Scripting.Dictionary")
rootArray.RemoveAll()
If rootArray.Exists(arrayName) Then
getArray = rootArray.Item(arrayName)
Erase getArray
rootArray.Remove arrayName
End If
↓
要素ごとに格納
以下のようにコメントアウトしないと、エラーが出る
格納
'入力チェック
'If (Len(arrayName) = 0) Then
' errorMsg = "配列名を入力してください"
' Err.Raise 1, "", errorMsg
' WScript.Quit
'End If