4.bbs/logout.asp新增红色部分,使在站点首页点退出登录后仍能返回首页:
'-----------------------------------------------------------------
'系统整合
'-----------------------------------------------------------------
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>"
四、动网设置:去掉登录验证码,ok,整合完毕。
五、扩展:
默认dv_user表中的字段有些时候并不能满足我们的实际需求,我们就需要新增字段对其进行扩展,动手吧:
1.打开dv_user表新增一文本类型字段info_1
2.bbs/login.asp的chkuserlogin函数中
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函数中
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("操作系统:" & request.cookies("platform") & "<br>")
后添加
response.write("新增:" & request.cookies("info_1") & "<br>")
6.ok,圆满完成!
六、后记
本次测试的论坛版本为version 7.1.0 sp1,未对其他版本做进行测试,大家有时间都可测下,望告知结果。凌晨五点了,睡觉先...
3
如对本文有疑问,
点击进行留言回复!!
网友评论