自由動力3.6版90個問答-4

第二步:打開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.sjedu.cn/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://hnkmmyc.com/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.dongwind.com/bbs/login.asp?action=chk"『 target="_blank" >http://www.dongwind.com/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>

< p="">


推薦閱讀:

他自由了,你才能自由
如何看待香港的網路自由?
「相親」才是王道如今自由戀愛已out (圖)
她騙了父母30萬,為渣男的婚姻買自由
在線工作放飛你的自由

TAG:自由 | 動力 | 問答 |