Hallo,
dies müßte der entscheidende Teil des Skripts sein:
Dim oUser
set oUser = oADSI.Create("user", "cn=strUser")
oUser.Put "Description", InputBox("Arbeitsgruppe eingeben", "Eingabe", "")
oUser.Put "FirstName", "sn=strFirstName"
oUser.Put "LastName", "strUser"
oUser.Put "FullName", "strFirstname" & " " & "strUser"
oUser.Put "Password", InputBox("Password:", "Eingabe", "")
oUser.Put "Profile", "userProfile"
oUser.Put "HomeDirDrive", "userDrive"
oUser.Put "homedirectory", "\\" & shareServer & "\" & shareName & "\" & strUser
oUser.Put "LoginScript", "strUser" & ".cmd"
oUser.setinfo
Weiter oben sind die variablen deklariert. Bin leider Neuling und der Dozent hat uns in der letzten Woche nur mit WinNT vertraut gemacht, aber LDAP verschwiegen.
Danke,
Frauke