PDA

Vollständige Version anzeigen : Wo ist der Fehler


Jaeger81
25.02.2001, 12:04
Hi! Die Abfrage funktinoierte. Dann habe ich das mit Messdiener.Montag eingefügt. Aber die Abfrage zeigt jetzt überhaupt keine Ergebnisse mehr an.

'Altardienst
Dim cSQL0, nMessid0
If IsNumeric(Kombinationsfeld12.Value) Then
nMessid0 = Kombinationsfeld12.Value

cSQL0 = " SELECT tbl_messdiener.Mess_ID, tbl_messdiener.Name, tbl_messdiener.Vorname, tbl_messdiener.Altardienst, tbl_messdiener.Dienstag"
cSQL0 = cSQL0 & " FROM tbl_messdiener "
cSQL0 = cSQL0 & " WHERE (((tbl_messdiener.Mess_ID) Not In (select Mess_ID2 from tbl_zuteilung where Messen_ID = " & nMessid0
cSQL0 = cSQL0 & " )) AND ((tbl_messdiener.Altardienst)=True)) AND ((tbl_messdiener.Dienstag)=True))"

Altardienst_Auswahl.RowSource = cSQL0
Altardienst_Auswahl.Requery 'Aktualisierung von Altardienst_Auswahl
End If

Walther
26.02.2001, 15:15
Hi Jaeger81

1. Ich finde nirgendwo Montag nur Dienstag
2. zähl mal Deine Klammern. Ich komme auf 17 und das geht nicht. Du brauchst eine gerade Zahl ( schliessende und öffnende zusammengezählt ).

3. Eine Testhilfe:

füg bei so etwas einfach ein
debug.print DeinSQL-Statement
ein.

Mit drag und Drop kannst Du dann das Statemnet aus dem Testfenster in die SQl_ansicht einer "Neuen" Abfrage bewegen. Dann kannst DU das Statement gut austesten.

:) :)

Viele Grüße aus München

Walther