Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen (A bis Z)

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, 4890 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
Entwicklung
gelöst PDF-Formular: Dropdown aus XML füllen (1)

Frage von Juweee zum Thema Entwicklung ...

Backup
gelöst Iperius Backup Full Version 4.9.3 (4)

Frage von Judgelg zum Thema Backup ...

Windows Userverwaltung
gelöst Active Directory: Basisordner automatisch füllen lassen? (5)

Frage von Rene12345 zum Thema Windows Userverwaltung ...

Windows Server
gelöst Wie füge ich diesem Script die Email Adresse hinzu (16)

Frage von rainergugus zum Thema Windows Server ...

Neue Wissensbeiträge
Ubuntu

Ubuntu 17.10 steht zum Download bereit

(3)

Information von Frank zum Thema Ubuntu ...

Datenschutz

Autofahrer-Pranger - Bewertungsportal illegal

(8)

Information von BassFishFox zum Thema Datenschutz ...

Windows 10

Neues Win10 Funktionsupdate verbuggt RemoteApp

(8)

Information von thomasreischer zum Thema Windows 10 ...

Microsoft

Die neuen RSAT-Tools für Win10 1709 sind da

(2)

Information von DerWoWusste zum Thema Microsoft ...

Heiß diskutierte Inhalte
Windows 10
Seekrank bei Windows 10 (18)

Frage von zauberer123 zum Thema Windows 10 ...

Windows 10
Windows 10 Fall Creators Update Fehler (14)

Frage von ZeroCool23 zum Thema Windows 10 ...

Router & Routing
gelöst Getrenntes Routing bei VoIP und Daten (12)

Frage von Hobbystern zum Thema Router & Routing ...