动网8.1勋章

蓝雨

1、上传“medal_seutp.asp”文件到论坛根目录并执行。

2、上传其它文件到论坛根目录并删除文件“medal_seutp.asp”。
添加菜单“medal_index.asp”。
如果使用了“免修改文件Dv8.1.1”覆盖论坛文件可省略一下步骤。

3、修改文件“dispbbs.asp”：
----------------------------------------------------------------------------------------------------------
找到：
Dim userface
在下边添加
Dim UserMedal,AddMedal
----------------------------------------------------------------------------------------------------------
找到：
userid,useremail,UserIM,UserMobile,Usersign,userclass,Usertitle,Userwidth,Userheight,UserPost,Userface,JoinDate,userWealth,userEP,userCP,Userbirthday,Usersex,UserGroup,LockUser,userPower,titlepic,UserGroupID,LastLogin,UserHidden,IsChallenge,UserMoney,UserTicket,UserAvaSetting,UserIsAva
在后边添加：
,Ex_Medal
----------------------------------------------------------------------------------------------------------
找到：
Next
\'合并数据
在上边添加：
If Not Len(Node.selectSingleNode(\"@ex_medal\").text)=0 Then
AddMedal=split(Node.selectSingleNode(\"@ex_medal\").text&\"\",\",\")
For Each UserMedal In AddMedal
Node.appendChild(postuserlist.createNode(1,\"medal\",\"\")).text=UserMedal
Next
End If
----------------------------------------------------------------------------------------------------------
找到：
Rem 主贴信息节点的插入 节点名称postinfo
在上边添加：
Dim MedalXMLDom
Set Rs=Dvbbs.Execute(\"Select id,medalname,medaltext,medalpic,medalnum,addtime From [Ex_MedalData]\")
If Not Rs.Eof Then
Set MedalXMLDom=Dvbbs.RecordsetToxml(rs,\"row_medal\",\"exmedal\")
For Each Node In MedalXMLDom.documentElement.SelectNodes(\"row_medal\")
Node.selectSingleNode(\"@medalname\").text=replace(Node.selectSingleNode(\"@medalname\").text,\"<\",\"<\")
Node.selectSingleNode(\"@medaltext\").text=replace(Node.selectSingleNode(\"@medaltext\").text,\"<\",\"<\")
Next
XMLDom.documentElement.appendChild(MedalXMLDom.documentElement)
End If
----------------------------------------------------------------------------------------------------------
4、修改文件“dispbbs_html0.htm（Resource\\Template_1\\）”：
----------------------------------------------------------------------------------------------------------
找到：

{/post/setting/@picurl}star/{/post/userlist/user[@userid=$userid]/@titlepic}\"/>>
在下边添加：

----------------------------------------------------------------------------------------------------------