leave.asp

论坛系统.有注册,修改,留言,删除等功能,简便容易实现.

<%
Set Conn=Server.CreateObject("ADODB.Connection")
Connstr="DBQ="+server.mappath("bbspp1.mdb")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};DriverId=25;FIL=MS Access;ImplicitCommitSync=Yes;MaxBufferSize=512;MaxScanRows=8;PageTimeout=5;SafeTransactions=0;Threads=3;UserCommitSync=Yes;"
Conn.Open connstr
%>

<%sql="UPDATE 用户表 SET 临时身份=' ' WHERE 临时身份='" & Request("No") & "'"
conn.Execute sql
conn.close%>

<%Response.Redirect "login1.asp"%>