Logonuser-Problem

[konda]

:cyclops: Hallo,
ich brauche für mein neues Programm dei Funktion-logonuser. Das einzige was die Funktion machen soll ist, dass sie überprüft ob ein String mit dem Passwort eines Benutzers übereinstimmt. Bisher hab ich das so gemacht:

Delphi-Quellcode:

logonuser(user,pchar('.'),pchar('passwort'),0,LOGON32_LOGON_NETWORK,h)

Nur irgenwie kommt bei mir immer eine Fehlermeldung: Die Typen der tatsächlichen und formularen var-Parametern müssen übereinstimmen.
Kann mir jemand helfen? :gruebel:

[Christian Seehase]

Moin Konda,

da ist so kein Fehler festzustellen.
Vermutlich ist h nicht mit dem richtigen Typ (DWORD) deklariert.

[Luckie]

Nutze [df]SSPI[/df], damit geht es einfacher und schneller.

[konda]

Zitat:

Zitat von Luckie

Nutze [df]SSPI[/df], damit geht es einfacher und schneller.

Mit dem Suchlink kann ich gar nichts anfangen. H war wirklich kein DWord. Jetzt kommt aber irgendeine Meldung: Zugriffsverletzung... :wall:

[Daniel Schuhmann]

Zitat:

Zitat von konda

Mit dem Suchlink kann ich gar nichts anfangen.

Und warum nicht? Der zweite Link verweist auf diesen Thread; der dritte Beitrag sollte die Problemlösung für Dich darstellen.

[konda]

Zitat:

Zitat von Daniel Schuhmann

Zitat:

Zitat von konda

Mit dem Suchlink kann ich gar nichts anfangen.

Und warum nicht? Der zweite Link verweist auf diesen Thread; der dritte Beitrag sollte die Problemlösung für Dich darstellen.

Hast recht, ich hab nur gedacht, dass ware was anderes. :thumb:

[konda]

Eine Frage noch, was muss ich als Domain-Namen angeben, wenn die Domain der locale Computer ist? :?:

[Luckie]

Nichts.

[konda]

Jetzt tritt bei mir aber eine Expection auf: 'GenClientContext Failed'. :wall:
Mein code lautet so:

Delphi-Quellcode:

ja:= SSPlogonuser('',user,passwort);

[Christian Seehase]

Moin Konda,

dann trag doch den Namen des Rechners ein, auf dem die Funktion aufgerufen wird.

[SirThornberry]

eventuell kannst du als rechner auch "localhost" eingeben oder die ip "127.0.0.1" (ungetestet und nur eine Vermutung)

[konda]

Zitat:

Zitat von Christian Seehase

Moin Konda,

dann trag doch den Namen des Rechners ein, auf dem die Funktion aufgerufen wird.

Das klappt nicht. Es kommt immer noch die Meldung! :wall:

[perle]

Für welches Windows versuchst du das?

[konda]

Zitat:

Zitat von perle

Für welches Windows versuchst du das?

Windows XP und wie würde es für logonuser gehen? :?:

[konda]

Ich habs jetzt mit logonuser() gelöst. :cyclops:

[Luckie]

Wäre nett, wenn du deine Lösung posten würdest.

[konda]

Das ist der Code! Das es vorher nicht geklappt hat lag an einem Problem mit einem String. :lol:

Delphi-Quellcode:

ja:= logonuser(pchar(edit1.text),pchar(''),pchar(passwort),
            LOGON32_LOGON_NETWORK,LOGON32_PROVIDER_DEFAULT,h);