动网8.0美化修改汇总【随时更新】

轻舞红袖

今天我把修改的地方整理一下，让大家看的更清楚

1：去掉论坛IE标题[]括号的办法

打开INC下的Dv_ClsMain.asp文件
找到以下内容：\"{$title}\",stats&\"[\"&Forum_Info(0)&\"]\")
大概是在1081行，版本不同行数也不一样
把里面的[]去掉就可以了

2：在新窗口中打开帖子

后台界面风格总管理>>>page_index>>>界面风格>>>template.html(1)


[]

改成


[]
target=\"_blank\" >

红色部分是添加的部分

3：移动公告修改

进入后台---风格界面模板总管理----分页面模板(page_index)---template.html(3)

找到：
0\"/>
5\"/>

将0改为1，5改为你想要设置的移动公告的数目

4：在index.asp点击帖子默认平板打开

分页面模板(page_index)－－template.html(0)
找到：

主题：dispbbs.asp?boardid={information/@lastpost_7}&ID={information/@lastpost_6}&replyID={information/@lastpost_1}&skin=1"> select=\"information/@lastpost_3\" disable-output-escaping=\"yes\" />

发贴：dispuser.asp?id={information/@lastpost_5}"> select=\"information/@lastpost_0\"/>>

将红色的1改为2即可。

5：贴子个人信息加入魅力，金钱等

QUOTE:

后台dispbbs mplate.html(0) 中，在积分下加入：

金币：

魅力：

经验：

金钱：

如果调用资料多了有时候会部分表格断线，解决方法就是
动网默认风格分页面模板(page_dispbbs)界面风格管理----template.html(0)
height:200px;width:97%;padding-right:0px;overflow-x:hidden;
therwise>min-height:200px;therwise>
将红色部分数字望大处改!可以500px,你看着改吧!

6：后台模板编辑模式加入查找功能

screen.width*0.7) {this.resized=true; this.width=screen.width*0.7; this.style.cursor=\\\'hand\\\'; this.alt=\\\'Click here to open new window\\nCTRL+Mouse wheel to zoom in/out\\\';}\" onclick=\"if(!this.resized) {return true;} else {window.open(\\\'attachments/dvbbs/2007-7/200771713584127197.jpg\\\');}\" onmousewheel=\"return imgzoom(this);\" alt=\"\" />

看到上图的演示了吧？可以在后台编辑模板时用这个小工具查找代码了，比CTRL+F要方便些，人懒，为了自己方便，需要的可以试试，不算插件，只是功能加强。

打开admin/inc/admin.js，最后一行后面加入以下代码：

QUOTE:

var NS4 = (document.layers);
var IE4 = (document.all);
var win = window;
var n = 0;
function findInPage(str) {
var txt, i, found;
if (str == \"\")
return false;
if (NS4) {
if (!win.find(str))
while(win.find(str, false, true))
n++;
else
n++;
if (n == 0)
alert(\"Not found.\");
}
if (IE4) {
txt = win.document.body.createTextRange();
for (i = 0; i <= n && (found = txt.findText(str)) != false; i++) {
txt.moveStart(\"character\", 1);
txt.moveEnd(\"textedit\");
}
if (found) {
txt.moveStart(\"character\", -1);
txt.findText(str);
txt.select();
txt.scrollIntoView();
n++;
}
else {
if (n > 0) {
n = 0;
findInPage(str);
}
else
alert(\" 对不起，你要的代码在本页没找到\\n 哈哈啦互动娱乐！\");
}
}
return false;
}

打开admin/Template.asp，找到：

QUOTE:

Response.Write \"

注意：
①在这里，您可以新建和修改模板，可以编辑论坛语言包和风格，可以新建模板页面，操作时请按照相关页面提示完整填写表单信息。
②论坛当前正在使用的默认模板不能删除
③如果修改分模板页面名称或删除分模板页面请在关闭论坛之后操作，否则可能会影响论坛访问。\"
Response.Write \"

轻舞红袖

7：后台删除顶部广告后，“收藏本页”、“联系我们”、“论坛帮助”等字样左移(屏幕分辨率设置过大后可发现)

解决办法：
风格main_style dvbbs.mainhtml(4)中

QUOTE:

轻舞红袖

9：左下角提示online.asp有错误的解决办法

首先说明的是，index.asp页面中的脚步错误是因为变量名字错误造成的，找到template0 有一个

这里的变量应当是hiddenframe 修改就OK

次页面因为方法和首页不同，实际上是dvbbs将位置防止错误，template1

找到

QUOTE:

xml/boarddata/@showonline = 1">


therwise>

therwise>

然后将它放置到

QUOTE:

在线数据加载中...

这句话的下面一起就OK了

10：增加搜索引擎友好度

DV发布了8.0，增加了不少功能。今天一好友讨论到7.1首页模板里增加搜索引擎友好度的一段代码，在8.0中消失了。不知道是因为有了Xhtml无图版和Xslt无图版，觉得首页里专门为搜索引擎准备的每版分页没用了，还是其他什么原因。我觉得还是加上好些，反正对速度也没什么影响。

效果：

（搜索机器人抓到的页面）

（普通的WEB访问不会出现，依旧保持8.0的原始界面）

修改步骤

建议：把以下修改将模板中的内容复制到你平常熟悉的文本编辑器，如：记事本、EditPlus 、UltraEdit、DW等中修改，改好替换进去，查找、修改起来比较方便。

步骤：进入后台风格模板管理－－分页面模板(page_index)－－template.html(0)，找到

将粉红色部分替换为以下蓝色部分

/BoardList/forum_setting/@issearch=1">

age=2" title="{@boardtype}第二页">[2]
age=3" title="{@boardtype}第三页">[3]
age=4" title="{@boardtype}第四页">[4]
age=5" title="{@boardtype}第五页">[5]
age=6" title="{@boardtype}第六页">[6]
[7]
[8]
[9]
[10]
[11]
[12]
[13]
[14]
[15]
[16]
[17]
[18]
[19]
[20]

therwise>

therwise>

轻舞红袖

11：动网博客bokeindex.asp 355行出错解决办法

Microsoft VBScript 运行时错误
错误 '800a01a8'

缺少对象: 'DvBoke.SysChatCat.selectSingleNode(...)'

/BokeIndex.asp，行 355

修改方法：

QUOTE:

DvBoke_Sys.SqlStr = "Select Top 8 TopicID,CatID,sCatID,UserID,UserName,Title,PostTime,Child,Hits,IsView,IsLock,sType,LastPostTime,IsBest From [Dv_Boke_Topic] where sType<>2 and IsLock<3 Order By TopicID desc "

改为

QUOTE:

DvBoke_Sys.SqlStr = "SELECT Top 8 TopicID, CatID, sCatID, UserID, UserName, Title, PostTime, Child, Hits, IsView, IsLock, sType, LastPostTime, IsBest From [Dv_Boke_Topic] WHERE NOT sType = 2 AND IsLock < 3 AND sCatID IN (SELECT sCatID FROM [Dv_Boke_SysCat] WHERE sType = 1) ORDER BY TopicID DESC"

同样的将

QUOTE:

DvBoke_Sys.SqlStr = "Select Top 8 PostID,BokeUserID,CatID,sCatID,ParentID,RootID,UserID,UserName,Title, Content,JoinTime From [Dv_Boke_Post] where ParentID>0 Order By PostID desc "

改为

QUOTE:

DvBoke_Sys.SqlStr = "Select Top 8 PostID,BokeUserID,CatID,sCatID,ParentID,RootID,UserID,UserName,Title, Content,JoinTime From [Dv_Boke_Post] where NOT stype=2 And Islock<3 And ScatID IN (SELECT sCatID FROM [Dv_Boke_SysCat] WHERE sType = 1) Order By PostID desc "

12：包含FLASH的帖子，显示为FLASH的链接，并未解析FLASH标签

解决办法：在后台版面高级设置中，开启此版面的FLASH标签

另：

升级为8.0后，音画帖中如果包含有透明FLASH，但是FLASH并未显示透明
解决办法：
inc/dv_ubbcode.asp文件中，找到

QUOTE:

node.setAttribute "wmode","opaque"

将这行代码屏蔽掉，或者改为

QUOTE:

node.setAttribute "wmode","transparent"

小注：因为部份音画帖采用了style样式中的position属性将层拖离，要想让其他用户组发帖可以使用style样式的话，需要修改inc/dv_ubbcode.asp文件，在第19行Const can_Post_Style="1,2,3"中增加允许使用style样式的用户组ID。

轻舞红袖

13：采用伪静态后，论坛首页的圈子调用链接变为HTML，无法由此处打开圈子。

解决办法：
inc/dv_clsmain.asp文件中，找到

QUOTE:

re.Pattern = "]*)index\.asp\?boardid=(\d+)(&|&)action=(.[^&]*)(&|&)topicmode=(\d+)(&|&)page=(\d+)"
str = re.Replace(str,"re.Pattern = "]*)index\.asp\?boardid=(\d+)(&|&)page=(\d+)(&|&)action=(.[^<>""\'\s]*)"
str = re.Replace(str,"re.Pattern = "]*)index\.asp\?boardid=(\d+)(&|&)topicmode=(\d+)"
str = re.Replace(str,"re.Pattern = "]*)index\.asp\?boardid=(\d+)(&|&)page=(\d+)"
str = re.Replace(str,"re.Pattern = "]*)index\.asp\?boardid=(\d+)(&|&)page="
str = re.Replace(str,"re.Pattern = "]*)index\.asp\?boardid=(\d+)"
str = re.Replace(str,"re.Pattern = "]*)index\.asp"

改为

QUOTE:

re.Pattern = "]*=[""]*)index\.asp\?boardid=(\d+)(&|&)action=(.[^&]*)(&|&)topicmode=(\d+)(&|&)page=(\d+)"
str = re.Replace(str,"re.Pattern = "]*=[""]*)index\.asp\?boardid=(\d+)(&|&)page=(\d+)(&|&)action=(.[^<>""\'\s]*)"
str = re.Replace(str,"re.Pattern = "]*=[""]*)index\.asp\?boardid=(\d+)(&|&)topicmode=(\d+)"
str = re.Replace(str,"re.Pattern = "]*=[""]*)index\.asp\?boardid=(\d+)(&|&)page=(\d+)"
str = re.Replace(str,"re.Pattern = "]*=[""]*)index\.asp\?boardid=(\d+)(&|&)page="
str = re.Replace(str,"re.Pattern = "]*=[""]*)index\.asp\?boardid=(\d+)"
str = re.Replace(str,"re.Pattern = "]*=[""]*)index\.asp"

14：后台插件管理、博客管理里面有二处选取颜色的图片不显示

后台插件管理、博客管理里面有二处选取颜色的图片不显示，修改如下：

打开BokeAdmin.asp，找到../images/post/rect.gif改成images/post/rect.gif就可以了，一共有二处，红色部分为去掉的代码

15: 帖子列表一片空白

插件数据库连接出错，请检查连接字串。

请检查道具中心数据库连接，或者其他插件数据库连接

轻舞红袖

16：管理员登陆后管理,个性空间提示本页面为管理员专用，请登录后进入

管理员登陆后管理 个性空间提示

QUOTE:

本页面为管理员专用，请登录后进入。

您没有管理本页面的权限。

还有后台菜单管理也是如此.

解决方法：后台编辑管理员权限，给所有权限

轻舞红袖

18：平板模式 浏览帖子的时候，浏览器横向出现很宽的滚动条

pagination.js更新后无此现象

Pagination.js

ShowPage="

";
改成

ShowPage="

";
就好了

19：对不起，您所在的用户组没有申请圈子权限

用户权限修改。。默认所有组都不能申请的

20：帖子顶楼广告位不能显google广告,只是出现几个代码……google_ad_channel = "";

大家有没有发现，把google广告放到后台广告管理里面发布后前台只是显示：google_ad_channel = "";

因为动网论坛不支持这样的广告代码，其实用一个简单的办法就可以实现，把google广告按以下格式套用进去：

document.writeln("

轻舞红袖

20;在贴子内容模板里插入google代码

在后台模板里插入google广告的代码：

QUOTE:

此处放google广告
]]>

21:去掉flashget下载

inc/Dv_ubbcode.asp

Dim ServerHttp :ServerHttp = Dvbbs.Get_ScriptNameUrl
Dim UserFlashGet
UserFlashGet =1 '指定FLASHGET下载 : 0为关闭，1为开启

其实可以放上自己的flashget广告代码。我的就是放的自己的广告

22:后台admin模板更新出现rs未定义

打开admin/Template.asp，

找到715行：Dim Page

改成：

Dim Page,Rs

红色为新加的代码

23:首页增加快捷发贴按钮

后台模板、index模板、template.html(0)找到：

QUOTE:

后面加上:

QUOTE:

贴子" />

图片自己下载

24:去掉：国内使用量最大的动网论坛

首先你需要用记事本打开根目录下的：

Loadservoces.asp 文件

用查找方式找到：

Application(Dvbbs.CacheName & "_TextAdservices").documentElement.appendChild( Application(Dvbbs.CacheName & "_TextAdservices").createNode(1,"text","")).text=""

换成：

'Application(Dvbbs.CacheName & "_TextAdservices").documentElement.appendChild( Application(Dvbbs.CacheName & "_TextAdservices").createNode(1,"text","")).text=""

也就是注释这一行的意思

接下来，用查找方式找到：

xmlserverurl="http://server.dvbbs.net/dvbbs/Dv_xmlservices.asp"

这一行换成：

'xmlserverurl="http://server.dvbbs.net/dvbbs/Dv_xmlservices.asp"

也就是注释这一行的意思

红色部分为增加的代码，上传后更新一下缓存。最好是多更新几次缓存。

这样的做法效果也达到了。到时候有问题时也不用去查代码是否不在了

25:分栏的左栏的定义和修改

在frameleft.asp里

轻舞红袖

26:让你的IE滚动条变的更漂亮

风格界面模板总管理、当前模板CSS设置(StyleName)、修改CSS样式、aspsky_1.css修改样式内容：

最前面加入：

HTML {
SCROLLBAR-FACE-COLOR: #e9f5fb;
SCROLLBAR-HIGHLIGHT-COLOR: #fbfbfb;
SCROLLBAR-SHADOW-COLOR: #87c2ef;
SCROLLBAR-3DLIGHT-COLOR: #87c2ef;
SCROLLBAR-ARROW-COLOR: #300;
SCROLLBAR-TRACK-COLOR: #f6f6f6;
SCROLLBAR-DARKSHADOW-COLOR: #fbfbfb
}

好了。刷新看效果吧。

如果想让分栏的滚动条也变的漂亮，请打开inc/Templates/leftmenu.xslt
找到以下代码