在文章内容中,我发现前端时间大家在讨论文章显示内容画中画的功能,实际上这个功能对于本人是没有什么用的,因为本人是写JAVA的,对于ASP这种东西我也不是太懂!!!但是本着学习风讯的态度,本着贡献的态度,就草草的写了一个实现出来,希望大家不要笑话我!!!假如有什么不对的地方或者代码可以写的更漂亮的地方,希望大家给予我修改一下,同时告诉大家,这种实现,我已经在风讯的治理控制台上,增加了相应的控制画中画的代码,并且可以控制画中画显示的日期长短!!!!你也可以根据你的需要来不停的修改画中画显示的方式。
在此也非常感谢风讯,那个我曾经学习过7年城市中能够出这么好的东西,表示敬佩!!!
我今天就首先上图片,等晚上,网速上来,我在发修改代码!!!!
此主题相关图片如下:
大家可以完善的地方:
主要是要分析文章找到适当的插入画中画广告的位置,就是再那个字符后面插入的问题,你仔细看看我上面的图片,就会发现是断了句子的,这个不好,最好的方式是增加我下面代码中分析功能的那个函数的分析功能,智能判定假如不是新的行,就继续下移一个插入字符,直到找到新的行位置,再插入,比较好
程序代码的更改是比较简单的,大家多看看,我很少上来,假如有什么问题,希望大家在这个帖子后面说明
Demo地址http://www.passatclub.com.cn
1。找到Manage/Admin/Refresh/Function.asp这个文件
2。找到Function GetNewsContent(TempletContent,NewsRecordSet,NewsContent) 这个函数,大约在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
'====================================================开始
'分析文章内容,插入广告代码,todo:将在数据中设置一个字段来设置是否文章中包含广告内容
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><!--画中画广告结束--></div>"