vbs Authentifizierung gegen ADS

Hallo zusammen,

ich hab folgendes Problem, ich brauche ein kleines Script welches mich auffordert Benutzername und Passwort einzugeben und dann die Geschichte gegen das Active Directory authentifiziert. Stimmen die Infos soll eine Textbox mit Danke kommen, stimmts nicht Fehlermeldung und erneute Eingabe.

Hab jetzt schon einige zeit gegoogelt allerdings finde ich nichts wie ich das vbs dazu bringe die Daten an den DomainController zu senden.

Jemand ne idee?

Lg
Phil

Please also mark the comments that contributed to the solution of the article

Content-Key: 77776

Url: https://administrator.de/contentid/77776

Printed on: April 19, 2024 at 21:04 o'clock

3 Comments

Latest comment

Hallo Phil

Ich glaube ich will gar nicht wissen, wie man auf die Idee kommt so etwas zu tun...

Zu Deiner Frage:

strDCName="MeinDC"
strUserName="EinBenutzer"
strPW="Geheim"

LDAPPath="DC=technet,DC=local"
set objNamespace=GetObject("LDAP:")
set objDomain=objNamespace.OpenDSObject("LDAP:" & strDCName & "/" _
& LDAPPath, strUserName, strPW,1)

Jetzt solltest Du eigentlich mitOn Error Goto 0einen Wert bekommen, auf den Du reagieren kannst.
Bloss nicht vergessen vorherErr.Clear// auszuführen, Falls Du es in eine Schlaufe knallst.

Damit keiner denkt ich mach hier was Illegales. Wir haben in der Firma einige Messstationen die alle mit dem gleichen benutzer angemeldet sind. Hat nun ein Benutzer eine Messung fertig soll er sich Authentifizieren müssen (über das Script) und wenn erfolgreich wirds in eine DB geschrieben.