当前位置:首页>> 文秘工作>> 实务性工作>> 电脑网络

电脑网络

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

以稿换稿 】  作者:佚名   发布:2016年06月22日   阅读:

    修改方法如下:
    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"

【来源:互联网络】

 

相关文章

用户评论

(以下评论仅代表网友意见,与本站立场无关)

网友评论共 0