delback.asp

用ASP写的ASP交友系统

<%
id=request("id")

Set conn = Server.CreateObject("ADODB.Connection")
DBPath = Server.MapPath("friend.mdb")
conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & DBPath
set rs_back=server.createobject("adodb.recordset")
sql="delete * from back where id like '" & id & "'"
rs_back.open sql,conn,3,2
response.redirect "your.asp"
%>