| 订阅 | 在线投稿
分享
 
 
 

实现关键字的自动链接和自动变色

来源:互联网网民  宽屏版  评论
2006-12-05 19:16:38

blog、新闻系统里面都有一项做法,当你的文章里出现关键字时,替换为带链接的文字。

在搜索引擎里,把关键字的背景色替换,加亮显示。

这个问题困扰我许久,终于忍耐不住,在csdn高分悬赏解决(400分),终于解决了!!!

在这里我要感谢lxrxyls(行云流水) 、感谢祖国、感谢人民、感谢爸爸妈妈、感谢cctv………………

难点其实在于多个关键字存在的时候,若后来的关键字存在html 关键代码如color href等,会导致替换结果乱掉,解决代码如下:

<%

function ChangeColor(str,key) '自动高亮函数,str源字符串,key关键字数组

dim temp,num,i

dim BeginSpecialChar,EndSpecialChar

BeginSpecialChar="|====|begin"

EndSpcialChar="end====|+"

temp=str

num=ubound(key)

for i=0 to num

if key(i)<>"" then temp=replace(temp,key(i),BeginSpecialChar & key(i) & EndSpecialChar)

next

temp=replace(temp,BeginSpecialChar,"<font color=CC0033 style=""background-color:#ffff00"">")

temp=replace(temp,EndSpecialChar,"</font>")

ChangeColor=temp

end function

%>

实现关键字的自动链接和自动变色

csdn上相关贴地址是:
http://community.csdn.net/Expert/topic/5079/5079643.xml?temp=.7320673
http://community.csdn.net/Expert/topic/5079/5079624.xml?temp=.6197321
http://topic.csdn.net/T/20060324/11/4636902.html

ps 回答我自动链接的小天是个高人,他的skygrid很漂亮的说,可惜我愚钝,正则比较烂,也一直没有耐心深入学习下去………………

 
免责声明:本文为网络用户发布,其观点仅代表作者个人观点,与本站无关,本站仅提供信息存储服务。文中陈述内容未经本站证实,其真实性、完整性、及时性本站不作任何保证或承诺,请读者仅作参考,并请自行核实相关内容。
 
blog、新闻系统里面都有一项做法,当你的文章里出现关键字时,替换为带链接的文字。 在搜索引擎里,把关键字的背景色替换,加亮显示。 这个问题困扰我许久,终于忍耐不住,在csdn高分悬赏解决(400分),终于解决了!!! 在这里我要感谢[url=http://message.csdn.net/SendMessage.aspx?To=lxrxyls]lxrxyls(行云流水) [/url]、感谢祖国、感谢人民、感谢爸爸妈妈、感谢cctv……………… 难点其实在于多个关键字存在的时候,若后来的关键字存在html 关键代码如color href等,会导致替换结果乱掉,解决代码如下: <% function ChangeColor(str,key) '自动高亮函数,str源字符串,key关键字数组 dim temp,num,i dim BeginSpecialChar,EndSpecialChar BeginSpecialChar="|====|begin" EndSpcialChar="end====|+" temp=str num=ubound(key) for i=0 to num if key(i)<>"" then temp=replace(temp,key(i),BeginSpecialChar & key(i) & EndSpecialChar) next temp=replace(temp,BeginSpecialChar,"<font color=CC0033 style=""background-color:#ffff00"">") temp=replace(temp,EndSpecialChar,"</font>") ChangeColor=temp end function %>[img]http://images.csdn.net/syntaxhighlighting/OutliningIndicators/None.gif[/img] csdn上相关贴地址是: [url=http://community.csdn.net/Expert/topic/5079/5079643.xml?temp=.7320673]http://community.csdn.net/Expert/topic/5079/5079643.xml?temp=.7320673[/url] [url=http://community.csdn.net/Expert/topic/5079/5079624.xml?temp=.6197321]http://community.csdn.net/Expert/topic/5079/5079624.xml?temp=.6197321[/url] [url=http://topic.csdn.net/T/20060324/11/4636902.html]http://topic.csdn.net/T/20060324/11/4636902.html[/url] ps 回答我自动链接的小天是个高人,他的[url=http://www.justrun.net/Product/SkyGrid/]skygrid[/url]很漂亮的说,可惜我愚钝,正则比较烂,也一直没有耐心深入学习下去………………
󰈣󰈤
 
 
 
>>返回首页<<
 
 热帖排行
 
 
静静地坐在废墟上,四周的荒凉一望无际,忽然觉得,凄凉也很美
©2005- 王朝网络 版权所有