potresti provare a fare una select delle righe che vuoi cancellare

sql="select * from tabella where campo='x'"
rs.opne sql

while not rs.eof

sql=delete * from tabella
cn.execute sql

rs.movenext

wend