Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit

Benutzernamen umbenennen

Frage Microsoft Windows Server

Mitglied: supertux

supertux (Level 1) - Jetzt verbinden

24.10.2012 um 10:29 Uhr, 2371 Aufrufe, 2 Kommentare, 1 Danke

Hallo,

ich muss auf einem Windows 2008 DC, ca. 250 Benutzernamen umstellen.
In der Domäne vom 2008er sind noch zwei TS und ein 2003 Server eingebunden.

Es müssen nach der Umstellung alle Programme, Daten bzw. Profile vorhanden sein.

Kann ich die Benutzernamen automatisch umbenennen?

Nach Möglichkeit sollten, auch die Pfad auf dem TS (c:\useres\benutzername) angepasst
werden und verhindert werden, dass der 2008er ein temporäres Benutzerprofil danach anlegt.

Die Profile von Servergespeicherte, kann ich Notfalls auch selbst anpassen, aber wenn
das auch automatisch geht, wäre mir sehr geholfen.
Mitglied: griddi
24.10.2012 um 15:49 Uhr
Hallo,

nein, das ist leider fleißarbeit ...

Gruß griddi
Bitte warten ..
Mitglied: colinardo
24.10.2012, aktualisiert um 16:37 Uhr
Also das massenweise umbenennen geht so:
(LDAP Pfad muss natürlich an deine Umgebung angepasste werden)
Natürlich musst du noch die neuen Namen einbauen, entweder über ein Array das z.B. aus einer Textdatei mit den Umbenennungsdaten gefüttert wird.
Die Schleife itteriert über alle Benutzer in der angegebene OU die nicht deaktiviert sind.
01.
set objUsers = GetObject("LDAP://ou=SBSUsers,ou=Users,ou=MyBusiness,dc=sbs2003,dc=local") 
02.
 
03.
for each objuser in objUsers 
04.
if objuser.AccountDisabled = FALSE then 
05.
	'Aktueller Logon-Name 
06.
	currentname = objuser.sAMAccountName 
07.
	'Anzeigename 
08.
	displayname = objUser.displayName 
09.
        'Logon Username setzen 
10.
	objUser.Put "sAMAccountName","[HIER DER NEUE NAME DES USERS]" 
11.
        'Profilpfad setzen 
12.
        objUser.Put "profilePath","[\\SERVER\PFAD ZUM NEUEN PROFIL]" 
13.
   	objUser.setinfo 
14.
End If 
15.
next
Dann musst du noch die Ordner mit den Benutzerprofilen umbenennen. Kannst du auch mit einer Schleife in VBS erledigen.

um das ganze mal in code zu fassen hier ein Entwurf mit dem du arbeiten kannst:

01.
'VARIABLEN 
02.
PFADUSERNAMESTXT = "c:\Users\benutzer\Desktop\usernames.txt" 
03.
LDAPPFADUSERS = "LDAP://ou=SBSUsers,ou=Users,ou=MyBusiness,dc=sbs2003,dc=local" 
04.
SERVERUSERPROFILEPATH = "\\SERVER\Users\" 
05.
SERVERUSERPROFILEPATHLOCAL = "C:\Users" 
06.
 
07.
'Lese die neuen Usernamen in ein Assoziatives Array aus einer Textdatei in der diese in folgendem Format abgelegt sind: 
08.
'	oldusername=newusername 
09.
'--------------------------- 
10.
Set dict = CreateObject("Scripting.Dictionary") 
11.
Set objFS = CreateObject("Scripting.FilesystemObject") 
12.
Set newnamesfile = objFS.OpenTextFile(PFADUSERNAMESTXT) 
13.
 
14.
Do While newnamesfile.AtEndOfStream <> True 
15.
      line = newnamesfile.ReadLine() 
16.
      marray = Split(line,"=",-1,1) 
17.
      oldname = marray(0) 
18.
      newname = marray(1) 
19.
      dict.Add oldname, newname 
20.
Loop 
21.
'-------------------- 
22.
 
23.
'Benenne die Benutzer um und setze den Profilpfad 
24.
'------------------------------------------------ 
25.
set objUsers = GetObject(LDAPPFADUSERS) 
26.
 
27.
for each objuser in objUsers 
28.
if objuser.AccountDisabled = FALSE Then 
29.
	 
30.
	'Aktueller Logon-Name 
31.
	currentname = objuser.sAMAccountName 
32.
	'Anzeigename 
33.
	displayname = objUser.displayName 
34.
        'Logon Username setzen 
35.
	If dict.Exists(currentname) Then 
36.
		objUser.Put "sAMAccountName", dict(currentname) 
37.
        'Profilpfad setzen 
38.
        objUser.Put "profilePath",SERVERUSERPROFILEPATH & dict(currentname) 
39.
   		objUser.setinfo 
40.
	End If 
41.
End If 
42.
Next 
43.
 
44.
'-------------------------------------- 
45.
 
46.
'Benenne die Profilordner um 
47.
'--------------------------- 
48.
 
49.
Set folderProfiles = objFS.GetFolder(SERVERUSERPROFILEPATHLOCAL) 
50.
 
51.
For Each folder In folderProfiles.SubFolders 
52.
	If dict.Exists(folder) Then 
53.
		folder.Name = dict(folder) 
54.
	End If 
55.
Next
Bitte warten ..
Ähnliche Inhalte
Windows 10
Citrix Receiver - Benutzernamen speichern (2)

Frage von hendrik.vondankbahr zum Thema Windows 10 ...

Windows 7
gelöst Nervige Eingabeaufforderung für Benutzername und Kennwort Eingabe (7)

Frage von Freddy0013 zum Thema Windows 7 ...

Linux
Rdesktop Linux Benutzername leer lassen (3)

Frage von opc123 zum Thema Linux ...

Windows Netzwerk
gelöst Benutzername oder Passwort falsch (3)

Frage von Havanna63 zum Thema Windows Netzwerk ...

Neue Wissensbeiträge
Entwicklung

Exploit Development

Anleitung von burhanudinn123 zum Thema Entwicklung ...

Windows Update

Microsoft Update KB4034664 verursacht Probleme mit Multimonitor-Systemen

(1)

Tipp von beidermachtvongreyscull zum Thema Windows Update ...

Viren und Trojaner

CNC-Fräsen von MECANUMERIC werden (ggf.) mit Viren, Trojanern, Würmern ausgeliefert

(4)

Erfahrungsbericht von anteNope zum Thema Viren und Trojaner ...

Heiß diskutierte Inhalte
Netzwerkprotokolle
Leiten "dumme" Switches VLAN-Tags mit durch? (17)

Frage von coltseavers zum Thema Netzwerkprotokolle ...

E-Business
Wo tragt ihr eure privaten Termine ein? (14)

Frage von honeybee zum Thema E-Business ...

Batch & Shell
Batch zum suchen und verschieben von Verknüpfungen (12)

Frage von zeroblue2005 zum Thema Batch & Shell ...

Windows Server
Terminalserver starten willkürlich neu (12)

Frage von thaefliger zum Thema Windows Server ...