Question

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

这是我到目前为止所做的：

Dim objNetwork
Dim Username

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

接下来我要做的就是将每个用户分配给一个数组。然后检查该数组是否数组中的任何字符串与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

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

1 个答案: