Top-Themen

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

Script zum auslesen des Stanard PW im AD funktioniert nicht.

Mitglied: llaprosper

llaprosper (Level 1) - Jetzt verbinden

18.09.2007, aktualisiert 11.10.2007, 3444 Aufrufe, 5 Kommentare

Hi, ich habe hier ein Script gefunden, welches ich echt super gebrauchen könnte.
Es prüft, welche User noch nicht ihr Standard PW im AD geändert haben, in dem es probiert mit dem im Script definierten PW auf einen anderen Rechner ein Netzlaufwerk zu mappen! Wenn das mappen klappt, hat der User noch das Standard PW.
Eigentlich echt genial. Nur bei mir wird in der Textdatei nichts angezeigt, obwohl etliche Ihr PW noch nicht geändert haben.
Die Datei wird IMHO auch viel zu schnell erzeugt (1 Sek.) Bei ca. 500 Usern finde ich das wohl viel zu schnell.
Vielleicht könnt Ihr ja mal ein Blick auf das Script werfen, ob da irgend ein Fehler drin ist.
Ich habe einen Ordner auf meinen PC frei gegeben für alle, und der soll dann gemappt werden.
01.
'Hier die einzelnen Variablen definieren   
02.
'DN der OU, die durchsucht werden soll   
03.
strDN = "OU=xxx,DC=xxx,DC=xxx,DC=xxx"  
04.
'Pfad zum Logfile, in dem die User mit Standardkennwort eingetragen werden   
05.
strLogPath = "c:\logfile.txt"   
06.
'UNC-Pfad, der zum Test gemappt werden soll   
07.
strTestUNC = "\\meinpc\testshare"   
08.
'Wie sieht das Standardkennwort aus?   
09.
strPass =  "xxxx"   
10.
'AB HIER NICHTS MEHR VERÄNDERN!   
11.
'===========================================================================   
12.
    
13.
Set objOU = GetObject ("LDAP://" & strDN)   
14.
objOU.Filter = Array("User")   
15.
Set objNet = CreateObject ("WScript.Network")   
16.
Set objFso = CreateObject("Scripting.FileSystemObject")   
17.
Set objTs = objFso.OpenTextFile(strLogPath, 2, True)   
18.
objTs.WriteLine Now   
19.
objTs.writeline("Folgende Benutzer verwenden noch " _   
20.
& "das initiale Kennwort:")   
21.
Set WshShell = WScript.CreateObject("WScript.Shell")   
22.
On Error Resume Next   
23.
For Each user In objOU   
24.
' Usernamen ausgeben   
25.
WScript.Echo user.Name   
26.
' Test: Laufwerk verbinden   
27.
objNet.MapNetworkDrive "X:", strTestUNC, _   
28.
, user.SamAccountName, strPass   
29.
' Fehler aufgetreten?   
30.
If Err.Number = 0 Then   
31.
' Nein, User protokollieren   
32.
objTs.writeline(user.Samaccountname)   
33.
Else   
34.
' Ja, Fehler anzeigen   
35.
WScript.Echo "Fehler " & Err.number _   
36.
& " (" & Err.Description & ") " _   
37.
& "bei User: " & user.Name   
38.
Err.Clear   
39.
End If   
40.
objNet.RemoveNetworkDrive "X:" 
41.
Next
Mitglied: ISpawn
18.09.2007 um 15:22 Uhr
Hi,

ich glaub da fehlt nur ein Parameter

objNet.MapNetworkDrive "X:", strTestUNC, 0, "DOMAIN\USERNAME", "PASSWORT"

(die Ziffer 0)

Gruß
Micha
Bitte warten ..
Mitglied: llaprosper
18.09.2007 um 16:17 Uhr
Du meinst hier?
objNet.MapNetworkDrive "X:", strTestUNC, _
, user.SamAccountName, strPass

Frag nur, weil Du es leicht abgewandelt schreibst!
objNet.MapNetworkDrive "X:", strTestUNC, 0, "DOMAIN\USERNAME", "PASSWORT"

Hab es jetzt also so probiert und hat auch nichts in die txt rein geschrieben.

objNet.MapNetworkDrive "X:", strTestUNC, 0 _
, user.SamAccountName, strPass
Bitte warten ..
Mitglied: ISpawn
19.09.2007 um 07:27 Uhr
Hi,

laut msdn ( http://msdn2.microsoft.com/en-us/library/8kst88h6.aspx ) sieht die Syntax für MapNetworkDrive so aus:
object.MapNetworkDrive(strLocalName, strRemoteName, [bUpdateProfile], [strUser], [strPassword])

da du vbs verwendest musst du wenn du die [Optionalen] Parameter verwendest (AFAIK) alle verwenden.

was bringt dir denn eine MsgBox User.SamAccountName für eine Meldung ? eventuell stimmt der Parameter nicht.

Gruß
Micha
Bitte warten ..
Mitglied: llaprosper
19.09.2007 um 08:29 Uhr
Eine Fehlermeldung kommt gar nicht.
Ich muß dazu sagen, ich kenne mich gar nicht mit Scripten aus. Ich habe es nur im Netz gefunden.
http://faq-o-matic.net/blogs/faq-o-matic/archive/2007/01/23/standardken ...
Bitte warten ..
Mitglied: llaprosper
11.10.2007 um 12:10 Uhr
Hat noch jemand eine Idee, wie ich rausbekomme, wer das Standard Passwort benutzt?
Bitte warten ..
Ähnliche Inhalte
Windows Userverwaltung
AD Gruppen User auslesen
Frage von pgWindows Userverwaltung1 Kommentar

Guten Tag, ich bin auf der Suche nach einem Programm welches mit die User eines AD ausliest und mir ...

Windows Server
Kontakte aus AD auslesen
gelöst Frage von makaroniWindows Server3 Kommentare

Hallo zusammen, ich möchte alle Kontakte aus der Active Directory mit den Properties vorname, nachname, email und telefonnummer. Get-ADObject ...

CPU, RAM, Mainboards
Neuer PC mit 2x PCI-Stanard
gelöst Frage von KuemmelCPU, RAM, Mainboards4 Kommentare

Guten Morgen Kollegen, ist von euch jemand ein aktuelles PC-Modell bekannt, dessen Motherboard zwei PCI-Standard-Steckplätze hat? Ein Board mit ...

Batch & Shell
Powershell AD Attribute auslesen
gelöst Frage von xbast1xBatch & Shell8 Kommentare

Hallo zusammen, ich möchte gern von allen AD Usern die E-Mail,Nachname, Vorname auslesen und in eine CSV exportieren. Ich ...

Neue Wissensbeiträge
CPU, RAM, Mainboards
Neverending story
Tipp von keine-ahnung vor 18 StundenCPU, RAM, Mainboards1 Kommentar

Da kommt man mit dem fixen gar nicht mehr hinterher und die CPU erreichen wieder Rechenleistungen im Bereich des ...

Multimedia & Zubehör
AVM Fritz USB WLAN Sticks schneller einschalten
Tipp von NetzwerkDude vor 2 TagenMultimedia & Zubehör4 Kommentare

Die AVM Fritz WLAN Sticks haben in der Firmware 2 Modis: Einmal als Massenspeicher und einmal als WLAN Netzwerkkarte ...

Windows Server

Windows Server Backup schlägt fehl - Lösung 2008-2016

Tipp von BiGnoob vor 2 TagenWindows Server

Hi zusammen , ich möchte gerne einen Lösungstipp abgeben für folgenden Fehler: Lösung ist folgende:

Humor (lol)
Telekom vs. O2 - 3:2
Erfahrungsbericht von the-buccaneer vor 3 TagenHumor (lol)4 Kommentare

Unglaublich aber wahr: Nachdem mein privater Anschluss am 19.04.18 auf VOIP und VDSL umgestellt wurde, hatte ich seitdem 1,5 ...

Heiß diskutierte Inhalte
PHP
Nach Umzug zu 1und1 bekomme ich beim Eintrag in die DB Tabelle folgenden Fehler
gelöst Frage von jensgebkenPHP35 Kommentare

INSERT command denied to user 'dbo45342345342231244'@'112.127.102.073' for table 'orders'

Rechtliche Fragen
DSGVO - Impressum und Datenschutz auf Anmeldeseiten notwendig?
Frage von StefanKittelRechtliche Fragen16 Kommentare

Hallo, was mit gerade eingefallen ist. Muss man auf Anmeldeseiten auch ein Impressum und Datenschutzhinweis haben? Auch hier wird ...

Windows Userverwaltung
Problem mit Benutzerprofil
Frage von lieferscheinWindows Userverwaltung12 Kommentare

Guten Tag liebe Community, folgendes Problem habe ich: User meldet sich auf Client A an - sein Homelaufwerk verbindet. ...

Windows Server
2003er RDS Server lässt alten ThinClient nach Updates nicht mehr anmelden
Frage von KnorkatorWindows Server9 Kommentare

Hallo zusammen, wir hatten die Aufgabe, ein System (keine Domänenanbindung) zu virtualisieren welches mehrere Jahre keine Updates gesehen hat. ...