Office Forum
www.Office-Loesung.de
Access :: Excel :: Outlook :: PowerPoint :: Word :: Office :: Wieder Online ---> provisorisches Office Forum <-
Formular öffnen - Bestimmte Datensätze aus Abfrage
zurück: anzahl von WAHR werten im textfeld ausgeben? weiter: Berichte + musik player???? Unbeantwortete Beiträge anzeigen
Neues Thema eröffnen   Neue Antwort erstellen     Status: Antwort Facebook-Likes Diese Seite Freunden empfehlen
Zu Browser-Favoriten hinzufügen
Autor Nachricht
Windtalker85
Neuling


Verfasst am:
22. Apr 2009, 10:16
Rufname:

Formular öffnen - Bestimmte Datensätze aus Abfrage - Formular öffnen - Bestimmte Datensätze aus Abfrage

Nach oben
       Version: Office 2k (2000)

Habe folgendes Problem. Ich habe in einem Formular einen Button der mir ein neues Formular öffnet und den Dazu passenden Datensatz anzeigt. Da dieses angezeigt Formular aus Abfrage resultiert habe ich ein Problem wenn kein Passender Datensatz gefunden wird. Hier bleibt das Fenster leer. Ich würde nun gerne, falls kein passender Datensatz gefunden wird, eine Meldung ausgeben und ein anders Formular öffnen um einen neuen Eintrag zu erstellen.

Kann mir hier bitte jemand weiterhelfen.
Derzeit sieht mein Programmteil so aus:
Code:
Private Sub Open_Prot_2_Click()
On Error GoTo Err_Open_Prot_2_Click
    Dim stDocName As String
    Dim stLinkCriteria As String

    stDocName = "Pruefprotokoll_Abfrage_Formular"
    stLinkCriteria = "[Projektnummer]=" & "'" & Me![Auftrags-Nr] & "'"
    MsgBox "Das Ergebniss" & stLinkCriteria
'    If stLinkCriteria.Value Then
'        stDocName = "Pruefprotokoll_Abfrage_Formular"
'        DoCmd.OpenForm stDocName, , , stLinkCriteria
'      Else
'        stDocName = "pruefprotokoll_Formular"
'        DoCmd.OpenForm stDocName, , , stLinkCriteria
'    End If
Exit_Open_Prot_2_Click:
    Exit Sub
Err_Open_Prot_2_Click:
    MsgBox Err.Description
    Resume Exit_Open_Prot_2_Click
End Sub
Die If abfrage hab ich auskommentiert weil sie nutzlos ist. die Variable bleibt immer gleich und liefert keine information ob nun ein Datensatz mit dem gesuchten Feld existiert oder nicht.
JörgG
Access-Team


Verfasst am:
22. Apr 2009, 18:57
Rufname:
Wohnort: b. Dresden


AW: Formular öffnen - Bestimmte Datensätze aus Abfrage - AW: Formular öffnen - Bestimmte Datensätze aus Abfrage

Nach oben
       Version: Office 2k (2000)

Hallo,

Du kannst als If-Bedingung zB mit DCount() prüfen ob es DS gibt:
Code:
Private Sub Open_Prot_2_Click()
    Dim stLinkCriteria As String, stDocName As String
   
    stLinkCriteria = "Projektnummer = '" & Nz(Me![Auftrags-Nr], "") & "'"
    If Nz(DCount("*", "Tabellenname", stLinkCriteria), 0) > 0 Then
        MsgBox "Gefunden"
        stDocName = "Pruefprotokoll_Abfrage_Formular"
      Else
        MsgBox "Nichts gefunden!"
        stDocName = "pruefprotokoll_Formular"
    End If
    DoCmd.OpenForm stDocName, , , stLinkCriteria
End Sub
Question Welchen Datentyp besitzt die Projektnummer (Text/Zahl)?
_________________
MfG, Jörg Very Happy

Bitte das Feedback nicht vergessen.
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: Abfrage mit Auswahlkriterium über 2 Tabellen 1 Majo 1907 24. Feb 2004, 13:54
Willi Wipp Abfrage mit Auswahlkriterium über 2 Tabellen
Keine neuen Beiträge Access Tabellen & Abfragen: Abfrage Problem 4 shorty 1883 20. Feb 2004, 20:00
shorty Abfrage Problem
Keine neuen Beiträge Access Tabellen & Abfragen: [DANKE-ERLEDIGT] verschachtelte Abfrage 13 ppc 1478 17. Feb 2004, 19:46
ppc [DANKE-ERLEDIGT] verschachtelte Abfrage
Keine neuen Beiträge Access Tabellen & Abfragen: Formulargesteuerte Abfrage 2 obismarck 2699 17. Feb 2004, 17:03
obismarck Formulargesteuerte Abfrage
Keine neuen Beiträge Access Tabellen & Abfragen: Min() Abfrage 4 augenzeuge 1056 17. Feb 2004, 10:13
Gast Min() 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: inventar abfrage 5 nooby 2254 05. Feb 2004, 14:46
nooby inventar abfrage
Keine neuen Beiträge Access Tabellen & Abfragen: Inhalt einer Abfrage überschreiben? 1 Esdo 1247 13. Jan 2004, 12:35
Bernd Schenkel Inhalt einer Abfrage überschreiben?
Keine neuen Beiträge Access Tabellen & Abfragen: Abfrage 2 Klaus 1957 11. Jan 2004, 22:35
Gast Abfrage
Keine neuen Beiträge Access Tabellen & Abfragen: Kreuztabellenabfrage, Datensätze gruppieren 1 Bob 1014 09. Dez 2003, 15:45
Esdo Kreuztabellenabfrage, Datensätze gruppieren
Keine neuen Beiträge Access Tabellen & Abfragen: Parameter abfrage 3 Gast 1903 01. Dez 2003, 16:12
Caladan Parameter abfrage
Keine neuen Beiträge Access Tabellen & Abfragen: summe in abfrage runden 2 Caladan 2761 27. Nov 2003, 10:18
Caladan summe in abfrage runden
 

----> Diese Seite Freunden empfehlen <------ Impressum - Besuchen Sie auch: Access Tabellen