<%@ Language=VBScript %>
<%
Response.Buffer=true
Response.Expires=0
%>
<!-- #include file="../dsn.asp" -->
<!-- #include file="init.inc" -->
<%
set cn = Server.CreateObject("ADODB.Connection")
cn.Open(mycnstr)

cn.Execute "delete from user_login where keyno="&Session.SessionID

Response.Cookies("usercode")=""
Response.Cookies("userpass")=""
Session.Abandon
Response.Redirect "forum_list.asp"

%>