Jämföra datum

Jag har denna RS

strDate=Date()
Set bday=objConn.Execute("Select * From tblUsers where persnr="&strDate)

och sen denna kod

<%If bday.EOF then%>
 Ingen födelsedag idag <%=Date()%>
<%Else
Do until bday.EOF%>
 Grattis på födelsedagen <%=bday("username")%>
<%bday.MoveNext: Loop
End If%>

För att testa så satte jag mitt födelsedatum till dagens månad och dag men den visar bara ingen födelsedag....varför?

Är du säker på att databashanterarens datumformat är utformat på samma sätt som det i VBScript? Använd databashanterarens datumfunktioner istället.

RED: Vilken databashanterare använder du?

har samma datumformat i db-n och typen är Date/Time i databasen

Använder för tillfället MS Access

Länge sedan jag använde access, men en gissning blir:

sql = "SELECT * FROM tblUsers WHERE persnr = '" & date() & "'"

Möjligen måste du byta ut ' mot # beroende på version av Access. Men minns jag inte fel kan man skicka in datumfunktioner direkt i sql-frågan Access.

WebbisNet skrev:

har samma datumformat i db-n och typen är Date/Time i databasen

Använder för tillfället MS Access

Om du ska lagra personnummer bör du inte ha datetime utan bara vanligt datum. Annars blir det knas att använda date(). Du har ju ingen tid att ta hänsyn till i ett personnummer, utan bara år, månad och dag.

Select * 
From tblUsers 
where month(persnr) = month(date())
and day(persnr) = day(date())

Flyttas från ASP

K@llen skrev:

WebbisNet skrev:

har samma datumformat i db-n och typen är Date/Time i databasen

Använder för tillfället MS Access

Om du ska lagra personnummer bör du inte ha datetime utan bara vanligt datum. Annars blir det knas att använda date(). Du har ju ingen tid att ta hänsyn till i ett personnummer, utan bara år, månad och dag.

Men i access finns bara date/time och jag har short date som ger formatet XXXX-XX-XX vilket är samma som Date() med XXXX-XX-XX