Question

你好，我看到你给的答案 ASP在首页显示新闻内容中的第一张图片，我的为什么不显示呢，哪里不对，我asp.net

直接前台读取判断就可以了content字段为例
<%
'***********************************************
'函数名：etFirstImg
'作 用：获得信息里的第一张图片地址
'参 数：str ----信息
'***********************************************

function GetFirstImg(str) '取得img 标签内容
dim tmp
Set objRegExp = New Regexp
objRegExp.IgnoreCase = True '忽略大小写
objRegExp.Global = false '全文搜索 !关键!
objRegExp.Pattern = "<img (.*?)src=(.[^\[^>]*)(.*?)>"
Set Matches =objRegExp.Execute(str)
For Each Match in Matches
tmp=tmp & Match.Value
Next
GetFirstImg=GetImgS(tmp)
end function

function GetImgS(str)'获取所有图片
Set objRegExp1 = New Regexp
objRegExp1.IgnoreCase = True '忽略大小写
objRegExp1.Global = True '全文搜索
objRegExp1.Pattern = "src\=.+?\.(gif|jpg|png|bmp)"
set mm=objRegExp1.Execute(str)
For Each Match1 in mm
imgsrc=Match1.Value
'也许存在不能过滤的字符，确保万一
imgsrc=replace(imgsrc,"""","")
imgsrc=replace(imgsrc,"src=","")
imgsrc=replace(imgsrc,"<","")
imgsrc=replace(imgsrc,">","")
imgsrc=replace(imgsrc,"img","")
imgsrc=replace(imgsrc," ","")
GetImgS=GetImgS&imgsrc'把里面的地址串起来备用
next
end function%>
<img src="<%str =rs("content")
if GetFirstImg(str)="" then
response.write "/images/huace.gif"
else
response.write GetFirstImg(str)
end if
%>

Answer 1

这个是ASP的代码，.net可能有所区别，我不懂,net抱歉