<!--#include file="include/db_conn.asp" -->
<%
'添加日志
dim rs
set rs=server.CreateObject("ADODB.recordset")
rs.Open "select top 1 * from hd_news where id=125 order by id desc",conn,1,3
if rs.eof and rs.bof then
response.Write("error")
else
dim str
str=rs("content")
end if
rs.close
set rs=nothing
%>
<%
dim re
Set re=new RegExp
re.IgnoreCase =true
re.Global=True
re.Pattern="<.+?>"
str=re.Replace(str,"")
response.write(left(str,200))
%>
<%
'添加日志
dim rs
set rs=server.CreateObject("ADODB.recordset")
rs.Open "select top 1 * from hd_news where id=125 order by id desc",conn,1,3
if rs.eof and rs.bof then
response.Write("error")
else
dim str
str=rs("content")
end if
rs.close
set rs=nothing
%>
<%
dim re
Set re=new RegExp
re.IgnoreCase =true
re.Global=True
re.Pattern="<.+?>"
str=re.Replace(str,"")
response.write(left(str,200))
%>
博客代码展示了使用ASP从数据库中提取内容的过程。通过包含数据库连接文件,查询hd_news表中特定记录,若记录存在则获取内容。还使用正则表达式去除HTML标签,并输出内容的前200个字符。
313

被折叠的 条评论
为什么被折叠?



