Ryd op i MySQL database

Hej Eksperter

Jeg har lavet et script som burde ryde op i min indkøbskurv (poster som er mere end 24 timer gamle):
--------------------------------------------------------------------
'Ryder op i kurven
DateTjek = DatePart("yyyy",date-1) & "-" & DatePart("m",date-1) & "-" & DatePart("d",date-1)
Set RS_kurv_clean = Server.CreateObject("ADODB.RecordSet")
RS_kurv_clean.open "Select * from kurv WHERE dato < " & DateTjek , Conn,1,3
do while not RS_kurv_clean.EOF
RS_kurv_clean.delete
RS_kurv_clean.update
RS_kurv_clean.MoveNext
Loop
RS_kurv_clean.Close
--------------------------------------------------------------------

Men som den skarpe programmør nok har gættet virker det ikke - Den melder ikke fejl, men sletter heller ikke noget :o(

Nogen idéer?

//Z