24/01/2002, 18:40
|
| | | Fecha de Ingreso: enero-2002
Mensajes: 57
Antigüedad: 23 años, 4 meses Puntos: 0 | |
| Re: eliminar registros pasado 1 mes
no los borra. que estoy haciendo mal? sera por el formato de la fecha. en la bdd es dd/mm/aaaaa, sin hora.
set oConn = Server.CreateObject("ADODB.Connection")
oConn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ="&Server.MapPath("pedido.mdb&quo t;)
Actual=DATE()
VARIABLE=DateAdd("d", -30, Actual)
sql="DELETE * FROM PEDIDOS WHERE FECHA<=#"&VARIABLE&"#"
set result=oconn.execute(sql)
if err =0 then
response.write("Registro borrado")
end if
|