建站常识

这个效果很是不错，那么先不说百度怎么实现的，我们完全可以用asp来实现，通过asp里的正则来查找文章内容中是否包含img标签，如果包含则提取这个标签的src的值，这样就达到了读取图片的功能。下面看代码：

Function giveimages(content) 
 Set regEx = New RegExp ’建立正则表达式。 
 regEx.Pattern = "(]*)(src=)(’|"&CHR(34)&"| )?(.[^’|\s|"&CHR(34)&"]*)(\.)(jpg|gif|png|bmp|jpeg)(’|"&CHR(34)&"|\s|>)(.[^>]*)(>)" ’设置模式。 
 regEx.IgnoreCase = True ’设置是否区分字符大小写。 
 regEx.Global = True ’设置全局可用性。 
 Set Matches = regEx.Execute(content) ’执行搜索。
 For Each Match in Matches ’遍历匹配集合。 
 giveimages = giveimages&Match.SubMatches(4)&"."&Match.SubMatches(6)&"|"’这个是让图片的路径叠加，并在每一个后面加个|符号
 Next
End Function 

在页面中加上上面那个函数,然后在你的列表循环里加上引用如：img=giveimages(rs("内容字段"))那么这个img就等于有这个图片的路径了，切记，这回的这个路径是有全部的文章里的图片的。你得用Split分割，看我下面的例子：

if thisimg<>"" then’先判断是否为空，如果不为空则
    thisimg=Split(thisimg,"|")’分割图片路径
    imgsize=ubound(thisimg)’定义变量
    for imgi=0 to imgsize’循环输出
    if imgi=imgsize then exit for’如果循环到最后则退出循环
    response.Write(" ")’输出图片
next’循环结束 

这样就实现了在列表页面提取文章中的图片，提取出来的这个图片你可以自己定义CSS，也可以加DIV等效果。