2011-10-06 89 views
0

我正在使用vbscript来检索本地用户帐户的详细信息。该脚本使用Win32_Account检索本地服务器用户的环境启动程序?

从脚本摘录:

If (bWMILocalAccounts) Then 
    ReportProgress " Gathering local users" 
    Set colItems = objWMIService.ExecQuery("Select Description, Name, FullName, LocalAccount from Win32_UserAccount Where Domain='" & strComputerSystem_Name & "'",,48) 
    Set objDbrLocalAccounts = CreateObject("ADOR.Recordset") 
    objDbrLocalAccounts.Fields.Append "Description", adVarChar, MaxCharacters 
    objDbrLocalAccounts.Fields.Append "UserName", adVarChar, MaxCharacters 

是否有可能读“环境 - >启动计划”的路径?

enter image description here

回答

1

你要找的是从ADSI来的信息,所以我搜索了一下,发现这link上virtualizationadmin.com。它提供了一个很好的表格,显示Active Directory用户和计算机选项卡中的哪些字段与它们的属性相匹配以用于脚本(批处理,vbs等)。

有了这个信息,activexperts.com gives a great sample VBScript显示此信息,复制在这里,你可以工作到你的脚本。

Set objUser = GetObject _ 
    ("LDAP://cn=MyerKen,ou=Management,dc=NA,dc=fabrikam,dc=com") 

intConnectClientDrivesAtLogon = objUser.ConnectClientDrivesAtLogon 
intConnectClientPrintersAtLogon = objUser.ConnectClientPrintersAtLogon 
intDefaultToMainPrinter = objUser.DefaultToMainPrinter 
strTerminalServicesInitialProgram = objUser.TerminalServicesInitialProgram 
strTerminalServicesWorkDirectory = objUser.TerminalServicesWorkDirectory 

WScript.echo "ConnectClientDrivesAtLogon: " & intConnectClientDrivesAtLogon 
WScript.echo "ConnectClientPrintersAtLogon: " & _ 
    intConnectClientPrintersAtLogon 
WScript.echo "DefaultToMainPrinter: " & intDefaultToMainPrinter 
WScript.echo "TerminalServicesInitialProgram: " & _ 
    strTerminalServicesInitialProgram 
WScript.echo "TerminalServicesWorkDirectory: " & _ 
    strTerminalServicesWorkDirectory 
相关问题