del.asp

来自「是个不错的文件代码,希望大家好好用,」· ASP 代码 · 共 16 行

<!--#include file="conn.asp"-->
<%
if session("admin")="" then
response.redirect "index.asp"
end if
lid=request("id")
sql="select * from data where id=cint('"&lid&"')"
set rs=server.createobject("adodb.recordset")
rs.open sql,connstr,3,2
if not rs.eof then
rs.delete
rs.update
response.redirect "index.asp"
end if
%>