[Access] Datum vergelijking werkt niet

[Wokschotel]

Ik heb een vaag MS-access probleem. Ik ben bezig met het ontwikkelen van een kleine applicatie waarin vanuit een bepaald form een nieuw form moet worden geopend. Welk form dat is hangt af van het product (het product in het huidige vorm) en de datum. We hebben namelijk verschillende trimesters en afhankelijk van het trimester moet een ander formulier worden geopend. Er gaat dus iets mis met de Productie-datum vergelijking. Weet iemand aan de hand van onderstaande code wat het probleem is?

Het relevante deel van de code ziet er zo uit:

code:

Private Sub Command43_Click()
On Error GoTo Err_Command43_Click

    Dim stDocName As String
    Dim stLinkCriteria As String
    Dim Productiedatum As Date
       
    Productiedatum = Me![prod datum]
    
    If Me![Product] = "Product 1" Or Me![Product] = "Product 2" Then
    stDocName = "Diagnose"
    Else
        stDocName = Me![Product]
    End If
    
    If stDocName = "Diagnose" And Productiedatum < #5/1/2005# Then
        stDocName = "Diagnose_tr1"
    Else
        stDocName = "Diagnose_tr2"
    End If
        
    stLinkCriteria = "[steekproef_id]=" & Me![ID]
    DoCmd.OpenForm stDocName, , , stLinkCriteria

Exit_Command43_Click:
    Exit Sub

Err_Command43_Click:
    MsgBox Err.Description
    Resume Exit_Command43_Click
    
End Sub

[ Voor 7% gewijzigd door Wokschotel op 21-02-2006 20:42 ]

[Verwijderd]

Wat is de waarde van Productiedatum?

[Wokschotel]

Verwijderd schreef op dinsdag 21 februari 2006 @ 20:50:
Wat is de waarde van Productiedatum?

Die staat in het formulier waar vanaf dit stuk code wordt aangeroepen en komt uit een Access-tabel met als type 'Date/Time' en staat als DD-MM-YYYY.

[ Voor 10% gewijzigd door Wokschotel op 21-02-2006 21:05 ]

[DigiK-oz]

Die literal, amerikaanse versus europese notatie misschien? Amerikaans = 1 mei, europees = 5 januari?

[Verwijderd]

Sloompie schreef op dinsdag 21 februari 2006 @ 21:09:
Die literal, amerikaanse versus europese notatie misschien? Amerikaans = 1 mei, europees = 5 januari?

Ondanks dat Access alweer een tijdje geleden is, maar die literal is altijd in amerikaanse notatie (een betere notatie zou Dateserial(jaar, maand, dag) zijn).

Wat ik me afvraag, wil je de datum altijd met een vaste waarde vergelijken of is de literal een voorbeeld?

Wat hier nog wel mis kan gaan is dat de conversie van je tabel waarde naar veld Me![prod datum]
en weer door naar de var Productiedatum in de soep loopt.