[推荐]关于蓝雨论坛安装新风格出现的问题解决方法

蓝雨发表于 2007-6-19 10:11:00

问题1. 安装新风格事帖子间的美化没有了解决方法: 完美在帖子中显示个人信息、登陆次数等的修改方法 首先修改dispbbs.asp 找到 Set Rs=Dvbbs.Execute(\"Select userid,useremail,UserIM,UserMobile,Usersign,userclass,Usertitle,Userwidth,Userheight,UserPost,Userface,JoinDate,userWealth,us erEP,userCP,Userbirthday,User***,UserGroup,LockUser,userPower,titlepic,UserGroupID,LastLogin,UserHidden,IsChallenge,UserMoney ,UserTicket,UserAvaSetting,UserIsAva From dv_user Where UserID IN (\"& postuseridlist &\")\") 修改为 Set Rs=Dvbbs.Execute(\"Select userid,useremail,UserIM,UserMobile,Usersign,userclass,Usertitle,Userwidth,Userheight,UserPost,Userface,JoinDate,userWealth,us erEP,userCP,Userbirthday,User***,UserGroup,LockUser,userPower,titlepic,UserGroupID,LastLogin,UserHidden,IsChallenge,UserMoney ,UserTicket,UserAvaSetting,UserIsAva,userlogins From dv_user Where UserID IN (\"& postuseridlist &\")\") 然后后台风格模板 page_dispbbs template.html(0) 查找文章找到 <div>文章：<xsl:value-of select=\"/post/userlist/user[@userid=$userid]/@userpost\"/></div> 后面的省略了。然后替换成 <div>文章：<xsl:value-of select=\"/post/userlist/user[@userid=$userid]/@userpost\"/></div> <div>经验：<xsl:value-of select=\"/post/userlist/user[@userid=$userid]/@userep\"/></div> <div>魅力：<xsl:value-of select=\"/post/userlist/user[@userid=$userid]/@usercp\"/></div> <div>现金：<xsl:value-of select=\"/post/userlist/user[@userid=$userid]/@userwealth\"/></div> <div>金币：<xsl:value-of select=\"/post/userlist/user[@userid=$userid]/@usermoney\"/></div> <div>点券：<xsl:value-of select=\"/post/userlist/user[@userid=$userid]/@userticket\"/>点</div> <div>登陆：<xsl:value-of select=\"/post/userlist/user[@userid=$userid]/@userlogins\"/></div> <div>生日：<xsl:value-of select=\"/post/userlist/user[@userid=$userid]/@userbirthday\"/></div> 就ok了 首页个人信息美化修改 动网默认的在首页显示的个人信息比较凌乱，看起来一点都不爽，所以只得自己动手了。 方法如下： 动网默认风格分页面模板(page_index)界面风格管理template.html(0) 找到： <div>注册：<xsl:value-of select=\"substring-before(BoardList/userinfo/@joindate,\' \')\" /> 登录 <xsl:value-of select=\"BoardList/userinfo/@userlogins\" /> 次 等级：<xsl:value-of select=\"BoardList/userinfo/@userclass\" /></div> <div>金钱：<xsl:value-of select=\"BoardList/userinfo/@userwealth\" /> 积分：<xsl:value-of select=\"BoardList/userinfo/@userep\" /> 魅力：<xsl:value-of select=\"BoardList/userinfo/@usercp\" /></div> <div>主题：<xsl:value-of select=\"BoardList/userinfo/@usertopic\" /> 文章：<xsl:value-of select=\"BoardList/userinfo/@userpost\" /> 精华：<xsl:value-of select=\"BoardList/userinfo/@userisbest\" /> 被删：<xsl:value-of select=\"translate(BoardList/userinfo/@userdel,\'-\',\'\')\" /></div> 改为： <div style=\"float:left;width:130px;height:15px;line-height:15px;\">注册：[<xsl:value-of select=\"substring-before(BoardList/userinfo/@joindate,\' \')\" />]</div> <div style=\"float:left;width:100px;height:15px;line-height:15px;\">等级：[<xsl:value-of select=\"BoardList/userinfo/@userclass\" />]</div> <div style=\"float:left;width:100px;height:15px;line-height:15px;\">登录：[<xsl:value-of select=\"BoardList/userinfo/@userlogins\" />] 次</div> <div style=\"float:left;width:130px;height:15px;line-height:15px;\">金钱：[<xsl:value-of select=\"BoardList/userinfo/@userwealth\" />] 元</div> <div style=\"float:left;width:100px;height:15px;line-height:15px;\">积分：[<xsl:value-of select=\"BoardList/userinfo/@userep\" />] 分</div> <div style=\"float:left;width:100px;height:15px;line-height:15px;\">魅力：[<xsl:value-of select=\"BoardList/userinfo/@usercp\" />] 点</div> <div style=\"float:left;width:130px;height:15px;line-height:15px;\">主题：[<xsl:value-of select=\"BoardList/userinfo/@usertopic\" />] 篇</div> <div style=\"float:left;width:100px;height:15px;line-height:15px;\">文章：[<xsl:value-of select=\"BoardList/userinfo/@userpost\" />] 篇</div> <div style=\"float:left;width:100px;height:15px;line-height:15px;\">精华：[<xsl:value-of select=\"BoardList/userinfo/@userisbest\" />] 篇<img src=\"skins/Default/isbest.gif\" align=\"absmiddle\"/></div> <div style=\"float:left;width:100px;height:15px;line-height:15px;\">被删：[<xsl:value-of select=\"translate(BoardList/userinfo/@userdel,\'-\',\'\')\" />] 篇</div>把签名框起来在后台动网默认风格分页面模板(page_dispbbs)界面风格管理template.html(0)找到</div><xsl:if test=\"/post/userlist/user[@userid=$userid]/@usersign !=\'\' and @signflag =1\"> <div style=\"width:85%;overflow-x: hidden;\" id=\"sigline_{position()}\"> <img src=\"{/post/setting/@picurl}sigline.gif\" /> <xsl:value-of select=\"/post/userlist/user[@userid=$userid]/@usersign\" disable-output-escaping=\"yes\"/> </div> 改为 </div> <xsl:if test=\"/post/userlist/user[@userid=$userid]/@usersign !=\'\' and @signflag =1\"> <div style=\"width:100%;overflow-x: hidden;\"> <fieldset style=\"padding: 10px;\"><legend>这是<xsl:value-of select=\"@username\"/>的签名，帅吧!</legend> <xsl:value-of select=\"/post/userlist/user[@userid=$userid]/@usersign\" disable-output-escaping=\"yes\"/></fieldset> </div> 红色数是框的宽度。注册时将“填写详细资料”默认为打开在：动网默认风格分页面模板(page_login)界面风格管理template.html(13) 找到： <table cellpadding=3 cellspacing=1 align=center class=tableborder1 id=adv style=\"DISPLAY: none\" ><TR align=middle><Th colSpan=2 height=24 align=left>填写详细资料</TH></TR> 将色的代码删除掉即可。贴子美化修改for　DVBBS7.1SP1 默认风格分页面模板(page_dispbbs)界面风格管理template.html(0) <FIELDSET style=\"padding: 10px;\"><LEGEND> <div style=\"line-height:22px;\"><div style=\"float:left;\"><img src=\"{/post/setting/@picurl}topicface/{@expression}\" alt=\"发贴心情\" /></div><xsl:value-of select=\"@topic\" disable-output-escaping=\"yes\"/></div></LEGEND> <xsl:if test=\"@parentid = 0\"> <xsl:if test=\"$mofaface !=\'\' and $mofaface !=\'0\'\"><div style=\"float:right;margin-right:20px;\"><a href=\"javascript:DispMagicEmot({$mofaface},350,500)\"><img src=\"dv_plus/tools/magicface/gif/{$mofaface}.gif\" border=\"0\" alt=\"\"/> 魔法表情 点击重放</a></div> <script type=\"text/javascript\" language=\"javascript\"> LoadMagicEmot(<xsl:value-of select=\"$mofaface\" />,<xsl:value-of select=\"/post/postinfo/@topicid\"/>); </script> </xsl:if> </xsl:if> <div style=\"{$bodystyle}margin-top:10px;word-wrap : break-word ;word-break : break-all ;\" onload=\"this.style.overflowX=\'auto\';\"> <xsl:choose> <xsl:when test=\"@parentid =0 and /post/postinfo/@getmoneytype=3\"><xsl:call-template name=\"checkgetmoney\" /></xsl:when> <xsl:otherwise><xsl:value-of select=\"@body\" disable-output-escaping=\"yes\"/></xsl:otherwise> </xsl:choose> </div></FIELDSET> 7.1sp1精华帖子标题后（上）面加精华图章的修改方法 在新版的7.1.0sp1中测试后可以用 后台模板page_dispbbstemplate.html(0)中找到如下代码： <img src=\"{/post/setting/@picurl}topicface/{@expression}\" alt=\"发贴心情\" /></div><xsl:value-of select=\"@topic\" disable-output-escaping=\"yes\"/> 在其后面加入以下代码即可： <xsl:choose><xsl:when test=\"@isagree!=\'\' or /xml/postinfo/@TopicUseTools!=\'\' or /xml/postinfo/@getmoneytype!=\'0\' or @IsUpload=\'2\' or @IsUpload=\'3\' or @isbest=\'1\'\"><div style=\"position:absolute;width:5px; height:30px; z-index:1; top: 340; left:350 ;\"><xsl:if test=\"@isbest=\'1\'\"><img src=\"Skins/Default/jhtz.gif\" border=\"0\" title=\"蓝雨论坛的精华帖子\" align=\"absmiddle\"/><xsl:text disable-output-escaping=\"yes\" ></xsl:text></xsl:if></div> </xsl:when></xsl:choose> 注：代码中，图章图片“jhtz.gif”必须是透明背景的 *.gif 格式，其存放位置和鼠标经过图章图片时的提示文字“蓝雨论坛的精华帖子”需自己设置。红色数字为图章显示的位置
[此贴子已经被作者于2007-6-30 7:45:07编辑过]

蓝雨发表于 2007-6-19 10:12:00

蓝雨论坛怎么不能安装新的风格问题解决:
将明星插件在新风格模版中重新安装一下就可以了

蓝雨发表于 2007-6-19 10:22:00

关于有些用户换新风格不能注册?解决: 看看是不是你改了什么东西请按照以下的方法查找，是否安装正确。1. 进入后台，风格界面模板总管理，page_login,template.html(13) <TR> <TD class=tablebody1>密码问题： 忘记密码的提示问题</TD> 在此两句上面添加如下代码 <TR> <TD class=tablebody1> <div style="color:red">反论坛群发必填项:</div> <div>为了防止群发软件的恶意注册，</div> <div>请回答以下问题</div> <div style="color:blue;font-size=18px">{$EvilQuesion}</div> </TD> <TD class=tablebody1><INPUT size=30 name=evilanswer> </TD> </TR> 2. 打开reg.asp，找到  在其下添加  找到 TempLateStr=Replace(TempLateStr,"{$user_belief}",Selectinfo(5)) 在其下添加 Randomize Session("EvilID")=int(Rnd*QuesionNum) TempLateStr=Replace(TempLateStr,"{$EvilQuesion}", QuesionArray(Session("EvilID"))) 找到 Else quesion=Request.form("quesion") End If 在其下添加 If Request.Form("EvilAnswer")="" Then ErrCodes=ErrCodes+"<li>"+"请填写防恶意注册问题!" End If If Not CheckEvil(Request.Form("EvilAnswer")) Then ErrCodes=ErrCodes+"<li>"+ "防恶意注册问题回答错误，请返回重试。" End If 3. 增加一个新文件CheckEvil.asp，填写如下代码，并上传到论坛inc目录下，即 /inc/CheckEvil.asp。 <% Dim QuesionArray(100) Dim AnswerArray(100) Dim QuesionNum QuesionNum=5 '请在这里正确设置问题的总数 Function CheckEvil(Answer) Dim TrueAnswer If Session("EvilID")="" Then CheckEvil=False Exit Function End If TrueAnswer=CStr(AnswerArray(Session("EvilID"))) If Answer=TrueAnswer Then CheckEvil=true End If End Function QuesionArray(0)="12的平方是多少？（数字）" AnswerArray(0)="144" QuesionArray(1)="中国最长的河流叫什么名字？" AnswerArray(1)="长江" QuesionArray(2)="“举头望明月”的下句是什么？（提示：低头??乡）" AnswerArray(2)="低头思故乡" QuesionArray(3)="“举头望明月”的下句是什么？（提示：低头??乡）" AnswerArray(3)="低头思故乡" QuesionArray(4)="中国史上唯一的女皇是谁？（提示：武?天）" AnswerArray(4)="武则天" %>

页: [1]

蓝雨动力's Archiver

[推荐]关于蓝雨论坛安装新风格出现的问题解决方法