Que tal Dazuaga, gracias por tu colaboracion.
No se si es el codigo o que pero con el bucle sigue igual, supongo que el error no esta ahi sino en el resto del codigo.
Set con = CreateObject( "ADODB.Connection" )
Con.Open("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("\productos1.mdb"))
Chek = Split(Request.Form("Idclas"), ", ")
For i = 0 to UBound(Chek)
SQL="DELETE * FROM clasificados WHERE cod = " & Chek(i)
Next
con.close
set rs = nothing
set con = nothing
Tu ves algo mal?
Gracias de antemano
Tobo
