Jag försöker att skiva en if sats om skall hoppa över posten i tabellen om RecSet("datum") har passerat dagens akutell datum. Jag vill altså bara visa de aktiviteter som är kvar inte de gamla.

<% Dim visa_dagar_kvar

visa_dagar_kvar = DateDiff("d", Date, RecSet("datum"))
'Datum = DateDiff("d", "2002-10-01", "2002-10-02")

if visa_dagar_kvar < 0 Then
RecSet.MoveNext

Else
%>
<% Do Until RecSet.EOF %>

<td width="147" height="19">&nbsp;<% =RecSet("bana") %>&nbsp;</td>
<td width="107" height="19">&nbsp;<% =RecSet("datum") %>&nbsp;</td>

Du kan plocka ut dom direkt med SQL

SELECT * FROM tabel WHERE datum > #"& dateadd("d", -30, now) &"#

Detta funkar på en Accessdatabas, kommer inte ihåg vad man skulle göra om man hade en annan databas.

Då är de nog bara att ersätta # med '

Vilkerote som efterfrågas var ju poster som datumet passerat dagens:
<code>
strSQL = "SELECT * FROM TabellNamn WHERE DatumFält >= #" & Date & "#"
</code>
Du kan även i access skriva:
<code>
strSQL = "SELECT * FROM TabellNamn WHERE DatumFält >= Date()"
</code>

Om du har annan databasmotor:
<code>
strSQL = "SELECT * FROM TabellNamn WHERE DatumFält >= '" & Date & "'"
</code>

Tack för svaren.
Ser nu att servern ger datumformat 14/5 -2003 och alla värden i tabellen har formen 2003-05-14 så hur om vandlar jag det format som kommer från servern?

Vad använder du för databas? Vilken datatyp har fältet?

Om du använder en datum datatyp skall formatet inte spela någon större roll. Har du däremot sträng bör du ändra detta genast.

anväder en access databas och text som kolumnval