Office: (Office 2010) Userrechte und Navi.-formular

ahhh...ok...wenn User nicht vorhanden, dann soll die Meldung kommen?
Es kommen aber keine weiteren hinzu, da ich die tbl vollständig ist mit den MItarbeitern.

Schau mal bitte diesen Code an, bitte...
da sind zwei drei Krücken drin
Code:

Der Code funktionert so zu 60%...würde ich sagen.
Also...hat der User diesen Default "12345" eingeben, kommt auch dazu die Info. Klickt man auf Ok, kommt ein Debug (ungültiger Prozeduraufruf oder ungültiges Argument. im Hintergrund poppt das frm "SetPasswort" auf, aber auch gleichzeitig schon das Navifrm2, was ja nicht sein soll. Es soll sich erst nach der neuen Eingabe des Passwortes öffnen.
Der Debug bleibt hier stehen...DoCmd.Close acForm, Me.Name.

Desweiteren soll das Anmeldefenster solange bleiben, bis das neue Passwort eingeben worden ist. Derzeit verschwindet es.
Ich habe im frm SetPasswort noch zwei Schaltflächen eingebaut...zum speichern und zum schließen.
Wäre es eine gute Lösung, wenn ich durch das Schließen (Klick) des frm SetPasswort öffnen lasse und gleichzeitig sich das frm SetPasswort schließt?

 

Code:

Das Form SetPasswort muss die tblkwgMit als Datenherkunft haben, wenn es als Dialog geöffnet wird, stoppt der Code solange, bis das Formular wieder geschlossen ist.
maike

 

Servus M-Deniz-S,
kann man nochmal eine zusammengefasste Aufgabenbeschreibung bekommen ??
Irgendwie zerfleddert sich das langsam und man kann kaum mehr das Ganze verfolgen.
http://www.ms-office-forum.net/forum...=1#post1677390
könnte das helfen?

 

Nabend Maike

habe gerade den Code ausprobiert...es klappt bis dort hin, wo das frm "SetPasswort" aufpoppt.
Leider ist dieses Formular leer und beinhaltet nicht die Daten vom User.
Ich habe versucht, dort ein Komma, hier Anführungszeichen wegzunehmen, aber ohne Erfolg. Er findet iwie keinen Bezug vom Login User zum User in der tblkwgMit.
Deinen Tipp mit der Datensatzherkunft habe ich auch schon gecheckt...alles i.O.
Code:

Irgendwo hier muss ein kleiner Fehler liegen. Da ich erst Einsteiger bin bzgl. VBA finde ich den Fehler nicht so recht...flopp

 

Sorry, so sollte es richig sein:
Code:

maike

 

Mahlzeit Maike....

SUUUPEEER...klappt wunderbar!!!
wie machst Du das bloß? *biggrin.gif*
Kann Dir gar nicht genug danken.

Mir ist nur eine kleine Sache aufgefallen, die zu einem kleinen Problem führt.

Wenn ich im frm "SetPasswort" mein neues Passwort setze und statt des Speicher-Buttons mit "Enter" bestätige, verschwindet das Passwort aus dem Feld und wenn ich es dann erneut eingebe und dann den Button drücke, hat er es zwar, aber bei der Eingabe des neuen Passwortes im Login nimmt er dann das neue nicht, obwohl das neue in der tblkwgMit schon verzeichnet ist. Ändere ich das Passwort dort in der Tabelle um und gehe dann auf das Login-Fenster, lehnt er das Passwort auch ab. Sehr komisch...aber durch mein frm "Zurücksetzen", wo ich die Passwörter auf Default setzen kann, übernimmt er die Einstellung und er fragt mich wieder ganz normal zum Ändern meines Passwortes ab.

Nun werde ich mich mal daran wagen den Benutzer und seiner User-KID anzeigen zu lassen.

 

Das könnten zwei Dinge sein:
Wie ist die Einstellung für Entertaste in dem Feld? Standard oder neue Zeile?
Gib mal im Formular SetPasswort im Ereignis beim Schließen noch den Befehl zum Aktualisieren des Anmeldeformulars:
Code:

maike

 

ah ok...dort stand "neue Zeile im Feld"...habe ich geändert und deinen Code für den "Schließen-Button" eingegeben.

HAMMER!!!

Ich habe mir Deinen Link mal angeschaut bzgl. Lebensdauer etc.
Parallel habe ich auch mal so im Netz geschaut.
Ich will ja im HF (Navifrm2) den eingeloggten User + seiner User-KID anzeigen lassen.
Sind "stLoginID u. stPswort" Variablen? Im Netzt stand, dass zur Verwendung von Variablen auf anderen frm´s die Variablen vor dem eigentlichen "Sub" deklariert werden müssen, um sie dann für andere zu benutzen.

 

Ja, das sind Variablen (lies dir am besten den ganzen Abschnitt Variablen aus dem Link mal durch).
Wenn du im Kopf des Anmeldeformulars
Code:

deklarierst, kannst du den Wert auch in anderen (Formular-)Modulen nutzen.
Die Deklaration von stLoginID in der Prozedur entfällt dann natürlich, nur die Zuweisung des Wertes per Dlookup bleibt.
maike

 

ok...

habe ich bereits eingefügt.
Trotzdem fehlt mir jetzt das verständnis für den nächsten Schritt mit dem dlookup, obwohl wir diesen doch schon im Anmeldefenster definiert haben.

Kann ich jetzt nicht den dlookup von "stLoginID" aus dem Anmeldeformular übernehmen? Kannst Du mir den mal auf Deutsch übersetzen *Smilie
Code:

ist doch...stLoginID gleich schau in der tblkwgMit auf UserLogin und setze es gleich mit dem Wert aus Me.txtLoginID.Value...oder nicht.

ich habe nämlich ein Willkommens frm erstellt (als Register im Navifrm) mit einer Prozedur (beinhaltet ein Modul), dass halt unter anderem auf den User oder seiner User-KID greifen soll, damit folgendes passieren soll. Derzeit noch mit "Environ". Code:

 

Ja, sollst du ja auch. Die Variable stLoginID muss ja einen Wert bekommen, egal ob public oder private.
Nur die Deklaration ändert sich: statt
Code:

jetzt im Modulkopf
Code:

maike

 

Moin Maike...

ich saß gestern bis 00:30 daran und hab gegrübelt...ohne Erfolg *frown.gif*

ich habe nun in Anmeldformular...im Kopf eine Variable angegeben.

Habe Sie versucht im Sub zu definieren. Was positiv ist, dass es keinen Debug gab.
Code:

nun habe ich auch die Variable im Navifrm2 in der Prozedur eingebaut...

Code:

Ergebnis funktioniert auch nicht...also kein Ergebnis zu sehen. Wieder positiv, dass es keinen Debug gibt.

Dann im letzten frm dasselbe...

Code:

Kein Ergebnis, aber auch kein Debug...

Was mache ich falsch??*mad.gif*

 

Public FindName darf nur einmal (in diesem Fall im Kopf des Anmeldeformulars, wo diese Variable dann ihren Wert bekommt) deklariert werden.
Wenn du überall im Formularkopf "Option Explicit" setzt, sollte dir das der Debugger auch anmeckern.
Zugreifen dann einfach mit dem Variablennamen. Also im Navifrm2 - um dein Beispiel zu verwenden - dann so
Code:

maike

 

*EDIT* Hat sich erledigt...

 

ich habe zwar die Änderung vorgenommen, doch immer noch kein Ergebnis.

Ist mein Dlookup falsch definiert??

Code:

Heißt doch...soviel wie...schaue bei tbl rein unter "UserName" gib wieder, wenn Userlogin = Me.txtLoginID.... ist, oder nicht?
Oder muss ich hier noch das frm angeben?