asp使用者退出登陸代碼

asp使用者退出登陸代碼
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<%
session("aname")=""
session("admin_flag")=""
session.Abandon()
response.Redirect("login.asp")
 %>
 
 <%
Session.timeout=60
if isempty(session("aname")) or len(session("aname"))=0 or isempty(session("admin_flag")) or len(session("admin_flag"))=1 or session("admin_flag")<>"into" then 
  founderr=true
  errmsg=errmsg+"<br>"+"<li>你尚未登入，或者逾時了！請<a href='login.asp' target='_parent' >重新登入</a>！"
  Call diserror()
  response.End
End if

%>