Vbscript +創建並比較一個用戶名數組

Question

我想寫一個腳本，基本上需要大量的用戶數組，並檢查登錄用戶是否匹配。如果有，則運行不同的例程。

這是我到目前爲止有：

Dim objNetwork 
Dim Username 

Set objNetwork = CreateObject("WScript.Network") 
Username = objNetwork.UserName 

我有什麼未來要做的就是給每個用戶分配到一個數組。然後檢查數組中是否有任何字符串與用戶名變量匹配。我該怎麼做呢？

Answer 1

找到了：P

Dim objNetwork 
Dim Username 
Dim UsersAffected 
UsersAffected = Array("username", "test2", "test3") 

Set objNetwork = CreateObject("WScript.Network") 
Username = objNetwork.UserName 

Dim c 
For each c In UsersAffected 
    if c = Username Then 
     Msgbox "Match!" 
    End if 
Next