Introduzione allo scripting per ADSI
Lo scripting è utile per gli amministratori di sistema che vogliono creare script batch per le attività usate di frequente.
Per avviare lo scripting con ADSI, è necessario disporre di un computer che esegue Windows o di essere connesso a un dominio che contiene i dati per gli account computer nella directory.
Esempio di scripting semplice: ricerca di nomi e posizioni degli account computer
Creare un nuovo file di testo usando un editor di testo. Nell'esempio di codice seguente viene illustrato come trovare nomi e percorsi degli account computer.
'---------------------------------------------------------------
' Returns the name and location for all the computer accounts in
' Active Directory.
'---------------------------------------------------------------
Const ADS_SCOPE_SUBTREE = 2
Set objConnection = CreateObject("ADODB.Connection")
Set objCommand = CreateObject("ADODB.Command")
objConnection.Provider = "ADsDSOObject"
objConnection.Open "Active Directory Provider"
Set objCommand.ActiveConnection = objConnection
objCommand.CommandText = "Select Name, Location from 'LDAP://DC=fabrikam,DC=com' " & "where objectClass='computer'"
objCommand.Properties("Page Size") = 1000
objCommand.Properties("Timeout") = 30
objCommand.Properties("Searchscope") = ADS_SCOPE_SUBTREE
objCommand.Properties("Cache Results") = False
Set objRecordSet = objCommand.Execute
objRecordSet.MoveFirst
Do Until objRecordSet.EOF
Wscript.Echo "Computer Name: " & objRecordSet.Fields("Name").Value
Wscript.Echo "Location: " & objRecordSet.Fields("Location").Value
objRecordSet.MoveNext
Loop
Salvare il file come First.vbs. Modificare la riga che inizia con "objCommand.CommandText" per modificare il percorso del dominio. Al prompt dei comandi digitare cscript First.vbs per una riga di comando o First.vbs per lo scripting di Windows. I risultati devono essere restituiti nel prompt dei comandi.
Per altre informazioni sull'esecuzione di script per ADSI, vedere Scripting delle interfacce del servizio Active Directory.