24、VBScript在账户创建与日志分析中的应用

VBScript在账户创建与日志分析中的应用

1. VBScript创建管理员账户

在使用VBScript创建管理员账户时，涉及到多个关键函数和子例程。

1.1 MsgBox函数的参数

MsgBox()函数的第三个也是最后一个参数是cTitlebarMsg，它代表在脚本初始化部分定义的常量，用于指定脚本显示的所有弹出对话框的标准标题栏消息。

1.2 CreateAdminAcct子例程

CreateAdminAcct()子例程负责实际创建用户账户并将其添加到本地管理员组。它接受一个名为strNewAcctName的参数，该参数包含要创建的用户账户的名称。以下是该子例程的代码：

Sub CreateAdminAcct(strNewAcctName)
    Dim strPasswd
    Dim intCmdResult
    intCmdResult = 0
    strPasswd = GetValidPasswd()
    'Create the new account
    intCmdResult = WshShl.Run("net user " & strNewAcctName & " " & _
    strPasswd & " /add", 0)
    'Add the account to the local administrators group
    If intCmdResult = 0 then 
        intCmdResult= WshShl.Run("net