Nu er min postkasse efterhånden godt fyldt op med ønsker om et script til oprettelse af mange brugere i Active Directory.
Jeg gav mig derfor i kast med denne artikel, der beskriver hvordan dette nemt og enkelt kan implementeres.
Inden du afvikler scriptet
Scriptet findes til download i to udgaver. En udgave til afvikling på Windows 2000 server og en anden udgave til afvikling på en Windows 2003 server.
Scriptet skal afvikles på domain controlleren.
Der er et par variabler i scriptet der skal tilpasses inden du afvikler scriptet:
Const Domain = "testdom"
Const Domainroot ="dk"
Const Hjemmemappe = "dokumenter$"
Const Profilmappe = "profiler$"
Const TSProfilmappe = "TSProfiler$"
Const LoginScript = "Loginscripts$"
Const Server = "jupiter"
Const StiTilFil = "c:autoscriptsbrugere.csv"
Hvad gør scriptet?
Scriptet opretter brugere og mapper ud fra en kommasepareret tekstfil når det afvikles. Mapperne oprettes dog først når de nyoprettede brugere logger på domænet.
Det eneste du altså skal gøre for at benytte scriptet er at ændre variablerne i opretbruger.vbs filen, tilføje dine brugere i brugere.csv filen og herefter køre opretbrugere.vbs.
Tekstfilen med brugere
Tekstfilen med brugerne har følgende format:
Per;01-01-2004;Administrator;hemmelig;Per;Schulze;administrators
Jens Hansen;01-01-2005;Elev;minadgangskode;Jens;Hansen;Elever
Kurt Ravn;01-01-2006;Elev i femte;adgangskode;Kurt;Ravn;Elever
Som du kan se er tekstfilen med brugere ret nem at overskue.
Felterne er:
LogonNavn;Udløbsdato;Beskrivelse;adgangskode;Fornavn;Efternavn;Gruppe
Felterne er afgrænset med ;
Tekstfilen kan, hvis det ønskes, redigeres i Excel, åben den dog efterfølgende i notepad og sikre dig at feltnavnene ikke står i første linie. Gør de det skal du slette dem.
Grupperne som er angivet i sidste kolonne, skal være oprettet i Active Directory før scriptet afvikles.
Er du ikke medlem endnu?
Se hvorfor du bør tegne et medlemskab eller bestil straks et medlemskab.
Hej!
Tak for mange gode tips og trics – Jeg har været abonnent på serverguider.dk og også tidlige købt medlemskab på videoerne.
Jeg har downloaded programmet, lavet brugerfil, rettet variable og kørt programmet.
Men desværre kommer der en fejlmeddelelse, som fortæller, at der er en fejl.
Jeg kan ikke selv finde ud af, hvilken linje der henvises til. – Line 32 Char 3 Error: An invalid directory pathname was passed. -Jeg har tjekket flere gange, og synes, at alle mapper er oprettet og delt og at der ikke skulle være fejl i de variable.
Hilsen Anne Birthe
Hej
Hvad står der i den pågældende i dit script?
Hej igen
Se, det er det, der er problemet. Jeg ved ikke, hvorfra jeg skal tælle 32 linjer.
Jeg har tænkt mig frem til, at der måske kan være en forkert henvisning til sys.vol, som ligger på et andet drev end c-drevet, men jeg kan ikke læse noget om det i scriptet.
Jeg er altså ikke nogen ørn til det med scripts.
Hilsen Anne Birthe
Jeg får også fejlmeldinger.`Hvis man skal tælle fra toppen af scriptet har jeg problemer med linjen:
Set adsGroup = GetObject("winnt://" & Domain & "." & Domainroot & "/" & arrInput(6) & "")i char 3. ("unspecified error")
Kan det være fordi min windows mappe simpelthen hedder c:\
Hej
Det er fordi du ikke har oprettet grupperne som står i arrinput6 i din csv fil. F.eks. har du måske elever stående som gruppe. Denne gruppe skal være oprettet i Active directory før du afvikler scriptet.
Jeg har opdateret artiklen med de relevante informationer.
Hej
OU er oprettet "i roden" af AD, men nu melder den fejl i char 2, error code 80004005. Det er som om den ikke kan finde stien til ou, eller hva? jeg kan ikke få øje på fejlen. Har du et godt bud?
Hej
Jeg taler ikke om OU'er men om grupper. Højreklik og vælg New group kald den det samme som du har kaldt gruppen i din csv-fil.
Hej
Jeg oprettede en gruppe under grupper – det virkede ikke. Jeg prøvede under Users. Det virkede heller ikke. Og de hedder det samme i csv filen og i AD.
Jeg kan ikke vedhæfte fejlmeldingen, men der står
Line: 33Char: 3Error: Unspecified error
Code: 8000405
Source: (null)
Det skulle være, som jeg kan tælle mig frem til, denne linje:
Set adsGroup = GetObject(”winnt://” & Domain & “.” & Domainroot & “/” & arrInput(6) & “”)
Lige til de nysgerrige
.Jeg løste Carsten's problem ved at rette lidt i scriptet. Hans forgænger havde lavet nogle tilpasninger der ikke var helt korrekte.