第二步:打开article_show.asp article_show2.asp
查找<!-- ********网页中部代码开始******** -->
在其下加入一行“<title>历史风云网——<%=ArticleTitle%></title>”(将“历史风云网”换成您网站的名字)
打开soft_show.asp <table width="760" border="0" align="center" cellpadding="0" cellspacing="0">
在其上插入一行<title>历史风云网——<%=SoftTitle%></title>(将“历史风云网”换成您网站的名字)
后台——网站模板管理 ——分页面模板(page_index) | 界面风格 ——<!-- ********网页中部代码开始******** -->
下加入一行<title>历史风云网,给您想看的历史!</title>
后台——网站模板管理 ——分页面模板(page_article_index) | 界面风格 ——<!-- ********网页中部代码开始******** -->
下加入一行<title>历史风云网文章首页</title>
其他地方如果发现没标题也是同样道理修改!
[52] 问: 我想让网友可以看到我的会员级别的收费文章内容的头10个字而不是上百的字..请问怎么修改呀? (7月1日21时)
inc/syscode_Article.asp查找 ErrMsg="<p align=left><b>内容预览:</b>" & left(nohtml(rs("Content")),300) & "……</p>" & ErrMsg将300换成您想要的数字!
[53] 问: 在文章浏览页面加个“编辑本文” (7月12日11时)
当您浏览正文时(前台)有时无意发现某篇文章有错误,怎么办?进入后台搜索那篇文章再修改是否麻烦了点,如果我们浏览时可以直接点击“编辑本文”即加入修改页面,不是省事些吗?其实修改起来也非常简单:article_show.asp article_show2.asp搜索| <a href="Article_Print.asp?ArticleID=<% =rs("ArticleID") %>">打印此文</a>将其替换成|<a href="Admin_ArticleModify.asp?ArticleID=<% =rs("ArticleID") %>">编辑此文</a>|看看正文下面是否多了个“编辑本文”?(发表评论 | 告诉好友 | 打印此文 | 后面),如果您以管理身份登陆,点击后可以直接加入修改本文页面,如果非管理点击后打开的是管理登陆界面,不会带来什么安全问题!
17.如何修改网页背景
18.如何去掉或修改底部大图
19.首页调用论坛新贴的问题
以下从http://djxx./djbbs/dispbbs.asp?boardid=26&star=1&replyid=780&id=438&skin=0&page=1整理
[54] 问: 论坛不能搜索的问题
网站模板管理-->分页面模板(page_index)-->界面风格-->template.html(0)--> onClick="javascript:document.search.action=‘forum/queryResult.asp?sType=2&pSearch=1&SearchDate=ALL&Stable=bbs1&boardid=0‘;document.search.Field.value=‘Title‘;"style="background-color: #CEDEFA;"> 论坛 改为 onClick="javascript:document.search.action=‘bbs/query.asp?sType=2&pSearch=1&SearchDate=ALL&Stable=bbs1&boardid=0‘;document.search.Field.value=‘Title‘;"style="background-color: #CEDEFA;"> 论坛
[55] 问: 论坛频道添加网站频道添加-->管理-->交流论坛-->修改 把 链接地址 改为 "./bbs"
[56] 问: 论坛新贴显示修改
首先确认论坛首页调用文件已经修改好(具体见动网说明) 网站模板管理 -->分页面模板(page_index)-->界面风格-->template.html(0) 把其中的论坛调用代码修改为: <script src=‘./bbs/newtopic.asp?boardid=all&lock=0&bname=0&tlen=16&n=10&sdate=&orders=4&info=3&action=1&reply=0&showpic=1‘></script>
[57] 问: 文章那个小图标的问题:
打开 article_index.asp 把 Dim TempStr Dim ShowAnnounce_article_indexstr TempStr = Replace(template.html(0),"{$width}",nt2003.mainsetting(0)) TempStr = Replace(TempStr,"{%ShowUserLogin}",ShowUserLogin()) TempStr = Replace(TempStr,"{$ShowElite}",ShowElite(8,24)) TempStr = Replace(TempStr,"{$PicUrl}",nt2003.Site_PicUrl) ‘ 把这一句移动到本节最后 TempStr = Replace(TempStr,"{$ShowPicArticle}",ShowPicArticle(0,1,12,1,1,100,75,200,false,false)) TempStr = Replace(TempStr,"{$ShowPicArticle2}",ShowPicArticle(0,4,18,1,4,120,90,200,false,false)) TempStr = Replace(TempStr,"{$ShowHot2}",ShowHot(10,14)) TempStr = Replace(TempStr,"{$ShowHot1}",ShowHot(10,14)) TempStr = Replace(TempStr,"{$ShowSiteCount}",ShowSiteCountAll) TempStr = Replace(TempStr,"{%ShowSpecial}",ShowSpecial(10)) TempStr = Replace(TempStr,"{$ShowTopUser}",ShowTopUser(10)) TempStr = Replace(TempStr,"{$ShowClassNewarticle}",nt2003.showarticleshiyu()) TempStr = Replace(TempStr,"{$ShowClassNavigation}",ShowClassNavigation) TempStr = Replace(TempStr,"{$ShowSearchForm}",ShowSearchForm("Article_search.asp",1)) 调整为 Dim TempStr Dim ShowAnnounce_article_indexstr TempStr = Replace(template.html(0),"{$width}",nt2003.mainsetting(0)) TempStr = Replace(TempStr,"{%ShowUserLogin}",ShowUserLogin()) TempStr = Replace(TempStr,"{$ShowElite}",ShowElite(8,24)) TempStr = Replace(TempStr,"{$ShowPicArticle}",ShowPicArticle(0,1,12,1,1,100,75,200,false,false)) TempStr = Replace(TempStr,"{$ShowPicArticle2}",ShowPicArticle(0,4,18,1,4,120,90,200,false,false)) TempStr = Replace(TempStr,"{$ShowHot2}",ShowHot(10,14)) TempStr = Replace(TempStr,"{$ShowHot1}",ShowHot(10,14)) TempStr = Replace(TempStr,"{$ShowSiteCount}",ShowSiteCountAll) TempStr = Replace(TempStr,"{%ShowSpecial}",ShowSpecial(10)) TempStr = Replace(TempStr,"{$ShowTopUser}",ShowTopUser(10)) TempStr = Replace(TempStr,"{$ShowClassNewarticle}",nt2003.showarticleshiyu()) TempStr = Replace(TempStr,"{$ShowClassNavigation}",ShowClassNavigation) TempStr = Replace(TempStr,"{$ShowSearchForm}",ShowSearchForm("Article_search.asp",1)) TempStr = Replace(TempStr,"{$PicUrl}",nt2003.Site_PicUrl) ‘就是这一句,是从上面移动下来的
[58] 问: 首页顶部图象修改
CSS(51dsn03)修改 .nav_main { background-color: #2C92DC; background-image: url(Skin/51dsn03/top_main01.jpg); background-repeat: no-repeat; height: 138px; } 说明:我直接把自己的图片改名为top_main01.jpg,然后上传到/skin/51dsn03/下面,由于自己的图片高度为138,所以在这个地方修改为138。
[59] 问: 3。6的论坛新贴调用在哪啊!偶找了好久!没找到!说明里也没有!即使连接不是ASP153的论坛!可是仍然是这里的新贴!请调用到那里的高手们指教!
答:(haihui )
后台模板管理中,分页面模板(page_index) ,界面风格,找找asp163.net
答二:(BoPo 2004-6-11 1:10:00)
关于首页调用动网论坛的修改-今天刚刚做好的 先到动网的官方网站,下载一个首页显示的文,按说明先安装到论坛上,会生成一个代码,<script>.....</script>.然后到后台的模版管理中巴page_index里的中间部分找到。有个一个<script scr=XXXX.com/topic.asp~~~~~>.....</script>把这段改称你的论坛地址就ok了。
[60] 问: 自由动力为什么新注册用户默认点数是100点?? 自由动力3.6为什么新注册用户默认点数是100点?在后台设置注册用户初始点数是0,可是没有变化。
答:( 一枝梅 2004-6-12 8:55:00) 打开论坛的reg.asp文件: 找到:rs("UserPoint")=100 把那个100改成你想要的数字!
[61] 问: 表格涨了不知如何处理,在最新调查之间表格涨了如何修改
答:(提交人:shiyu 2004-6-15 20:11:00) 1、style="word-break:break-all;Width:fixed"
2、style="word-break:break-all;">
在表格属性中加 上面其中的一个代码 看看
[62] 问: 一级分类菜单“首页”去除大法function.asp中 找到这个函数 Public Sub loadclasslist() 下数第四个value= 改成 value = value & "stm_ai(‘p0i0‘,[0,‘‘,‘‘,‘‘,-1,-1,0,‘‘,‘_self‘,‘‘,‘‘,‘‘,‘‘,0,0,0,‘‘,‘‘,0,0,0,0,1,‘#f1f2ee‘,1,‘#cccccc‘,1,‘‘,‘‘,3,3,0,0,‘#fffff7‘,‘#000000‘,‘#000000‘,‘#000000‘,‘9pt 宋体‘,‘9pt 宋体‘,0,0]);" & vbcrlf
这句话只是让第一个小|线不显示 然后下面那句 value = value & "stm_aix(‘p0i1‘,‘p0i0‘,[0,‘首 页‘,‘‘,‘‘,-1,-1,0,‘" & ChannelUrl & "‘,‘_self‘,‘" & ChannelUrl & "‘,‘‘,‘‘,‘‘,0,0,0,‘‘,‘‘,0,0,0,0,1,‘#f1f2ee‘,1,‘#cccccc‘,1,‘‘,‘‘,3,3,0,0,‘#fffff7‘,‘#ff0000‘,‘#000000‘,‘#cc0000‘,‘9pt 宋体‘,‘9pt 宋体‘]);" & vbcrlf 就是这句,去了 保存 后台需要保存修改
[63] 问: 如何在首页不显示下载更新时间的话 答:把index.asp中过程名为ShowNewSoft的 [<font color=#999999>" & strcol(5) & "</font>] 去了
[64] 问: 3.6图片滚动的方法 演示:http:///web
首先保证有六张图片以上 然后就下面代码
<script> var speed=10 demo2.innerHTML=demo1.innerHTML function Marquee(){ if(demo2.offsetWidth-demo.scrollLeft<=0) demo.scrollLeft-=demo1.offsetWidth else{ demo.scrollLeft++ } } var MyMar=setInterval(Marquee,speed) demo.onmouseover=function() {clearInterval(MyMar)} demo.onmouseout=function() {MyMar=setInterval(Marquee,speed)} </script>
复制到模版管理中的page_index中 <td id="demo1">{$ShowNewPhoto}</td> <td id="demo2"></td> 的后面
[65] 问: 新建了一个分页模板,如何调用! 答:nt2003.loadtemplates("分页模板名")
[66] 问: 整合版短信不能彻底删除的问题解决 错误现象:指定。。。参数
sms_main.asp
找到 case "删除垃圾" 改成 case "删除废件"
如果你的参数不对的话 在sms_main.asp 132行 select case request("action") 这句前面插入 response.write request("action") 然后去运行清空废件箱的过程,看看传过来的参数是什么,然后对照着改下面的语句就可以了
估计错误是: 165行 case "清空垃圾箱" 应该改成 case "清空废件箱"
[67] 问: 怎样修改首页“最新栏目文章”标题的字数、显示标题的条数?默认是6条,我要显示10条,怎么改? 打开index.asp文件,找到 TempStr = Replace(TempStr,"{$ShowNewArticle}",ShowNewArticle(8,40)) 参数中的8代表显示文章的数目,40代表文章的标题字符数,改成你想要的就行了。
[68] 问: 文章中添加的附件,发布后无法下载
答:(提交人: wuwll 2004-6-17 11:19:00) 自力更生,修正文章中添加的附件,发布后无法下载的问题 将Upfile_Article.asp文件中 case else strJS=strJS & "range.text=‘ 点击浏览该文件‘;" & vbcrlf end select 代码修改为: case else strJS=strJS & "range.pasteHTML(‘<A href="& FileName & ">点击浏览该文档</A>‘);" & vbcrlf end select 即可!!
[69] 问: 论坛登陆代码 直接在主页登陆论坛的代码,只是提供一个参考。送给和我一样的菜鸟。(高手就别看了)
简单型的: <table width=543 border=0 cellpadding=0 cellspacing=0> <tr><td height=32 valign="middle"> <FORM action="http://www./bbs/login.asp?action=chk"‘ target="_blank" >http://www./bbs/login.asp?action=chk"; method="post"> <INPUT name=action style="FONT-SIZE: 12px" type=hidden value=login> <font color=#BE5104><b>登录论坛>></b></font> 用户名:<INPUT maxLength=16 name="username" size=15 style="font-size: 12px; background-color: #C0C0C0"> 密码:<INPUT maxLength=16 name="password" size=15 style="font-size: 12px; background-color: #C0C0C0" type=password> <INPUT name=Submit style="FONT-SIZE: 12px" type=submit value=登 录> </FORM> </td></tr> </table>
|