当前位置:文秘家园>> 文字工作>> 实务性工作>> 电脑网络

电脑网络

怎么实现登录和注销的后自动跳转到首页

    】【收藏】  作者: 佚名  来源: 互联网络  阅读 次 【加入会员

    修改方法如下:
    1、主要修改两个文件,分别是user目录下的User_ChkLogin.asp和User_Logout.asp;
    2、修改User_ChkLogin.asp,
    删除177行
strTempMsg = strTempMsg & "<script type=""text/javascript"" language=""JavaScript"" src=""" & arrAPIs(1) & strLoginParams & """ charset=""gb2312""></script>"

替换180、181行的
strTempMsg = "您已成功登陆,欢迎您的光临!" & strTempMsg
Call WriteSuccessMsg(strTempMsg, ComeUrl)

Call CloseConn
Response.redirect ComeUrl

    3、修改User_Logout.asp,
把47、48、49行的
Response.Cookies(Site_Sn)("UserName") = ""
Response.Cookies(Site_Sn)("UserPassword") = ""
Response.Cookies(Site_Sn)("LastPassword") = ""
移到11行的APISysKey = LCase(MD5(MemberName&API_Key,16))下面

APISysKey = LCase(MD5(MemberName&API_Key,16))
Response.Cookies(Site_Sn)("UserName") = ""
Response.Cookies(Site_Sn)("UserPassword") = ""
Response.Cookies(Site_Sn)("LastPassword") = ""

删除21行的
strTempMsg = strTempMsg & "<script type=""text/javascript"" language=""JavaScript"" src=""" & arrAPIs(1) & strLogoutParams &""" charset=""gb2312""></script>"

替换24、25行的
strTempMsg = "您已成功注销,期待您的再次光临!" & strTempMsg
Call WriteSuccessMsg(strTempMsg,InstallDir & "Index.asp")

Response.Redirect strInstallDir & "Index.asp"


手机扫码阅读本文


 

相关文章