admsgl.asp

信息管理系统 管理页面:admin/index.asp 用户和密码都是admin

<%
set com=server.createobject("adodb.connection")
com.open "DBQ="& Server.MapPath("../data.asp")  &";Driver={Microsoft Access Driver (*.mdb)};"
com.execute "delete * from msg where  edt<#" & date & "#"
com.close
response.redirect "admsg.asp"%>