數據庫表 user表 中，username（用戶名） pass（密碼） type（超級管理員、高級發文者） cname（單位名稱）登錄頁index.asp<%if request.Form("submit")="登陸系統" thenuser=trim(request.Form("uname"))pass=ucase(md5(request.Form("pass")))if request.Form("uname")="" or request.Form("pass")="" thenresponse.Write alert("錯誤！\n你未填寫 用戶名 或 密碼。\n請重新填寫。","index.asp")elsesql="select * from user where username='"&user&"' and pass='"&pass&"'"set rs=conn.execute(sql)if rs.eof thenresponse.Write alert("錯誤的用戶名 或 密碼!\n請重新檢查，用戶名或密碼是否填寫正確!","index.asp")elsesession("user")=rs("username")session("pass")=rs("pass")session("type")=rs("type")session("cname")=rs("cname")session("uid")=rs("id")response.Redirect "user/index.asp"end ifrs.closeend ifend ifif request.QueryString("action")="q" thensession("user")=""session("pass")=""session("type")=""session("cname")=""session("uid")=""response.Write alert("退出成功!","index.asp")end if%>想實現 超級管理員登錄成功后跳轉到admin/index.asp，其他用戶跳轉到user/index.asp