www.gusucode.com > CC校友录贴吧 CCBar源码程序asp编程 > user/user_exit.asp
<% '=================================================================== '= ASP FILENAME : /user/user_exit.asp '= CREATED TIME : Feb,08,2004 '= LAST MODIFIED: Feb,08,2004 '= VERSION INFO : CCASP Framework Ver 2.0.1 ALL RIGHTS RESERVED BY www.cclinux.com '= DESCRIPTION : 用户退出登陆 '= Change Log: '=================================================================== %> <!-- #include file = "../inc/customer/include_customer_action_execute.asp" --> <!-- #include file = "./user_inc.asp" --> <% '======================================================== '== Action参数设置 '======================================================== '== 页面名 Const CONST_PAGE_FILE = "user/user_exit.asp" '== 页面标题/功能 Const CONST_PAGE_TITLE = "用户退出登陆" '== 功能函数名字空间 Const CONST_ACTION_FUNC = "UserExitCtl" '== 相对根目录路径 GBL_strHomeURL = "../" '== 页面构造 Call ActionBuild() '== 请求校验与过滤 Call ActionFilter(CONST_PAGE_FILE,CONST_ACTION_FUNC) '== 页面析构 Call ActionOver() %> <% '=================================================================== '= Function : UserExitCtl() '= Time : Created At 2006-5-4 '= Input : '= Description : 用户退出登陆 '=================================================================== Function UserExitCtl() '== destory cookie Session(GBL_strCookieURL & "SEN_strUserName") = "" Session(GBL_strCookieURL & "SEN_strUserAccount") = "" Session(GBL_strCookieURL & "SEN_UserId") = "" Session(GBL_strCookieURL & "SEN_strUserAuthen") = "" Session(GBL_strCookieURL & "SEN_strUserAccess") = "" Session(GBL_strCookieURL & "SEN_strIsMaster") = "" Session.Contents.RemoveAll() '==??? '== destory cookie Response.Cookies(GBL_strCookieURL)("user") = "" Response.Cookies(GBL_strCookieURL)("pass") = "" Response.Cookies(GBL_strCookieURL).Expires = Date - 1 Set GBL_objPubDB = Nothing Response.Redirect GBL_strHomeUrl & "index.asp" End Function %>