vbscript - CRT vbs スクリプトを使用してログ ファイルを作成する

Question

配列から入力を受け取るコマンドを送信するスクリプトを実行したいと考えています。配列の要素ごとに、印刷を別のログ ファイルに出力します。

これまでに作成したスクリプトは次のとおりですが、機能しません。送信された最後のコマンドの印刷のみを保存するようです。

どのようにそれを行う正しい方法でしょうか？

#$language = "VBScript"
#$interface = "1.0"

crt.Screen.Synchronous = True

Sub Main
  arr = "1,2,3"
  a = Split(arr, ",")

  For i = LBound(a) To UBound(a)
    crt.Session.Log False 'Turn off log session
    crt.Session.LogFileName = "C:\Users\Path\MyLogfile No." & a(i) & ".log"  'Define log file name
    crt.Session.LogUsingSessionOptions 'Turn on log session

    crt.Screen.Send "some command" & a(i) & ";" & Chr(13)  'Some command sent to each arr element, this part works fine
  Next

  crt.Session.Log False

  'Restore the default log file     
  crt.Session.LogFileName = "C:\Users\myuser\Documents\default.log"
End Sub