无限勋章8.1.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,UserPos

t,Userface,JoinDate,userWealth,userEP,userCP,Userbirthday,Usersex,UserGroup,LockUser,userPow

er,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}\"/>

在下边添加：

style=\"width:125px;margin:0px;text-indent:0px;\">

[@userid=$userid]/medal\">

{/post/exmedal/row_medal[@id=$medalid]/@medaltext}\" style=\"margin-right:3px;margin-

bottom:5px;\"/>

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

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