西安网站建设关ASP键词加标记

9812015-04-24

西安网站建设关ASP键词加标记

function keyword_tag(byval str,byval keyword)

dim keywords,str01,str02,i

if str<>"" then

  '全角--》半角 空格

keyword=replace(keyword," "," ")

str01=replace(str,keyword,"<font color=""#ff0000"">"&keyword&"</font>")

  keywords=split(keyword," ")

if ubound(keywords)>0 then

  str02=str

for i=0 to ubound(keywords)

str02=replace(str02,keywords(i),"<font color=""#ff0000"">"&keywords(i)&"</font>")

next

  keyword_tag=str02

else

keyword_tag=str01

end if

end if

end function

通过本文您对西安网站建设有了进一步了解,本公司温馨提醒:找西安做网站公司,请选择手续齐全、业务精、服务好的正规公司。

工商网上亮照

版权所有:西安点墨网络科技有限公司 信息备案编号: 陕ICP备11004160号-1

客户服务电话:029-89640155 18991365125

公司地址:西安市雁塔区朱雀大街紫郡长安F3

Sitemap 网站地图 手机版

办公电话:029-89640155

服务热线:18991365125

客服信箱:vip@dianmo.cc

846461336327

西安点墨网络科技有限公司

版权所有:西安点墨网络科技有限公司 信息备案编号: 陕ICP备11004160号-1