日韩天天综合网_野战两个奶头被亲到高潮_亚洲日韩欧美精品综合_av女人天堂污污污_视频一区**字幕无弹窗_国产亚洲欧美小视频_国内性爱精品在线免费视频_国产一级电影在线播放_日韩欧美内地福利_亚洲一二三不卡片区

風訊3系列文章內(nèi)容“畫中畫廣告”實現(xiàn)方法_風訊Cms教程

編輯Tag賺U幣
教程Tag:暫無Tag,歡迎添加,賺取U幣!

在文章內(nèi)容中,我發(fā)現(xiàn)前端時間大家在討論文章顯示內(nèi)容畫中畫的功能,實際上這個功能對于本人是沒有什么用的,因為本人是寫JAVA的,對于ASP這種東西我也不是太懂!��!但是本著學習風訊的態(tài)度,本著貢獻的態(tài)度,就草草的寫了一個實現(xiàn)出來,希望大家不要笑話我�。�!假如有什么不對的地方或者代碼可以寫的更漂亮的地方,希望大家給予我修改一下,同時告訴大家,這種實現(xiàn),我已經(jīng)在風訊的治理控制臺上,增加了相應(yīng)的控制畫中畫的代碼,并且可以控制畫中畫顯示的日期長短�。。。∧阋部梢愿鶕�(jù)你的需要來不停的修改畫中畫顯示的方式。

在此也非常感謝風訊,那個我曾經(jīng)學習過7年城市中能夠出這么好的東西,表示敬佩�。�!

我今天就首先上圖片,等晚上,網(wǎng)速上來,我在發(fā)修改代碼�。。�!
此主題相關(guān)圖片如下:


大家可以完善的地方:

主要是要分析文章找到適當?shù)牟迦氘嬛挟嫃V告的位置,就是再那個字符后面插入的問題,你仔細看看我上面的圖片,就會發(fā)現(xiàn)是斷了句子的,這個不好,最好的方式是增加我下面代碼中分析功能的那個函數(shù)的分析功能,智能判定假如不是新的行,就繼續(xù)下移一個插入字符,直到找到新的行位置,再插入,比較好

程序代碼的更改是比較簡單的,大家多看看,我很少上來,假如有什么問題,希望大家在這個帖子后面說明

Demo地址http://www.passatclub.com.cn

1。找到Manage\Admin\Refresh\Function.asp這個文件

2。找到Function GetNewsContent(TempletContent,NewsRecordSet,NewsContent) 這個函數(shù),大約在282行左右,不一定,因為我更改了很多的風訊的東西。

3。修改后的代碼如下;

Function GetNewsContent(TempletContent,NewsRecordSet,NewsContent)
TempletContent = Replace(TempletContent,"{News_Title}",NewsRecordSet("Title"))
if Not IsNull(NewsRecordSet("SubTitle")) then
TempletContent = Replace(TempletContent,"{News_SubTitle}",NewsRecordSet("SubTitle"))
else
TempletContent = Replace(TempletContent,"{News_SubTitle}","")
end if
if Not IsNull(NewsRecordSet("Author")) then
TempletContent = Replace(TempletContent,"{News_Author}",NewsRecordSet("Author"))
else
TempletContent = Replace(TempletContent,"{News_Author}","")
end if
'====================================================開始
'分析文章內(nèi)容,插入廣告代碼,todo:將在數(shù)據(jù)中設(shè)置一個字段來設(shè)置是否文章中包含廣告內(nèi)容
Dim LeftContent,MidAdContent,RightContent,ModifyContent,headlen,tempStr,headAdStr,tailAdStr
'截取字符串
if len(NewsContent)<400 then
headlen=len(NewsContent)/2
else
headlen=400
end if
tempStr=NewsContent
LeftContent=InterceptString(tempStr,headlen)
'獲取實際的截取的長度
RightContent=Right(NewsContent,Len(NewsContent)-Len(LeftContent))
headAdStr="<table border=0 cellspacing=0 cellpadding=0 align=left><tr><td><div id=""embedAd"" name=""embedAd"" style=""DISPLAY:""><!--畫中畫廣告開始--><table border=0 cellspacing=0 cellpadding=0 style=""margin-top:5px;margin-bottom:3px;margin-left:7px;margin-right:8px""><tr><td><!--畫中畫開始-->"
tailAdStr="<!--畫中畫開始--></td></tr></table></td></tr></table><!--畫中畫廣告結(jié)束--></div>"

查看更多 風訊cms教程  風訊cms模板

共3頁上一頁123下一頁
來源:模板無憂//所屬分類:風訊Cms教程/更新時間:2006-10-29
相關(guān)風訊Cms教程