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
GELÖST

VBS Loginscript

Frage Entwicklung Batch & Shell

Mitglied: flexi87

flexi87 (Level 1) - Jetzt verbinden

18.01.2013, aktualisiert 07:45 Uhr, 1616 Aufrufe, 1 Kommentar

Hallo Zusammen,
ich habe ein Loginscript geschrieben, damit ich die Drucker und Laufwerke über die Active Directory verbinden kann.
Nun habe ich das Problem, wenn ich einer AD Gruppe eine AD Gruppe hinzufüge, dass diese nun nicht abgefragt wird. (siehe Bild)
Wie muss ich nun mein Loginscript anpassen, damit dies auch funktioniert?

' Laufwerk Z:\ Info Stelle, sofern in Gruppe
' ------------------------------------------
If BenutzerInGruppe("LG-InfoStelle") then
WSHNetwork.MapNetworkDrive "Z:", "\\ZG01F005\InfoStelle"
end if

' Selbst gebastelte Funktion, um Benutzergruppen-Zugehörigkeit eines Users zu überprüfen
' --------------------------------------------------------------------------------------
Function BenutzerInGruppe(SucheGruppe)
Set Benutzer = GetObject("WinNT://" & WSHNetwork.UserDomain & "/" & WSHNetwork.UserName)
FoundIt = False
For Each Gruppe In Benutzer.Groups
if LCase(Gruppe.Name) = LCase(SucheGruppe) then FoundIt = True
Next
BenutzerInGruppe = FoundIt
Set Benutzer = nothing
End Function

' Selbst gebastelte Funktion, um Benutzergruppen-Zugehörigkeit eines Users zu überprüfen
' --------------------------------------------------------------------------------------
Function BenutzerNichtInGruppe(SucheGruppe)
Set Benutzer = GetObject("WinNT://" & WSHNetwork.UserDomain & "/" & WSHNetwork.UserName)
FoundIt = True
For Each Gruppe In Benutzer.Groups
if LCase(Gruppe.Name) = LCase(SucheGruppe) then FoundIt = False
Next
BenutzerNichtInGruppe = FoundIt
Set Benutzer = nothing
End Function


f28a4e8dd191249725ebd8028a88686d - Klicke auf das Bild, um es zu vergrößern
Mitglied: bastla
18.01.2013 um 11:31 Uhr
Hallo flexi87 und willkommen im Forum!

Da gibt's doch auch was von den Scripting Guys ...

Grüße
bastla
Bitte warten ..
Ähnliche Inhalte
Batch & Shell
Cpl Dateien per Batch oder VBS öffnen (1)

Frage von Angelo131095 zum Thema Batch & Shell ...

VB for Applications
gelöst VBS Ordner erstellen - wenn nicht vorhanden! (1)

Frage von freshman2017 zum Thema VB for Applications ...

VB for Applications
gelöst VBS Datei Auswahl Dialog (5)

Frage von Compu2017 zum Thema VB for Applications ...

VB for Applications
gelöst VBS Suchen und Ersetzen bei UTF8 XML Dateien funktioniert nicht (7)

Frage von Nexxudus zum Thema VB for Applications ...

Neue Wissensbeiträge
Tipps & Tricks

Wie Hackt man sich am besten in ein Computernetzwerk ein

(31)

Erfahrungsbericht von Herbrich19 zum Thema Tipps & Tricks ...

Humor (lol)

Bester Vorschlag eines Supporttechnikers ever: APC

(15)

Erfahrungsbericht von DerWoWusste zum Thema Humor (lol) ...

Heiß diskutierte Inhalte
Webbrowser
Windows 7 unbeliebte Internetseite sperren (14)

Frage von Daoudi1973 zum Thema Webbrowser ...

ISDN & Analoganschlüsse
gelöst Splitter - RJ45 zu RJ11? (13)

Frage von Waishon zum Thema ISDN & Analoganschlüsse ...

LAN, WAN, Wireless
gelöst Suche Firmware Image für Cisco Aironet 1252 (10)

Frage von Herbrich19 zum Thema LAN, WAN, Wireless ...

Netzwerke
VLAN Verständnissproblem (9)

Frage von Dragan123 zum Thema Netzwerke ...