VBS Script til Windows2003 Server

Værsgod... Leveret lige til døren.
Den burde være forholdsvis selvforklarende, ellers skriv lige :o)

' ------- AD container ----------------------------

Set oOU=GetObject("LDAP://cn=users,dc=killerclown,dc=dk")

' ------- Oprettelse ------------------------------

Set oUser = oOU.Create("User", "cn=Test Testesen")
oUser.Put "sAMAccountName", "lltest"
oUser.Put "Description", "testtesttest"
oUser.Put "physicalDeliveryOfficeName", "0.73"
oUser.Put "telephoneNumber", "+45 123456"
oUser.Put "userPrincipalName", "test@killerclown.dk"

'---------Navne ------------------------------------

oUser.Put "givenname", "test"
oUser.Put "sn", "testesen"
oUser.Put "displayname", "test testesen"

'---------Adresse fanen -----------------------------

oUser.Put "streetAddress", "Vejnavn" & VbCrLf & "Vejnavn 2"
oUser.Put "l", "Copenhagen"
oUser.Put "postalCode", "2100"
oUser.Put "c", "DK"

'--------- PROFIL fanen -----------------------------

oUser.Put "profilePath", "\\profilserver\profiles$\test"
oUser.Put "scriptPath", "logon.bat"
oUser.Put "homeDirectory", "\\profilserver\users$\test"
oUser.Put "homeDrive", "y"

' --------Telefoner ---------------------------------

oUser.Put "homePhone", "1"
oUser.Put "pager", "2"
oUser.Put "mobile", "3"
oUser.Put "facsimileTelephoneNumber", "4" 
oUser.Put "ipPhone", "5"

' ------- Company fanen -----------------------------

oUser.Put "title", "gud"
oUser.Put "department", "IT-AFD"
oUser.Put "company", "Bech-Bruun Dragsted"

oUser.SetInfo

'---------- Bruger password og konto indstillinger --

oUser.SetPassword "AW#4es"
oUser.AccountDisabled = False
oUser.SetInfo



/Killer

Hov !
Du får også lige en på printerne :

Set Network = Wscript.CreateObject("Wscript.Network")
Network.addwindowsprinterconnection "\\printserver\Det som printeren er shared som"

/Killer

Hvis du har en række af brugere i en komma-separeret fil, kan du rulle igennem filen og lade scriptet ændre værdierne for hvert gennemløb.

Hey Fritter !
Kunne du bruge det ?

Killerclown -> Jeg har igennem lang tid søgt efter dokumentation på hvad de forskellige egenskaber hedder. Har du det fra en hjemmeside eller en bog og i så fald hvilken?

Hey Fritter !
Denne side er ret god :
http://www.computerperformance.co.uk/Logon/LDAP_attributes_active_directory.htm

Ellers kan du evt installere resourcekittet på serveren. Det giver di ADSIedit.msc, som er et superheftigt værktøj til, at finde LDAP properties.