Office Forum
www.Office-Loesung.de
Access :: Excel :: Outlook :: PowerPoint :: Word :: Office :: Wieder Online ---> provisorisches Office Forum <-
Formular öffnen nach autom. abfrage
zurück: Werte bei einer Insert-abfrage umbenennen weiter: Autoincrement Wert in SQL Statement? Unbeantwortete Beiträge anzeigen
Neues Thema eröffnen   Neue Antwort erstellen     Status: Feedback Facebook-Likes Diese Seite Freunden empfehlen
Zu Browser-Favoriten hinzufügen
Autor Nachricht
Melanie08
Gast


Verfasst am:
26. Feb 2008, 10:02
Rufname:

Formular öffnen nach autom. abfrage - Formular öffnen nach autom. abfrage

Nach oben
       Version: Office XP (2002)

Guten Morgen,
muss euch einfach mal loben, weil ich euer Forum so toll finde, hab schon wahnsinnig viel gelernt, hab aber dennoch ab und zu kleine Probleme mit der Umsetzung. Und hätte gerne mal wieder einen Tipp von euch.

Es geht um das Benutzerdefinierte öffnen meiner Datenbank.
Jeder Mitarbeiter meldet sich mit seinem BenutzerName an seinen Rechner an.
Über diesen Benutzername möchte ich jetzt entscheiden, ob er beim öffnen Formular 1(normal), Formular 2(erweitert) oder Formular 3(admin) sieht.

Ich habe eine Tabelle(siehe unten), in diese Tabelle sollen nur Namen mit der Priorität erweitert und Admin eingetragen werden. wenn ein Benutzername nicht in der Liste ist soll er einfach das normale Formular öffnen.
    MitarbeiterID; MitarbeiterName; Priorität; Rechnerkennung
    1; Hans; erweitert; xxx
    2; Fritz; admin; xyz
    3; Georg; erweiter; zzz
Code:
    If BenutzerName() ist in der Tabelle Mitarbeiter,
        Do Look up Priorität zu diesem Mitarbeiter,
        If Priorität = erweitert Docmd open Formular2
        ElseIf Priorität = Admin Docmd open Formular 3
        Else Docmd oben Formular 1
        End if
Irgendwie so müsste das doch funktionieren, aber irgendwie krieg ich das nicht hin.
Vielleicht kannst Du mir da weiter helfen.
Kann man das auch in den Startobtionen der Datenbank einbinden? oder muss man das über ein Formular mit Feldern die man versteckt machen? beide Lösungen wären für mich akzeptabel, das er erst die Abfrage macht, wenn man einen Button klickt.

Vielen Dank schon mal im Vorraus, das ihr mir helft.
Grüßle Melanie
stpimi
Moderator Access


Verfasst am:
26. Feb 2008, 11:05
Rufname:
Wohnort: Graz

AW: Formular öffnen nach autom. abfrage - AW: Formular öffnen nach autom. abfrage

Nach oben
       Version: Office XP (2002)

Servus!
Code:
    Dim varPrioriaet As Variant
   
    VarPrioritaet = DLookup("Prioritaet", "Tabellenname", _
                            "MitarbeiterName = '" & MitarbeiterName & "'")
    Select Case VarPrioritaet
      Case Is Null:     DoCmd.OpenForm "Standardformular"
      Case "erweitert": DoCmd.OpenForm "ErweitertesFormular"
      Case "Admin":     DoCmd.OpenForm "AdminFormular"
    End Select
ungetestet!
_________________
Lg, Michael

Dein Feedback hilft auch anderen - vergiß es nicht!
Melanie08
Gast


Verfasst am:
26. Feb 2008, 12:24
Rufname:


AW: Formular öffnen nach autom. abfrage - AW: Formular öffnen nach autom. abfrage

Nach oben
       Version: Office XP (2002)

Hi stimpi,

hat fast funktioniert. habs nochmal ein bischen umgeschrieben....
Code:
    Dim strPrioritaet As String
   
    strPrioritaet = Nz(DLookup("Prioritaet", "Tabellenname", _
                               "Rechnerlogin = '" & BenutzerName() & "'"), "")
    Select Case strPrioritaet
      Case "erweitert": DoCmd.OpenForm "ErweitertesFormular"
      Case "admin":     DoCmd.OpenForm "AdminFormular"
      Case Else:        DoCmd.OpenForm "StandardFormular"
    End Select
Access hatte ein problem mit dem Is Null, vielen Dank für die Hilfe.
Jetzt funktioniert alles und ich bin soooooo glücklich. vielen Dank
LG Melanie
Neues Thema eröffnen   Neue Antwort erstellen Alle Zeiten sind
GMT + 1 Stunde

Diese Seite Freunden empfehlen

Seite 1 von 1
Gehe zu:  
Du kannst Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum antworten.
Du kannst deine Beiträge in diesem Forum nicht bearbeiten.
Du kannst deine Beiträge in diesem Forum nicht löschen.
Du kannst an Umfragen in diesem Forum nicht mitmachen.
Du kannst Dateien in diesem Forum nicht posten
Du kannst Dateien in diesem Forum herunterladen

Verwandte Themen
Forum / Themen   Antworten   Autor   Aufrufe   Letzter Beitrag 
Keine neuen Beiträge Access Tabellen & Abfragen: Kombinationsfeld im Formular als Kriterium für eine Abfrage 1 gunderma 2621 03. März 2004, 10:05
tania63 Kombinationsfeld im Formular als Kriterium für eine Abfrage
Keine neuen Beiträge Access Tabellen & Abfragen: [DANKE-ERLEDIGT] Join in einer Abfrage 2 Gast 803 01. März 2004, 08:36
ppc [DANKE-ERLEDIGT] Join in einer Abfrage
Keine neuen Beiträge Access Tabellen & Abfragen: Abfrage aus Formular erstellen 2 frkrone 3248 12. Feb 2004, 14:22
frkrone Abfrage aus Formular erstellen
Keine neuen Beiträge Access Tabellen & Abfragen: Wie kann ich mehr als 255Felder in eine Abfrage legen? 1 D.R. 2235 12. Feb 2004, 09:05
faßnacht(IT); Wie kann ich mehr als 255Felder in eine Abfrage legen?
Keine neuen Beiträge Access Tabellen & Abfragen: Suche Hilfe zu SQL (DAO 351 MS) - Abfrage 3 Berny_H 1005 04. Feb 2004, 11:41
borstel Suche Hilfe zu SQL (DAO 351 MS) - Abfrage
Keine neuen Beiträge Access Tabellen & Abfragen: Wie kann ich ein Formular erstellen ? 1 Gast 683 01. Feb 2004, 13:34
borstel Wie kann ich ein Formular erstellen ?
Keine neuen Beiträge Access Tabellen & Abfragen: Abfrage, die sich auf 2 Abfragen + 1 Tabelle bezieht 1 caro456 1832 27. Jan 2004, 20:03
Willi Wipp Abfrage, die sich auf 2 Abfragen + 1 Tabelle bezieht
Keine neuen Beiträge Access Tabellen & Abfragen: Bestimmte Abfrage erstellen ... nur wie ? 1 studi 2219 22. Dez 2003, 20:51
reke Bestimmte Abfrage erstellen ... nur wie ?
Keine neuen Beiträge Access Tabellen & Abfragen: Abfrage, ob eine Abfrage ein Ergebnis hat 3 Esdo 3934 09. Dez 2003, 15:53
Fedaykin Abfrage, ob eine Abfrage ein Ergebnis hat
Keine neuen Beiträge Access Tabellen & Abfragen: Access 97 Abfrage Duplikate 9 gast 2419 02. Dez 2003, 14:39
Kay Access 97 Abfrage Duplikate
Keine neuen Beiträge Access Tabellen & Abfragen: SQL Abfrage mit VBA 3 daMike 1729 26. Nov 2003, 17:58
daMike SQL Abfrage mit VBA
Keine neuen Beiträge Access Tabellen & Abfragen: WENN Formel in einer Abfrage in ACCESS (erledigt) 2 Roger Büttler 9608 19. Nov 2003, 23:20
Roger Büttler WENN Formel in einer Abfrage in ACCESS (erledigt)
 

----> Diese Seite Freunden empfehlen <------ Impressum - Besuchen Sie auch: Dreamweaver Forum