1 svar · 160 visningar · startad av Jörgen HP
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 
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