quit.asp

大家好

<%
Set Conn=Server.CreateObject("ADODB.Connection")
Connstr="DBQ="+server.mappath("bbsdb.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 user SET pois=' ' WHERE pois='" & Request("No") & "'"
conn.Execute sql
conn.close%>

<script language=javascript>
<!--
	if (! window.confirm("确信离开吗？"))
		window.history.go(-1);
	//if(!	window.close())
	//	window.history.go(-1);
//-->
</script>