admsgdd.asp

来自「一套asp编写的供求信息发布网站 一套asp编写的供求信息发布网站」· ASP 代码 · 共 8 行

<%if session("loc")=0 then response.redirect "admin.asp"
set com=server.createobject("adodb.connection")
com.open "DBQ="& Server.MapPath("../joh20msg.mdb")  &";Driver={Microsoft Access Driver (*.mdb)};"
for each a in request("de")
com.execute "delete * from msg where id="& a
next
com.close
response.redirect "admsgd.asp"%>