动网论坛修改大全美化 阿弥陀佛(帖永珍)

来源:└博友窝  编辑:博客代码网  发布时间:2007-03-25  点击:  [收藏]

一、如何去掉论坛底部的阿里巴巴的广告

打开inc目录下的Dv_ClsMain,然后查找If IsSqlDataBase = 0 Or (IsBuss = 0 And IsSqlDataBase = 1),把0改成1 就可以了

二、去除首页的动网文字连接广告

首先到论坛跟目录下找到Loadservoces

查找 xmlserverurl="http://server.dvbbs.net/dvbbs/Dv_xmlservices.asp"然后注释掉,别告诉我你不会注释!就是在前面加个‘

然后找到 Application(Dvbbs.CacheName & "_TextAdservices")

也是把这句话注释掉,不用删除的

三、使友情连接图标紧凑的方法

进入页面模板(page_index)界面风格管理,在template.html(0)中查找一下代码:

<xsl:if test="count(BoardList/bbslink/link[@islogo=0]) mod 6 !=0"><br /></xsl:if>

<hr style="width:98%;"/>

<div style="padding:10px;line-height:40px;">

<xsl:for-each select="BoardList/bbslink/link[@islogo=1]">

<div style="float:left;width:16%;text-align : left;height:40px;" title="{@boardname}

{@readme}"> <a href="{@url}" target="_blank" ><img border="0" src="{@logo}" height="31" width="88" alt="{@boardname}

{@readme}" /></a></div><xsl:if test="(position() mod 6)=0 "><br /></xsl:if>

</xsl:for-each>

将其修改为:

<xsl:if test="count(BoardList/bbslink/link[@islogo=0]) mod 10 !=0"><br /></xsl:if>

<hr style="width:98%;"/>

<div style="padding:10px;line-height:33px;">

<xsl:for-each select="BoardList/bbslink/link[@islogo=1]">

<div style="float:left;width:10%;text-align : left;height:33px;" title="{@boardname}

{@readme}"> <a href="{@url}" target="_blank" ><img border="0" src="{@logo}" height="31" width="88" alt="{@boardname}

{@readme}" /></a></div>

</xsl:for-each>

即可。

说明:数字10为你每行显示的图标个数。数字33为每行的高度。数字10位为每个图标<div>所占的宽度。

四、去掉后台60秒刷新的方法

ADMIN目录 INDEX.ASP文件 删除<meta http-equiv="refresh" content="60">

五、去掉通行证的方法

进入动网默认风格分页面模板(page_index)界面风格管理---template.html(0)找到以下代码

<a href="http://www.dvbbs.net/passport/help.asp" target="_blank" title="注册论坛通行证可让您使用一个帐号通行于国内大部分的网络论坛社区,点击查看更详细帮助">通<xsl:text disable-output-escaping="yes" > </xsl:text>行<xsl:text disable-output-escaping="yes" > </xsl:text>证</a><xsl:text disable-output-escaping="yes" > </xsl:text>:<input type="text" name="passport" size="12" /> <input type="submit" name="submit" value="论坛通行证登录" /> 把以上去掉

动网默认风格分页面模板(page_login)界面风格管理template.html(0)找到代码{$rayuserlogin} 删除即可

template.html(13)里找到:

<TR>

<TD class=tablebody1><B>论坛通行证(可不填写)</B>:<BR>

可绑定已有论坛通行证或新建论坛通行证帐号<BR>

请输入已注册的论坛通行证或需新建的通行证帐号名称

</TD>

<TD class=tablebody1>

<INPUT maxLength=50 size=30 name="Forum_Passport">

<a href="http://www.dvbbs.net/passport/help.asp" title="注册论坛通行证可让您使用一个帐号通行于国内大部分的网络论坛社区,点击查看更详细帮助" target=_blank>关于论坛通行证</a></TD>

</TR>

把以上内容删除

在后台模板(main_style)的Dvbbs.mainhtml(17)

<br /><a href="passport.asp"><font color="blue">论坛通行证设置</font></a>

把以上内容分删除

<script type="text/javascript"></script><script src="http://pagead2.googlesyndication.com/pagead/show_ads.js" type="text/javascript"></script>

六、注册的时候增加填写QQ栏的方法

在后台风格模板总管理page_login 里面的 temp(13)

找到以下代码删除

<TR>

<TD class=tablebody1><B>OICQ号码</B>:<BR>填写您的QQ地址,方便与他人的联系和论坛互动服务</TD>

<TD class=tablebody1><INPUT maxLength=20 size=30 name=OICQ></TD>

</TR>

然后将以下代码

<TR>

<TD class=tablebody1><B>OICQ号码</B>:<BR>强烈推荐填写,方便在论坛上互动联系<font color=red>(4--13位)<br><font color=green>请填写真实的QQ号,否则同时无法显示QQ秀</font></TD>

<TD class=tablebody1><INPUT maxLength=50 size=30 name=OICQ><font color=red>*</font>假的就别填写啦!</TD>

</TR>

放到下面代码以前

<TR>

<TD class=tablebody1><B>Email地址</B>:<BR>请输入有效的邮件地址,这将使您能用到论坛中的所有功能<br>如xxx@yahoo.com.cn,<a href=http://cn.mail.yahoo.com/>如果没有邮箱,请先注册雅虎G免费邮箱</a></TD>

七、公告滚动修改方法

动网默认风格分页面模板(page_index)界面风格管理

template.html(3)找到

<xsl:variable name="marquee" select="0"/><!--设置为1则移动公告-->

<xsl:variable name="maxposition" select="5"/><!--移动公告最多显示多少条-->

<xsl:variable name="show" select="1"/><!--方便不想显示公告的家伙,这里做了开关,设置为0则不显示公告-->

把0设为1就可以

八、验证码看不清楚的修改方法

SP1验证码看不清楚的修改方法

修改后效果:

此主题相关图片如下:

修改方法:

用记事本打开Dv_GetCode.asp文件,把上面几行的个别数值修改为(红色为修改后的,其他的不变):

Const nMaxSaturation = 100 ' 最大色彩饱和度

Const nBlankNoisyDotOdds = 0.2' 空白处噪点率

Const nColorNoisyDotOdds = 0 .1' 有色处噪点率

Const nCharCount = 4 ' 产生的字符个数

Const nPixelWidth = 20 ' 单个字符位图的宽度

Const nPixelHeight = 20 ' 单个字符位图的高度

Const nColorHue = 220 ' 显示验证码的色调(-1表示随机色调, -2表示灰度色调)

Const nAngleRandom = 10 ' 角度随机量

Const nLengthRandom = 10 ' 长度随机量(百分比)

九、注册时增加必答选项,填写论坛名称(防恶意注册用)

(一)、修改reg.asp

1、找到235行-246行的内容

If Request.form("quesion")="" Then

ErrCodes=ErrCodes "<li>" template.Strings(11)

Else

quesion=Request.form("quesion")

End If

If Request.form("answer")="" Then

ErrCodes=ErrCodes "<li>" template.Strings(11)

ElseIf Request.form("answer")=Request.form("oldanswer") Then

answer=Request.form("answer")

Else

answer=md5(Request.form("answer"),16)

End If

在其下面插入

'防止恶意注册添加项 by tlm

If Request.form("Forumname")="" Then

Response.redirect "showerr.asp?ErrCodes=<li>您没有回答“防恶意注册问题答案”!&action=OtherErr"

Else

If Request.form("Forumname")<>Dvbbs.Forum_Info(0) Then

Response.redirect "showerr.asp?ErrCodes=<li>请回答正确的“防恶意注册问题答案”!&action=OtherErr"

End If

End If

2、114行处找到

TempLateStr=Replace(TempLateStr,"{$user_belief}",Selectinfo(5))

在其下面添加一行

TempLateStr=Replace(TempLateStr,"{$Forumname}",Dvbbs.Forum_Info(0))

(二)、然后再看风格处的修改,后台界面风格模板总管理page_login template.html(13)中找到

<INPUT type=text size=30 name=answer>

</TD></TR>

在其下面插入

<TR>

<TD class=tablebody1><B>本论坛的中文名称是什么?</B><BR><font color=red>此条为防止恶意注册必填项!答案:</font><font color=blue>{$Forumname}</font></TD>

<TD class=tablebody1>

<INPUT maxLength=50 size=30 name=Forumname></TD>

</TR>

十、去除搜索代码

入后台管理,找风格界面模板总管理 -> 分页面模板(page_index) -> 界面风格 -> template.html(0),找到如下代码

<div style="float:left;padding:3px;width:49%;height:28px;" >

<div style="float:left;"><a href="http://www.yisou.com/search?pid=400107_1006" target="_blank"><img src="http://server.dvbbs.net/dvbbs/yisou.gif" border="0" alt="一 搜" style="margin-top:10px;margin-left:10px;margin-right:6px;" align="absmiddle"/></a></div>

<form method="POST" action="query.asp" target="_blank">

<input type="hidden" value="2" name="isWeb"/>

<input type="hidden" value="8" name="stype"/>

<div style="float:left;">

<input name="keyword" size="20" value="关键字" onmouseover="this.focus()" onblur="if (this.value =='') this.value='请输入关键字' " onfocus="this.select()" onclick="if(this.value=='请输入关键字')this.value=''" style="height : 18px;border:solid 1px #D4D4D4;BACKGROUND-COLOR: #FAFAFA;COLOR: #4d4d4d;FONT-FAMILY: Arial; margin-top:3px;margin-left:0px;margin-right:5px;"/>

</div>

<div style="float:left;">

<input style="border:solid 1px #D4D4D4;BACKGROUND-COLOR: #FAFAFA; height : 22px;COLOR: #4d4d4d;FONT-FAMILY: Arial; FONT-SIZE:11.5px;margin-top:3px;margin-left:5px;margin-right:5px;" type="submit" value="搜一搜" name="submit"/>

</div>

</form>

</div>

不需要该搜索栏的用户可以把以上代码全部删除或用注释语句 <!-- --> 把它包围起来,主页上的搜一搜就没有了。

主页改好了,还有一个地方需要改,那就是query.asp。鉴于基本不会用到这里的站外查询。所以我们直接清除一搜,还是进入后台管理,找风格界面模板总管理 -> 分页面模板(page_query) -> 界面风格 -> template.html(0)。找到下面4段代码,删除,或者注释掉。

<input type="checkbox" name="isWeb" value="0"/><xsl:text disable-output-escaping="yes" > </xsl:text>

<font color="blue"><xsl:value-of select="$str_11"/></font>

<input type="checkbox" name="isWeb" value="0" onclick="ONSearch('t','SearchMain2',this,'{/xml/@keyword}','{/xml/@SelSearch}')"/>

<xsl:text disable-output-escaping="yes" > </xsl:text><font color="blue"><xsl:value-of select="$str_11"/></font>

<xsl:text disable-output-escaping="yes" > </xsl:text><input type="submit" value="网页搜索" name="submit"/>

如果要把一搜代码替换为baidu或google的,请查看动网论坛修改专题帖2

一、帖子页只给发贴作者加入版权的修改方法

分页面模板(page_dispbbs) template.html(0)

找到:

<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 点击浏览该文件

二、未注册用户只能浏览部分内容

1.修改dispbbs.asp文件

找到

If InStr(Ubblists,",39,") > 0 Then

Node.selectSingleNode("@body").text = dv_ubb.Dv_UbbCode(postbody,UserGroupID,1,0)

Else

Node.selectSingleNode("@body").text = dv_ubb.Dv_UbbCode(postbody,UserGroupID,1,1)

End if

修改成

If InStr(Ubblists,",39,") > 0 Then

If Dvbbs.userid=0 then

Node.selectSingleNode("@body").text = left(Node.selectSingleNode("@body").text,250)&"......<br><br><p></p> <font color=#AAAAAA>您还没有登陆,欲知全文内容,请选择<a href=reg.asp><font color=red>[注册]</font></a>或者<a href=login.asp><font color=blue>[登陆]</font></a>。</font>"

Else

Node.selectSingleNode("@body").text = dv_ubb.Dv_UbbCode(postbody,UserGroupID,1,0)

End if

Else

If Dvbbs.userid=0 then

Node.selectSingleNode("@body").text = left(Node.selectSingleNode("@body").text,250)&"......<br><br><p></p> <font color=#AAAAAA>您还没有登陆,欲知全文内容,请选择<a href=reg.asp><font color=red>[注册]</font></a>或者<a href=login.asp><font color=blue>[登陆]</font></a>。</font>"

Else

Node.selectSingleNode("@body").text = dv_ubb.Dv_UbbCode(postbody,UserGroupID,1,1)

End if

End If

2.修改topicother.asp文件

找到

Templist=Replace(Templist,"{$body}",SimJsReplace(dv_ubb.Dv_UbbCode(SQL(3,i),SQL

修改成

If Dvbbs.userid=0 then

Dvbbs.AddErrCode(6)

Dvbbs.Showerr()

Else

Templist=Replace(Templist,"{$body}",SimJsReplace(dv_ubb.Dv_UbbCode(SQL(3,i),SQL(4,i),1,1)))

End if

三、动网搜索代码修改为baidu或google搜索的方法

进入后台管理,找风格界面模板总管理 -> 分页面模板(page_index) -> 界面风格 -> template.html(0),找到如下代码

<div style="float:left;padding:3px;width:49%;height:28px;" >

<div style="float:left;"><a href="http://www.yisou.com/search?pid=400107_1006" target="_blank"><img src="http://server.dvbbs.net/dvbbs/yisou.gif" border="0" alt="一 搜" style="margin-top:10px;margin-left:10px;margin-right:6px;" align="absmiddle"/></a></div>

<form method="POST" action="query.asp" target="_blank">

<input type="hidden" value="2" name="isWeb"/>

<input type="hidden" value="8" name="stype"/>

<div style="float:left;">

<input name="keyword" size="20" value="关键字" onmouseover="this.focus()" onblur="if (this.value =='') this.value='请输入关键字' " onfocus="this.select()" onclick="if(this.value=='请输入关键字')this.value=''" style="height : 18px;border:solid 1px #D4D4D4;BACKGROUND-COLOR: #FAFAFA;COLOR: #4d4d4d;FONT-FAMILY: Arial; margin-top:3px;margin-left:0px;margin-right:5px;"/>

</div>

<div style="float:left;">

<input style="border:solid 1px #D4D4D4;BACKGROUND-COLOR: #FAFAFA; height : 22px;COLOR: #4d4d4d;FONT-FAMILY: Arial; FONT-SIZE:11.5px;margin-top:3px;margin-left:5px;margin-right:5px;" type="submit" value="搜一搜" name="submit"/>

</div>

</form>

</div>

为方便搜索Internet把原来的一搜改为其他搜索引擎老大如Google或百度。请把上面的代码替换为如下代码。这样你就可以把你的网站作为主页了无需另外打开搜索网站。

1。国际搜索老大Goole的代码:

<!-- Search Google -->

<div style="float:left;padding:3px;height:28px;" >

<center>

<form method="get" action="http://www.google.cn/custom" target="google_window">

<table bgcolor="#e4e8ef">

<tr><td nowrap="nowrap" valign="top" align="left" height="32">

<a href="http://www.google.com/">

<img src="http://www.google.com/logos/Logo_25wht.gif" border="0" alt="Google" align="middle"></img></a>

<input type="text" name="q" size="20" maxlength="255" value=""></input>

<input type="submit" name="sa" value="搜索"></input>

<input type="hidden" name="client" value="your client ID here"></input>

<input type="hidden" name="forid" value="1"></input>

<input type="hidden" name="ie" value="GB2312"></input>

<input type="hidden" name="oe" value="GB2312"></input>

<input type="hidden" name="cof" value="GALT:#008000;GL:1;DIV:#336699;VLC:663399;AH:center;BGC:FFFFFF;LBGC:FFFFFF;ALC:0000FF;LC:0000FF;T:000000;GFNT:0000FF;GIMP:0000FF;FORID:1;"></input>

<input type="hidden" name="hl" value="zh-CN"></input>

</td></tr></table>

</form>

</center>

</div>

<!-- Search Google -->

2.或者改为国内搜索老大百度的代码:

<!-- Search Baidu -->

<div style="float:left;padding:3px;height:28px;" >

<form action="http://www.baidu.com/baidu" target="_blank">

<table bgcolor="#e4e8ef"><tr><td nowrap="nowrap" valign="top" align="left" height="32">

<input name="tn" type="hidden" value="hxjcnzj_pg" />

<a href="http://www.baidu.com/index.php?tn=your cient id here"><img src="http://img.baidu.com/img/logo-80px.gif" alt="Baidu" align="middle" border="0" /></a>

<input type="text" name="word" size="20" />

<input type="submit" value="搜索" />

</td></tr></table>

</form>

</div>

<!-- Search Baidu -->

以上申请百度和google的把"your cient id here"改为自己的代码。

四、帖子美化

分页面模板(page_dispbbs)界面风格管理----template.html(0)

找到<xsl:if test="$checkinfo ='' or <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>

五、去除下拉菜单被下拉框遮挡的问题

在动网的许多页面中,若遇选择性下拉框与下拉菜单相邻,通常下拉菜单会出现部份被选择下拉框挡住的现象。

经过在网上查找相关文档,找到一种利用垫片技术,可修正此弊端。

修改方法:

1、打开in/main.js文件,在文件最后其中增加如下几个函数:

//Opens a shim, if no shim exists for the menu, one is created

function openShim(menu,menuItem)

{

if (menu==null) return;

var shim = getShim(menu);

if (shim==null) shim = createMenuShim(menu,getShimId(menu));

//Change menu zIndex so shim can work with it

menu.style.zIndex = 100;

var width = (menu.offsetWidth == 0 ? menuItem.renderedWidth : menu.offsetWidth);

var height;

if (menu.offsetHeight == 0)

{

var menus = getMenuItemCount(menu);

height = menuItem.renderedHeight * menus;

}

else

{

var height = menu.offsetHeight;

}

shim.style.width = width;

shim.style.height = height;

shim.style.top = menu.style.top;

shim.style.left = menu.style.left;

shim.style.zIndex = menu.style.zIndex - 1;

shim.style.position = "absolute";

shim.style.display = "block";

}

//Closes the shim associated with the menu

function closeShim(menu)

{

if (menu==null) return;

var shim = getShim(menu);

if (shim!=null) shim.style.display = "none";

}

//Creates a new shim for the menu

function createMenuShim(menu)

{

if (menu==null) return null;

var shim = document.createElement("<iframe scrolling='no' frameborder='0'"

"style='; top:0px;"

"left:0px; display:none'></iframe>");

shim.name = getShimId(menu);

shim.id = getShimId(menu);

//Unremark this line if you need your menus to be transparent for some reason

//shim.style.filter="progid:DXImageTransform.Microsoft.Alpha(style=0,opacity=0)";

if (menu.offsetParent==null || menu.offsetParent.id=="")

{

window.document.body.appendChild(shim);

}

else

{

menu.offsetParent.appendChild(shim);

}

return shim;

}

//Creates an id for the shim based on the menu id

function getShimId(menu)

{

if (menu.id==null) return "__shim";

return "__shim" menu.id;

}

//Returns the shim for a specific menu

function getShim(menu)

{

return document.getElementById(getShimId(menu));

}

2、添加好上述函数后,仍在该文件中查找到:

menuobj.thestyle.visibility="visible"

在其后增加一行:openShim(menuobj,vmenuobj)

继续查找到:

function ie_clearshadow()

{

for(var i=0;i<fo_shadows.length;i )

{

if (fo_shadows[i])

fo_shadows[i].style.display="none"

}

fo_shadows=new Array();

}

将其改为:

function ie_clearshadow()

{

for(var i=0;i<fo_shadows.length;i )

{

if (fo_shadows[i])

fo_shadows[i].style.display="none"

}

closeShim(window.menuobj)

fo_shadows=new Array();

}

六、飞行签名的修改方法

打开inc/Dv_ubbcode.asp找到

REM :签名移动(如需使用则把以下屏蔽去掉)

'If InStr(Lcase(s),"[/fly]")>0 Then s=Dv_UbbCode_S1(s,"\[fly\]","\[\/fly\]","fly","<marquee width=90% behavior=alternate scrollamount=3>$1</marquee>")

'If InStr(Lcase(s),"[/move]")>0 Then s=Dv_UbbCode_S1(s,"\[move\]","\[\/move\]","move","<MARQUEE scrollamount=3>$1</marquee>")

把注释去掉就可以飞


文章地址: