困扰我很久的技术问题解决了

<P>一直没搞懂怎么自动识别添加的新闻是否包含图片</P>
<P>并将第一张图片提取出来 显示在主页上</P>
<P>而且要在图片上加上该新闻的连接</P>
<P>昨天晚上在做网站的时候正好遇到这个问题</P>
<P>首先想到的是用正则表达式</P>
<P>在网上查了一半天也没搞懂怎么写sql语句</P>
<P>看来正则表达式是不太可能了</P>
<P>突然我想到了 sql 的 like 语句</P>
<P>于是就用select where like提取出包含图片的代码</P>
<P>然后进行处理</P>
<P>最后获得地址</P>
<P>加入js函数</P>
<P>下面是代码内容:</P>
<P><FONT face=Verdana><SCRIPT>        <BR>var widths=185;        <BR>var heights=185;        <BR>var counts=5; </FONT></P>
<P><FONT face=Verdana><%  <BR>   i=1<BR>   set rs=conn.execute("select top 5 * from content where content like '%<IMG%' order by id desc")<BR>   if rs.eof then:response.Write "no":end if<BR>   do while not rs.eof<BR>      dim str,pos<BR>      str=rs("content")<BR>   pos=instr(str,"<IMG src=")<BR>   str=right(str,len(str)-pos+1)<BR>   pos=instr(str,"border=0>")<BR>   str=left(str,pos+8)<BR>   str=right(str,len(str)-10)<BR>   str=left(str,len(str)-11)<BR>   <BR>%>  <BR>      <BR>img<%= i %>=new Image ();img<%= i %>.src='<%= str %>';url<%= i %>=new Image ();url<%= i %>.src='showContent.asp?id=<%= rs("id") %>';</FONT></P>
<P><FONT face=Verdana><%    rs.movenext:i=i+1<BR>   loop<BR>   rs.close:set rs=nothing<BR>%></FONT></P>
<P><FONT face=Verdana></SCRIPT></FONT></P>
<P><FONT face=Verdana><SCRIPT src="inc/focus.js"></SCRIPT></FONT></P>


文章来自: 本站原创
引用通告: 查看所有引用 | 我要引用此文章
Tags:
评论: 0 | 引用: 0 | 查看次数: 1975
发表评论
昵 称:
密 码: 游客发言不需要密码.
验证码: 验证码
内 容:
选 项:
虽然发表评论不用注册,但是为了保护您的发言权,建议您注册帐号.
字数限制 2000 字 | UBB代码 关闭 | [img]标签 关闭