imagino que no te aparece un error o simplemente se realiza la sentencia sin que te despliegue nada, ahora en esos caso, debe mirar como se esta formando tu sentencia para eso
Cita: sql_visi="Delete * From visi Where DATE_FORMAT(vsfecha,'%d/%m/%y') < '"&date()&"'"
'primero que nos despliegue como se formo tu sentencia
reponse.write sql_visi & "<br />"
Conexion.execute sql_visi
if Err=0 then
response.Write "se borraron perfectamente tus registros<br />"
else
response.Write "Existe error"
response.Write "<br />"
response.Write "tu sentencia:" & sql_visi
response.Write "<br />"
response.Write Err
response.Write "<br />"
end if
de esta manera sabras que esta sucediendo
puede ser que estas utilizando la fecha en cierto modo, pero al introducirle valores, esta no cumple con lo que requieres