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

Gruppenbeschreibung per Script aus Gruppenname füllen?

Frage Entwicklung VB for Applications

Mitglied: pdieser

pdieser (Level 1) - Jetzt verbinden

03.01.2007, aktualisiert 08:33 Uhr, 4824 Aufrufe, 2 Kommentare

Hallo zusammen!

Hat jemand schonmal einen Script geschrieben um Gruppenbeschreibungen automatisch aus dem Gruppennamen füllen zu lassen?

Stelle mir das ganze so vor:

Gruppenname: ABC123_F_Abteilungsname_C
Gruppenbeschreibung = Ändern Abteilungsname

Wie kann ich den Wert des Gruppennamens auslesen und Ihn später wieder im Beschreibungsfeld einfügen lassen?

Gruss und Dank im vorraus
Mitglied: Tundra
03.01.2007 um 08:21 Uhr
Hi,

das Script liest den Gruppennamen und die Beschreibung aus und hängt danach an der Beschreibung den Gruppennamen dran.
01.
 
02.
Option Explicit 
03.
 
04.
const C_Log = "c:\Log\Gruppenbeschreibung.log" 
05.
Const C_Gruppe = "LDAP://CN=101_Benutzer,OU=Gruppen,DC=domaine,DC=de" 
06.
 
07.
 
08.
DIM O_File 
09.
DIM O_Log 
10.
 
11.
Set O_File = CreateObject("Scripting.FileSystemObject") 
12.
Set O_Log = O_File.OpenTextFile(C_Log,2,true) 
13.
 
14.
 
15.
call S_ReadBeschreibung() 
16.
 
17.
Sub S_ReadBeschreibung() 
18.
	Dim O_Gruppe 
19.
	Dim L_AlteBeschreibung 
20.
	Dim L_Gruppe 
21.
	Set O_Gruppe = GetObject(C_Gruppe) 
22.
 
23.
	O_Log.writeline "Gruppenname: " & O_Gruppe.Get("samAccountName") 
24.
	L_Gruppe = O_Gruppe.Get("samAccountName") 
25.
 
26.
	O_Log.writeline "alte Beschreibung: " & O_Gruppe.Get("Description") 
27.
	L_AlteBeschreibung = O_Gruppe.Get("Description") 
28.
	 
29.
	O_Gruppe.Put "description", L_AlteBeschreibung & L_Gruppe 
30.
	O_Gruppe.SetInfo 
31.
	O_Log.writeline "neue Beschreibung " & O_Gruppe.Get("Description") 
32.
	 
33.
end sub 
34.
 
Grüße
Guido
Bitte warten ..
Mitglied: pdieser
03.01.2007 um 08:33 Uhr
Vielen Dank Guido!

Das hat mir sehr geholfen!
Bitte warten ..
Ähnliche Inhalte
Neue Wissensbeiträge
Sicherheits-Tools

Sicherheitstest von Passwörtern für ganze DB-Tabellen

Tipp von gdconsult zum Thema Sicherheits-Tools ...

Peripheriegeräte

Was beachten bei der Wahl einer USV Anlage im Serverschrank

(6)

Tipp von zetboxit zum Thema Peripheriegeräte ...

Windows 10

Das Windows 10 Creators Update ist auf dem Weg

(6)

Anleitung von BassFishFox zum Thema Windows 10 ...

Administrator.de Feedback

Tipp: Ungelöste Fragen ohne Antwort in Tickeransicht farblich hinterlegen

Tipp von pattern zum Thema Administrator.de Feedback ...

Heiß diskutierte Inhalte
Windows Server
gelöst Update BackupExec 2015 auf 2016 führt zu SQL-Server Problem (16)

Frage von montylein1981 zum Thema Windows Server ...

Batch & Shell
gelöst Batch um Benutzer aus Sitzung abzumelden (15)

Frage von zeroblue2005 zum Thema Batch & Shell ...

Linux
gelöst Google Chrome startet nicht (12)

Frage von Thomas91 zum Thema Linux ...