vbscript - VBS AD からコンピュータ OU を取得し、OU ケース ステートメントでアクションを実行する

Question

ScriptIT 担当者からこのコードを入手しました。

Set objSysInfo = CreateObject("ADSystemInfo")
strComputer = objSysInfo.ComputerName
Set objComputer = GetObject("LDAP://" & strComputer)
arrOUs = Split(objComputer.Parent, ",")
arrMainOU = Split(arrOUs(0), "=")
wscript.echo arrMainOU(1)

私が抱えている問題は、arrMainOU(1) が OU を 2 回エコーすることです。簡単なテストを設定しようとしましたが、失敗します。この問題がここやグーグルでカバーされているとは思いません。

If arrMainOU(1) = "myOU" Then
wcript.echo "true"
End If

arrMainOU(1) 内の 1 つの値を OU 文字列を含む配列と比較する必要があります。OU1 か OU2 かなどに応じてアクションを実行する case ステートメントが必要です。

ただし、arrMainOU(1) の評価に行き詰まっています。値をファイルに出力すると、1 つの値だけが書き込まれます。

助けていただければ幸いです - ありがとう