|
1、文章页里头的栏目导航二级子栏目一行只能排列5个，请问改动哪些文件可以增加同一行中子栏目的排列数量？
：syscode_article.asp 552行:if i mod 6=0 then
将mod 6=0改成你要的数字
syscode_article.asp257行 maxlinemenu=12 '一行最多显示菜单数
＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝
2、3.0升级到3.51，升级过程及提示一切正常。但点击文章标题进入时出错，总提示：
-------------------------------------------------------------------
Java Script Error
Description:未结束的字符串常量。
Source:http://www.***.com/access/Article_Show.asp?ArticleID=185
Line:283
See More Details?
--------------------------------------------------------------------
但忽略还可进入，但不见了栏目导航。试着重新升级一次，故障依旧，不知该如何解决？
：是不是你的栏目说明里面有换行？或'<>/7&*()$%:;"这样的字符？不要使栏目说明包含换行或其它' " ( ) ; < >等字符。
＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝
3、我怎么给首页加个背景图片？
：后台配色模板中［Body的CSS定义］中加上background:url(Skin/2/bg01.gif);background-position: center;
其中background-position: center;是使背景图片居中的。
＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝
4、怎样让一级分类在同一窗口打开?
：在动力系统的inc目录下在syscode_Article.asp syscode_guest.asp syscode_Photo.asp syscode_soft.asp
四个文件里,搜索以下字符rsChannel("LinkUrl")把
strChannel=strChannel & "<a href='" & rsChannel("LinkUrl") & "' target='_blank'>" & rsChannel("ChannelName") & "</a> | "
中的target='_blank'删除掉。
＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝
5、文章系统栏目数过多，怎样才能自动换行？
：syscode_article.asp 257行 maxlinemenu=10 '一行最多显示菜单数
进行设置，其它的图片、软件系统也是一样对syscode_photo 、syscode_soft进行设置，默认是是10个回行。
＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝
6、首页的栏目最多只能有六个显示,能不能显示8 个或者更多?
：在首页index.asp中查找：
sqlRoot="select top 6 C.ClassID,C.ClassName,C.RootID......
将“6”改成你要的数字
＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝
7、怎么修改文章首页中最新栏目文章的每个分栏目主题的数目呢？现在默认是一个栏目能显示8个主题，如果想让他显示6个或更多该怎么改？
：在Article_Index.asp约287行找到：
sql="select top 8 A.ArticleID,A.ClassID,......
改一下这里的“8”
＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝
8、后台“代码广告： 指包含html内容的网站推广代码”这个代码广告我加了，怎么不显示的呀。在哪里显示的呀？
：这个你要在网页中自己添加代码：<% call ShowAD(6) %>。
另：广告调用代码：
<% call ShowAD(0) %>弹出广告
<% call ShowAD(1) %>Banner广告
<% call ShowAD(2) %>栏目广告
<% call ShowAD(3) %>文章内容页广告
<% call ShowAD(4) %>浮动广告
<% call ShowAD(5) %>页面固定广告
<% call ShowAD(6) %>代码广告
＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝
9、首页最新文章内如何显示：栏目+日.月 的形式？
样式： [考试空间] 2003年国家司法考试试卷及答案（四）[10-25]
演示： http://judge.gofree8.net/
'=================================================
'过程名：ShowNewArticle
'作 用：显示最新文章
'参 数：ArticleNum ----最多显示多少篇文章
' TitleLen ----标题最多字符数，一个汉字=两个英文字符
'=================================================
sub ShowNewArticle(ArticleNum,TitleLen)
dim sqlNew,rsNew
if ArticleNum>0 and ArticleNum<=100 then
sqlNew="select top " & ArticleNum
else
sqlNew="select top 10 "
end if
sqlNew=sqlNew & " A.ArticleID,A.Title,A.Author,A.UpdateTime,A.Hits,A.ClassID,L.LayoutFileName from article A inner join Layout L on L.LayoutID=A.LayoutID where A.Deleted=False and A.Passed=True order by A.articleid desc"
Set rsNew= Server.CreateObject("ADODB.Recordset")
rsNew.open sqlNew,conn,1,1
if TitleLen<0 or TitleLen>255 then TitleLen=50
if rsNew.bof and rsNew.eof then
response.write "<li>没有文章</li>"
else
do while not rsNew.eof
response.Write "<li><a href='Article_Class2.asp?ClassID="&rsNew("ClassID")&"'><font color=#4474A3>[" & conn.execute("select * from ArticleClass where ClassID = "& rsNew("ClassID"))("ClassName") & "]</font></a> <a href='" & rsNew("LayoutFileName") & "?ArticleID=" & rsNew("articleid") &"' title='文章标题：" & rsNew("Title") & vbcrlf & "作 者：" & rsNew("Author") & vbcrlf & "更新时间：" & month(rsnew("updateTime")) & "-" & day(rsnew("updateTime")) & vbcrlf & "点击次数：" & rsNew("Hits") & "' target='_blank'>" & gotTopic(rsNew("title"),TitleLen) & "</a>[<font color=red>" & month(rsnew("updateTime")) & "-" & day(rsnew("updateTime")) & "</font>]</li>"
rsNew.movenext
loop
end if
rsNew.close
set rsNew=nothing
end sub
＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝
10、jgxx_zb版主回复：有朋友提出，3.51文章内容页默认字体太小，想改大些怎么办？
：修改前请备份好原文件。在Article_Show.asp中查找以下代码：
<td height="200" valign="top"> <table border="0"
align="left" cellpadding="10" cellspacing="0">
<tr>
<td><% call ShowAD(3) %></td>
</tr>
</table>
<%call ShowArticleContent()%> </td>
改为：
<td height="200" valign="top" style="line-height: 25px;"><font
size="3"> <table border="0" align="left" cellpadding="10"
cellspacing="0">
<tr>
<td><% call ShowAD(3) %></td>
</tr>
</table>
<%call ShowArticleContent()%> </font></td>
其中：25px是行距（可以修改）；<font size="3">是默认字体的大小（红色数字你可以修改，1最小，2、3、4、5……越来越大）
＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝
11、留言板每页显示１０条，把网页拉的老长，怎样修改？
：打开Inc/syscode_guest.asp文件查找如下代码：
strFileName="GuestBook.asp"
GuestPath="images/guestbook/"
MaxPerPage=10
红色数字就是你要修改的。
＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝
如何在打开的文章中不屏蔽复制，即恢复右键功能？
：在文章显示页文件 article_show.asp和article_show2.asp中将
<body <%=Body_Label%> onmousemove='HideMenu()' oncontextmenu="return false" ondragstart="return false" onselectstart ="return false" onselect="document.selection.empty()" oncopy="document.selection.empty()" onbeforecopy="return false" onmouseup="document.selection.empty()">
改成下面的就可以了
<body <%=Body_Label%> onmousemove='HideMenu()' >
＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝
请问用户列表页userlist.asp 这个文件的用户列表的颜色，手标放上去 效果变成蓝的 我想把效果变成另外的颜色应该在什么文件改呢
：在function.asp中的ShowAllUser()定义中
＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝
普通用户添加文章时要有选择模版项怎么办？
：请用下面一个文件覆盖下：
点击浏览该文件
＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝
滚动的公告板如何显示全文？要显示标题与内容，并在标题与内容之间加分号？
：打开function.asp，找到
'过程名：ShowAnnounce
'作 用：显示本站公告信息
在约498行和505行找到
do while not rsAnnounce.eof
response.Write "<a href='#'....
将..."'>" & rsAnnounce("title") & "</div>中的rsAnnounce("title")...改成& rsAnnounce("title") & ";"& rsAnnounce("Content") &
＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝
12.请问斑竹友情连接能不能拉长些？
友情连接只显示3个LOGO滚动，能不能显示的多一点在哪个文件下设置那
在function.asp中找到：
strLink=strLink & "style=overflow:hidden;height:100;width:100>" '新增加的代码
把height:100改为height:200或你想要的数字
13.如何让首页最新文章标题后面加上“NEW”图标？
在syscode_Article.asp中可以找到下面的调用过程代码。注意：用下面代码替换原来的代码，图片自己准备吧。
'=================================================
'过程名：ShowNewArticle
'作 用：显示最新文章
'参 数：ArticleNum ----最多显示多少篇文章
' [1] [2] [3] [4] [5] [6] 下一页 |
