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

Per VBS Organisationseinheit auslesen und entsprechend Netzlaufwerk mappen

Frage Microsoft Windows Netzwerk

Mitglied: bierkoenig

bierkoenig (Level 1) - Jetzt verbinden

11.06.2008, aktualisiert 14:55 Uhr, 9204 Aufrufe, 3 Kommentare

Hallo zusammen,

ich habe folgendes Problem:
Ich möchte unser Login-Skript für sämtliche Standorte vereinheitlichen. An unseren Außenbüros ist jeweils ein File-Server auf dem die Home-Verzeichnisse der User liegen. Nun möchte ich ein Skript erstellen, welches anhand der zugeteilten OU des Users (nicht Gruppenzugehörigkeit!) verschiedene "Home-Server" bereitstellt.
Sprich das Script sollte folgendemassen aussehen:

wenn user in OU= Bremen
homeserver= server1
wenn user in OU= Hamburg
homerserver=server2

mappe Netzlaufwerk u: \\homerserver\users\%username%

Ich habe massiv Probleme an das Objekt OU im AD per vbs ranzukommen. Leider bin ich auch wirklich nicht der VBS-König...... Hat jemand eine Idee oder perfekterweise ein Scripting-Beispiel?

Vielen Dank.

Grüße

der Bierkoenig
Mitglied: Logan000
11.06.2008 um 13:39 Uhr
Hi
Ich hab bei mir folgenden Code Fetzen gefunden:
01.
Set objOU = GetObject("LDAP://OU=Hamburg,dc=MyDomain,dc=de") 
02.
Set objUserProperties = GetObject("LDAP://MYDC/schema/container") 
03.
objOU.Filter = Array("person") 
04.
For Each objUser in objOU 
05.
	Dim text 
06.
   For Each strAttribute in objUserProperties.MandatoryProperties 
07.
		strValues = objUser.GetEx(strAttribute) 
08.
		For Each strItem in strValues 
09.
			text = text & " " & strAttribute & " -- " & strItem & Chr(13) & chr(10) 
10.
		Next 
11.
	Next 
12.
	msgbox text 
13.
	text = "" 
14.
Next
Ich hoffe das hilft dir weiter.
Bitte warten ..
Mitglied: bastla
11.06.2008 um 14:08 Uhr
... ansonsten etwa (ungetestet):
01.
UserPath = CreateObject("ADSystemInfo").UserName 
02.
OUList = Array("Bremen","Hamburg","...") 
03.
SrvList = Array("server1","server2","...") 
04.
Server = "" 
05.
For i = 0 To UBound(OUList) 
06.
    If InStr(1, UserPath, "OU=" & OUList(i), vbTextCompare) Then 
07.
        Server = SrvList(i) 
08.
        Exit For 
09.
    End If 
10.
Next 
11.
If Server <> "" Then ...
Die "OUList" und die "SrvList" müssen die gleiche Anzahl an (einander zugeordneten) Einträgen enthalten.

Grüße
bastla
Bitte warten ..
Mitglied: bierkoenig
11.06.2008 um 14:55 Uhr
Hi Bastla,

das Script funktioniert 1a! Vielen Dank für deinen Einsatz! Hast mir soeben das Leben sehr vereinfacht und und den baldigen Feierabend versüßt

Grüße

Bierkoenig
Bitte warten ..
Ähnliche Inhalte
Windows Server
Mehrer Netzlaufwerke mappen die auf einem Server liegen (7)

Frage von M.Marz zum Thema Windows Server ...

Entwicklung
Zählerstände über SNMP und VBS auslesen (4)

Frage von motofuzy zum Thema Entwicklung ...

Batch & Shell
Eventlog Druckjobs mit VBS auslesen (4)

Frage von joni2000de zum Thema Batch & Shell ...

VB for Applications
gelöst Bestimmte Spalten aus CSV-Datei auslesen (VBS) (9)

Frage von Gurkenhobel zum Thema VB for Applications ...

Neue Wissensbeiträge
Windows Update

Microsoft Update KB4034664 verursacht Probleme mit Multimonitor-Systemen

(3)

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 ...

Windows 10

Windows 10: Erste Anmeldung Animation deaktivieren

(3)

Anleitung von alemanne21 zum Thema Windows 10 ...

Heiß diskutierte Inhalte
SAN, NAS, DAS
MSA 2050 RAID Konfig (20)

Frage von Leo-le zum Thema SAN, NAS, DAS ...

Hosting & Housing
CNAME auf FTP funkt nicht mehr (7)

Frage von Wintektiv zum Thema Hosting & Housing ...