插入关键字 文章采集器(把标题与关键字表中的记录匹配匹配的标签!)

　　插入关键字 文章采集器(把标题与关键字表中的记录匹配匹配的标签!)

　　[IT168技术文章]为了方便搜索引擎文章系统模仿NB制作下一页关键字的标签

　　第一步

　　在foosun\admin\refresh\function中找到ASP

　　函数GetNewsContent（TempletContent、NewsRecordSet、NewsContent）

　　templatcontent=Replace（templatcontent，{News_Title}，新闻记录集（“Title”））

　　加在下面

　　'关键字标签

　　如果不为空（新闻记录集（“关键字”）），则

　　TempletContent=Replace（TempletContent，“{News_keywords}”，新闻记录集（“关键字”））

　　否则

　　TempletContent=Replace（TempletContent，{News_keywords}，“”）

　　如果结束

　　'关键字标签

　　在倒数第二行%>之前，添加

　　"************************************

　　作者：利诺

　　'将标题与关键字表中的记录匹配

　　“开始

　　"*************************

　　函数replaceKeywordByTitle（标题）

　　Dim where is keyword，i，theKeywordOnNews

　　Dim关键字，rsRuleObj，关键字

　　“***如果您使用的是3.版本0，请将以下行FS_uuChangeRoutine改为routine

　　设置RsRuleObj=Conn.Execute（“从FS_例程中选择*）

　　不做而不做。Eof

　　关键字=RsRuleObj（“名称”）

　　其中IsKeyword=InStr（Lcase（标题），Lcase（关键字））

　　如果（whereisKeyword>0)那么

　　如果（关键字onnews=”“）那么

　　关键字onnews=关键字

　　否则

　　关键字onnews=关键字onnews&&&keyword

　　如果结束

　　如果结束

　　RsRuleObj。下一步

　　环路

　　'如果关键字的长度大于100，请截断过长的关键字

　　如果（len（关键字onnews）>99)那么

　　关键字ONNEWS=左（关键字ONNEWS，99)

　　如果结束

　　replaceKeywordByTitle=关键字OnNews

　　端函数

　　"**********************

　　"完!

　　步骤2

　　在foosun/funpages/lablenews asp

　　选择“插入已找到的字段”

　　加在下面

　　'页面关键字标签

　　页面关键字

　　'页面关键字标签

　　步骤3

　　在foosun/admin/Info/newswords上，ASP

　　INewsAddObj（“关键字”）=Replace（Replace（请求（“关键字文本”），“”，“”，“”，“，”）

　　将这句话改为

　　"************************************

　　作者：利诺

　　'调用replacekeywordbytitle方法以筛选关键字

　　'如果用户自定义了关键字，则自动关键字设置不起作用

　　“开始

　　"*************************

　　Dim关键字文本

　　如果（请求（“关键字文本”）为“”或为空（请求（“关键字文本”）），则

　　KeywordText=replaceKeywordByTitle（ITitle）

　　否则

　　关键字文本=请求（“关键字文本”）

　　如果结束

　　如果是关键字text“”，则

　　INewsAddObj（“关键字”）=替换（替换（关键字文本，“”，“”，“”，“”，“”，“”）

　　如果结束

　　"完!

　　"***********************************

　　步骤4

　　在foosun/admin/collect/movenewstosystem中，在ASP中找到大约117行

　　RsSysNewsObj（“TxtSource”）=RsNewsObj（“Source”）

　　修正如下：

　　RsSysNewsObj（“关键字”）=replaceKeywordByTitle（RsNewsObj（“标题”））

　　程序更改正常

　　创建以下选项卡。您可以在自定义页签的新闻浏览中选择自己的页面关键字页签

　　具体的标签如下{news_keywords}，写在新闻模板的标题或元中心，以便于搜索引擎收录