Dato og tids formateringer volder tit problemer.
Hvis du vil regne på dato'er, bør du konvertere dem til tal på formen
YYYYMMDD
så kan du f.eks:
If (intDatoFra > intDatoTil) Then ' ? 20030804 > 20030803
boolDatoUdloebet = True
End If
"Belial" <666_NOSPAM@esenet.dk> wrote in message
news:3f3ca251$0$97273$edfadb0f@dread12.news.tele.dk...
> Jeg har en side med noget kalender-halløj. Når man indtaster indholdet til
> databasen skal man endvidere indtaste en dato fra hvilken man ikke længere
> ønsker at en bestemt post skal vises. Hvis en aktivitet f.eks. foregår den
> 03-08-2003 skal den ikke længere vises når datoen er den 04-08-2003.
> Problemet er, at den bliver ved med at vise de poster som den ellers får
> besked om ikke længere at skulle vise. Datoformatet som man indtaster -
> altså den dato man ikke længere ønsker at en besked skal vises mere - er
> f.eks. 03-08-2003. Nogle der ved hvor problemet ligger?
>
> Koden på siden ser således ud:
>
> <table width="100%" border="1" align="center" cellspacing="0"
> cellpadding="6" bordercolor="FFFFFF">
> <%
> Dag = Day(Date())
> Maaned = Month(Date())
> Aar = Year(Date())
> %>
> <tr>
> <td bgcolor="#515EAD" colspan="3">
> <font class="hvid_overskrift">August 2003</font>
> </td>
> </tr>
> <%
> dtmDato = FormatDateTime(Date(),vbShortDate)
> sql = "SELECT * FROM akt_fano_dk WHERE menu_punkt =
'august2003'
> and slettes < DateSerial(" & Aar & ", " & Maaned & ", " & Dag & ") ORDER
BY
> dato"
> Set objRS = Connect.Execute(sql)
> do until objRS.eof
> %>
>
> og her kommer der så nogle flere måneder som vises på samme måde...
>
>