ASP问题,求高手,追分

来源:百度知道 编辑:UC知道 时间:2024/05/12 00:41:16
数据库act中有如下几个字段

keyword 关键词
title 标题
body 内容
htmlurl 生成文件的名称

我现在想做一个这个样子的程序如下

我发布文章后,如果发布的文章内容body里,有一些关键词,是数据库中已经存在的,那么就把发布的文章中的关键词加上连接

例如 数据库中有一行数据的关键词是 “飞车党” htmlurl是“11223.HTML”

我新发布的文字中有这样一句话“我们都是飞车党”

在发布后,存储的时候,变成如下这样
<a href="http://www.xxx.com/view/11223.HTML" target="_blank">我们都是飞车党</a>

假如文字中多次出现一个关键词 假如 飞车党出现了三次 那么只替换第一个

求高手给我段代码,追加100分,完全解决问题礼品相送 谢谢~~~!

<%
dim keystr,a
a=""
keystr=split("[keyword]","|") 'split函数将变量[keyword]转换为数组
for i=0 to ubound(keystr) '做for循环让把关键词用链接起来,转换成字符串url
url=url+"<a href=q.asp?key="&keystr(i)&">"&keystr(i)&"</a> "
next
response.write(url) '输出
%>

<%
keyword="飞车党"
title="我们都是飞车党"
body="我们都是飞车党,飞车党很牛X。"
htmlurl="11223.HTML"

keystr=split(keyword,"|")
for i=0 to ubound(keystr)
body=replace(body,keystr(i),"<a href="& htmlurl &">"& keystr(i) &"</a>"
next

response.write body
%>