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

gelöst PASSWort Befehl benötigt

Mitglied: Neupraktikant

Neupraktikant (Level 1) - Jetzt verbinden

30.11.2006, aktualisiert 04.12.2006, 4031 Aufrufe, 3 Kommentare

Const ADS_PROPERTY_APPEND = 3

Dim strNewName
Dim objFSO
Dim f
'Argumente Vorname Nachname
Set objArgs = Wscript.Arguments
Set WshShell = Wscript.CreateObject("Wscript.Shell")
strNewName = objArgs(1) & Left(objArgs(0), 2)
strNachName = objArgs(1)

Set objOU = GetObject("LDAP://OU=BP,dc=berlin-partner,dc=de")
Set objUser = objOU.Create("User", "cn=" & strNewName)
objUser.Put "sAMAccountName", strNewName
objUser.Put "userPrincipalName", strNachName & "@belin-partner.de"
objUser.Put "givenName", objArgs(0)
objUser.Put "mail", objArgs(0) &"."& objArgs(1)&"@belin-partner.de"
objUser.Put "initials", LEFT(objArgs(0),1)&"."&LEFT(objArgs(1),1)&"."
objUser.Put "sn", objArgs(1)
objUser.Put "displayName", objArgs(1) & ", " & objArgs(0)
objUser.Put "profilePath", "\\dc18\profile$\" & strNewName
objUser.SetInfo


' Passwortvergabe
objUser.SetPassword "BPE8210"
objUser.SetInfo



'Kontosperrung oder nicht
objUser.AccountDisabled = False
objUser.SetInfo

'Gruppe NONOtes
Set objGroup = GetObject ("LDAP://cn=G_nonotes,OU=BP,dc=berlin-partner,dc=de")
objGroup.PutEx 3,"member", Array("cn=" & strNewName & ",ou=BP,dc=berlin-partner,dc=de")
objGroup.SetInfo

'Gruppe Mailreport
Set objGroup = GetObject ("LDAP://cn=G_mailreport,OU=BP,dc=berlin-partner,dc=de")
objGroup.PutEx 3,"member", Array("cn=" & strNewName & ",ou=BP,dc=berlin-partner,dc=de")
objGroup.SetInfo

MakeFolder "C:\Profile\" & strNewName & "\"
MakeFolder "C:\Basisverzeichnis\" & strNewName & "\"
WshShell.Run("cscript XCACLS.vbs C:\Basisverzeichnis\" & strNewName & " /E /G Berlin-Partner\" & strNewName & ":M x")
WshShell.Run("cscript XCACLS.vbs C:\Profile\" & strNewName & " /E /G Berlin-Partner\" & strNewName & ":M
x")

Sub MakeFolder(Dir)
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set f = objFSO.CreateFolder(Dir)
End Sub




so das is erstamal mein überarbeitetes Skript es klappt auch alles benutzer wird Hinzugefüght alle rechte vergeben. Ich kann den Benutzer nur nicht in der Domäne anmelden da immer das PW falsch ist. Es muss dann wohl an dieser Zeile liegen

objUser.SetPassword "BPE8210"
objUser.SetInfo


kann mir jemand den richtigen Befehl sagen oder erklären was da schief läuft

Viele Grüße und Danke

JAN

[Edit Biber] Juni 2008
Na ja, das mit dem kleinen grünen Haken hat nicht geklappt - den setze ich jetzt und schliesse den Thread. [/Edit]
Mitglied: Biber
30.11.2006 um 21:31 Uhr
Moin Neupraktikant,

kann mir jemand den richtigen Befehl sagen oder erklären was da schief läuft
kann Deiner Bitte nur teilweise nachkommen
Inoffizieller Workaround:
01.
... 
02.
     objUser.SetPassword ("BPE8210") 
03.
     objUser.GetInfo 
04.
     objUser.SetInfo
Die offizielle Variante ist allerdings:
01.
.... 
02.
        objUser.SetPassword ("BPE8210") 
03.
        objUser.Put "userAccountControl", 512           ' 512 = Enable, 514 = Disable. 
04.
        objUser.Put "PwdLastSet", 0                           ' Default ist -1 
05.
        objUser.SetInfo
Probier es mal mit dieser zweiten Sequenz.
Ich denke "was da schief läuft" ist, Windows-Systeme verkaufen sich immer, egal wie grottig die zusammengeschreddert sind...
Aber "erklären" kann ich Dir das nicht wirklich.

HTH
Biber
Bitte warten ..
Mitglied: Neupraktikant
04.12.2006 um 09:39 Uhr
danke hat geklappt :D
Bitte warten ..
Mitglied: Biber
04.12.2006 um 10:15 Uhr
Natürlich - Windows ist doch ein intuitiv bedienbares System!
... und der Mond ist aus Schweizer Käse..

Machst Du bitte so einen kleinen grünen Haken an Deinen Beitrag?

Danke
Biber
Bitte warten ..
Ähnliche Inhalte
Netzwerkmanagement

LTE Netzwerkaufbau - Verbesserungsvorschläge benötigt

gelöst Frage von chemistryyNetzwerkmanagement11 Kommentare

Hallo und guten Morgen! Ich benötige Hilfe/Verbesserungsvorschläge beim Aufbau meines Heimnetzwerks. Ich und mein Nachbar besitzen beide jeweils einen ...

Windows Userverwaltung

Benötigte Rechte für PC Domjoin

Frage von Phill93Windows Userverwaltung2 Kommentare

Hallo, welche Rechte benötigt ein Konto um PC´s in die Domäne aufzunehmen? Ziel ist es einen User zu haben ...

Exchange Server

Welche Zertifikate werden für den Exchange wirklich benötigt?

Frage von magicpeterExchange Server8 Kommentare

Moin, ich betreibe einen Exchange 2013 mit folgenden Zertifikaten und SplittDNS (remote.domain.com). Welches Zertifikate werden für den Exchange benötigt? ...

Schulung & Training

Abschätzung benötigte Arbeitszeit

gelöst Frage von Kisl476Schulung & Training15 Kommentare

Hallo allerseits, ich habe eine Frage an erfahrene Profi-Adminstratoren, die damit schon lange ihr Geld verdienen. Ein "Betrieb" verfügt ...

Neue Wissensbeiträge
Linux Netzwerk

Installation eines Logservers mit Loganalyzer als Debian-VM auf Hyper-V

Anleitung von lcer00 vor 12 StundenLinux Netzwerk

Zuerst sei auf den schönen Beitrag von aqui hier im Forum verwiesen, in dem die loganalyzer-installation bereits beschrieben ist: ...

Humor (lol)
Antennagate 2018
Information von magicteddy vor 12 StundenHumor (lol)2 Kommentare

Da haut der angekaute Elektronikhersteller die teuersten Geräte auf den Markt und bekommt anscheinend die Basics mal wieder nicht ...

Datenschutz

Die Datenkrake Google verlängert ihr Arme mal wieder ein wenig, automatische Anmeldung

Tipp von magicteddy vor 1 TagDatenschutz3 Kommentare

Benutzer mit einem Google Account und gespeicherten Zugangsdaten werden von chrome 69 automatisch bei Google angemeldet, natürlich alles zum ...

Verschlüsselung & Zertifikate
Meine Wissenssammlung zu Bitlocker
Erfahrungsbericht von DerWoWusste vor 2 TagenVerschlüsselung & Zertifikate3 Kommentare

Die Motivation für diesen Beitrag waren die vielen Posts rund um dieses Thema, die deutlich machen, wie viele Einzelaspekte ...

Heiß diskutierte Inhalte
E-Mail
Welche ist die beste E-Mail Groupware für die Zukunft?
Frage von ITCrowdSupporterE-Mail24 Kommentare

Guten Tag allerseits :) Ich möchte mich mit einer Frage heute mal an die Schwarmintelligenz wenden. Aktuell befasse ich ...

Firewall
Wesyb Offline
Frage von DkuehlbornFirewall14 Kommentare

Hallo Kollegen, ein Kunde hat von Wesyb die Sicherheitslösung im Einsatz. Seit August scheint deren Internetseite nicht mehr verfügbar ...

Video & Streaming
DVD auf Festplatte sichern
Frage von Thor01Video & Streaming13 Kommentare

Hallo, mittlerweile hat meine DVD Sammlung ein alter erreicht wo die eine oder andere DVD schon das Zeitliche gesegnet ...

Server-Hardware
Empfehlung für Hardware eines Software Routers
Frage von janosch12Server-Hardware12 Kommentare

Hallo Gemeinde, ich brauche von euch ein paar Tipps in Sachen Router-Hardware. Aktuell haben wir auf einem 2 HE ...