VBscript for endring av parametre for bruker i AD

[JKJK]

Hei!

 

Trenger hjelp med å surre ihop et vbscript for å sette path på terminal services profile på en del brukere i active directory. iflg. denne guiden; er det følgende som skal til:

 

Set UserOBJ = GetObject("LDAP://cn=roger rabbit1,OU=skoler\xxx\ansatte\manuell,dc=mittdomene,dc=no")
UserOBJ.TerminalServicesProfilePath = "\\xxx-srv-02\%username%$\tsrvprofile"
UserOBJ.SetInfo
Wscript.Echo "Done"

 

Men får feil på linje 1, char1 når jeg prøver å kjøre scriptet på domenekontrolleren, så det må være noe jeg ikke har skjønt. Har ikke snøring på vbscripting i det heletatt.

 

Vil også at scriptet skal hente ut alle brukernavnene fra en fil. Kan noen hjelpe meg med dette?

 

Og btw... det haster

Endret 12. januar 2007 av JKJK

[_Nitro_]

Du har ikke definert variabel UserOBJ

 

Prøv med Dim UserOBJ i toppen av scriptet ditt.

[JKJK]

Dim UserOBJ
Set UserOBJ = GetObject("LDAP://cn=svgtest,OU=manuell,OU=ansatte,OU=xxx,OU=skoler,dc=mittdomene,dc=no")
UserOBJ.TerminalServicesProfilePath = "\\xxx-srv-02\%username%$\tsrvprofile"
UserOBJ.SetInfo
Wscript.Echo "Done"

 

sliter fortsatt

[JKJK]

Dim UserOBJ
Set UserOBJ = GetObject("LDAP://cn=bruker.navn,OU=ansatte,OU=xxx,OU=skoler,dc=mittdomene,dc=no")
UserOBJ.TerminalServicesProfilePath = "\\xxx-srv-02\%username%$\tsrvprofile"
UserOBJ.SetInfo
Wscript.Echo "Done"

 

Funker som snus! Takk nitro!