2011-10-06 83 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 
相關問題