ASP 实现表格里插入最新内容

<%

set rr_Product=server.createobject("adodb.recordset")

sqltt="select top 3 * from product order by UpdateTime desc"

rr_Product.open sqltt,conn,1,1

if rr_Product.bof and rr_Product.eof then

response.write "无记录"

else

i=0

dim a(2)

do while not rs.eof

a(i)=rr_Product("DefaultPicUrl")

i=i+1

rr_Product.movenext

if rr_Product.eof then exit do

loop

end if

%>

<table width="345" height="109" border="1">

 <tr>

    <td><img src=<%=a(0)%> /></td>

  </tr>

    <tr>

    <td><img src=<%=a(1)%> /></td>

  </tr>

    <tr>

    <td><img src=<%=a(2)%> /></td>

  </tr>

</table>

<%rs_Product.close %>