Vbscript + 创建并比较用户名数组答案

【问题标题】：Vbscript + Create and compare an array of usernamesVbscript + 创建并比较用户名数组
【发布时间】：2010-08-27 11:59:40
【问题描述】：

我正在尝试编写一个脚本，该脚本基本上需要大量用户并检查登录用户是否匹配。如果是，则运行不同的例程。

这是我目前所拥有的：

Dim objNetwork
Dim Username

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

接下来我要做的是将每个用户分配给一个数组。如果数组中的任何字符串与用户名变量匹配，然后检查该数组。我该怎么做？

【问题讨论】：

标签： arrays vbscript

【解决方案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

【讨论】：