DELETE av vissa poster

Hej!

Sitter här mitt i natten och är allämt trött. Om datumfältet i databasen är mer än 20 minuter gammalt så ska en delete ske,

dim strTime
strTime = time() -20

strSQL = "DELETE FROM Active WHERE ActiveDate < '" & strTime & "'"

objDB.Execute strSQL,,128

skriver jag ut SQL-frågan får jag:

DELETE FROM Active WHERE ActiveDate < '12/11/99 10:14:14 PM'

Problemet är att den raderar rubbet oavsett tid. Använder MySQL.

Mvh Jörgen :)

------------------
Varför bråka när man kan kramas?

Hej!

Återigen slår det in, så fort man postat en fråga här kommer man på hur man gör ;)

dim strTime 
strTime = time()

strTime  = DateAdd("n",-20,strTime)

strSQL = "DELETE FROM Active WHERE ActiveDate < '" & strTime & "'"

objDB.Execute strSQL,,128

mvh Jörgen :)

------------------
Varför bråka när man kan kramas?

[Redigerat av jorgen den 06 okt 2001]