亚洲乱码中文字幕综合,中国熟女仑乱hd,亚洲精品乱拍国产一区二区三区,一本大道卡一卡二卡三乱码全集资源,又粗又黄又硬又爽的免费视频

ASP類型網(wǎng)站結(jié)合動(dòng)網(wǎng)論壇會(huì)員的方法

 更新時(shí)間:2007年11月03日 16:02:21   作者:  

4.bbs/logout.asp新增紅色部分,使在站點(diǎn)首頁(yè)點(diǎn)退出登錄后仍能返回首頁(yè):

    '-----------------------------------------------------------------
    '系統(tǒng)整合
    '-----------------------------------------------------------------
    Dim DvApi_Obj,DvApi_SaveCookie,SysKey
    If DvApi_Enable Then
        Md5OLD = 1
        SysKey = Md5(Dvbbs.MemberName&DvApi_SysKey,16)
        Md5OLD = 0
        Set DvApi_Obj = New DvApi
            DvApi_SaveCookie = DvApi_Obj.SetCookie(SysKey,Dvbbs.MemberName,"","")
        Set DvApi_Obj = Nothing
        Response.Write DvApi_SaveCookie
        Response.Flush
    End If

    If request("back")="1" Then
        Response.Redirect("../index.asp")
    End If

    '-----------------------------------------------------------------
    'Response.Redirect Dvbbs.Forum_Info(11)
    response.write"<script language=JavaScript>"
    response.write"setTimeout(""window.location='"&Dvbbs.Forum_Info(11)&"'"",1000);"
    response.write"</script>"


四、動(dòng)網(wǎng)設(shè)置:去掉登錄驗(yàn)證碼,OK,整合完畢。

五、擴(kuò)展:

默認(rèn)Dv_User表中的字段有些時(shí)候并不能滿足我們的實(shí)際需求,我們就需要新增字段對(duì)其進(jìn)行擴(kuò)展,動(dòng)手吧:
1.打開(kāi)Dv_User表新增一文本類型字段info_1
2.bbs/login.asp的ChkUserLogin函數(shù)中
Sql="Select UserID,UserName,UserPassword,UserEmail,UserPost,UserTopic,UserSex,UserFace,UserWidth,UserHeight,JoinDate,LastLogin,lastlogin as cometime , LastLogin as activetime,UserLogins,Lockuser,Userclass,UserGroupID,UserGroup,userWealth,userEP,userCP,UserPower,UserBirthday,UserLastIP,UserDel,UserIsBest,UserHidden,UserMsg,IsChallenge,UserMobile,TitlePic,UserTitle,TruePassWord,UserToday,UserMoney,UserTicket,FollowMsgID,Vip_StarTime,Vip_EndTime,userid as boardid"
修改為:
Sql="Select UserID,UserName,UserPassword,UserEmail,UserPost,UserTopic,UserSex,UserFace,UserWidth,UserHeight,JoinDate,LastLogin,lastlogin as cometime , LastLogin as activetime,UserLogins,Lockuser,Userclass,UserGroupID,UserGroup,userWealth,userEP,userCP,UserPower,UserBirthday,UserLastIP,UserDel,UserIsBest,UserHidden,UserMsg,IsChallenge,UserMobile,TitlePic,UserTitle,TruePassWord,UserToday,UserMoney,UserTicket,FollowMsgID,Vip_StarTime,Vip_EndTime,userid as boardid,info_1"
3.bbs/inc/Dv_ClsMain.asp的TrueCheckUserLogin函數(shù)中
Sql="Select UserID,UserName,UserPassword,UserEmail,UserPost,UserTopic,UserSex,UserFace,UserWidth,UserHeight,JoinDate,LastLogin as cometime ,LastLogin,LastLogin as activetime,UserLogins,Lockuser,Userclass,UserGroupID,UserGroup,userWealth,userEP,userCP,UserPower,UserBirthday,UserLastIP,UserDel,UserIsBest,UserHidden,UserMsg,IsChallenge,UserMobile,TitlePic,UserTitle,TruePassWord,UserToday,UserMoney,UserTicket,FollowMsgID,Vip_StarTime,Vip_EndTime,userid as boardid"
修改為:
Sql="Select UserID,UserName,UserPassword,UserEmail,UserPost,UserTopic,UserSex,UserFace,UserWidth,UserHeight,JoinDate,LastLogin as cometime ,LastLogin,LastLogin as activetime,UserLogins,Lockuser,Userclass,UserGroupID,UserGroup,userWealth,userEP,userCP,UserPower,UserBirthday,UserLastIP,UserDel,UserIsBest,UserHidden,UserMsg,IsChallenge,UserMobile,TitlePic,UserTitle,TruePassWord,UserToday,UserMoney,UserTicket,FollowMsgID,Vip_StarTime,Vip_EndTime,userid as boardid,info_1"
4.CheckUserLogin.asp中
Response.Cookies("platform") = UserSession.documentElement.selectSingleNode("agent/@platform").text
后添加
Response.Cookies("info_1") = UserSession.documentElement.selectSingleNode("userinfo/@info_1").text
5.index.asp中
Response.write("操作系統(tǒng):" & Request.Cookies("platform") & "<br>")
后添加
Response.write("新增:" & Request.Cookies("info_1") & "<br>")
6.OK,圓滿完成!

六、后記

本次測(cè)試的論壇版本為Version 7.1.0 Sp1,未對(duì)其他版本做進(jìn)行測(cè)試,大家有時(shí)間都可測(cè)下,望告知結(jié)果。凌晨五點(diǎn)了,睡覺(jué)先... 

相關(guān)文章

最新評(píng)論