Hej!
Fungerar nu, tack emission!
strSQL = "DELETE FROM Active " & _
"WHERE ActiveDate < SUBDATE(NOW(),INTERVAL 10 MINUTE)"
objDB.Execute strSQL,,128
mvh Jörgen 
Trådstart#1
Hej!
dim strTime
strTime = Now()
strTime = DateAdd("n",-10,strTime)
strSQL = "DELETE FROM Active WHERE ActiveDate < '" & strTime & "'"
objDB.Execute strSQL,,128
Får ej denna kod att ta bort alla poster som är äldre än 10 minuter. Någon som ser något fel?
r: har provat med Time() också 
mvh Jörgen