Question

asp 程序 图片列表如何编写？

ASP想做一个走马灯的图集，后台发布一张更新一张。如何实现动态读取数据库中的文章 标题 图片 链接，本人愚钝请高人指教！多谢！
可以实现提取一个图片和链接 如何实现图集
以下：装入集 然后怎么办？
<%
sql = "select top 6 * from Zm_Product where Tid=22 order by id desc "
Set rs=Server.Createobject("ADODB.RECORDSET")
rs.Open sql, conn, 1, 1
%>
<a href="product_view.asp?id=<%=rs("id")%>" target="_blank"><img src="/uploadfiles/upLoadImages/<%=rs("img")%>" width="100" height="134" border="0"></a>

Answer 1

<%
set rs=conn.execute("select top 6 * from Zm_Product where Tid=22 order by id desc")

if not rs.eof then
do while not rs.eof
%>
<a href="product_view.asp?id=<%=rs("id")%>" target="_blank"><img src="/uploadfiles/upLoadImages/<%=rs("img")%>" width="100" height="134" border="0"></a>

<%
rs.movenext
loop
end if
rs.close
set rs=nothing
%>

只是读的话 直接conn.execute 不要用 Server.Createobject("ADODB.RECORDSET")

前者的效率比后者要快上10倍。

Answer 2

你可以这样的试试呀
<%
sql = "select top 6 * from Zm_Product where Tid=22 order by id desc "
Set rs=Server.Createobject("ADODB.RECORDSET")
rs.Open sql, conn, 1, 1
do while not rs.eof ‘如果有记录就开始循环
%>
<a href="product_view.asp?id=<%=rs("id")%>" target="_blank"><img src="/uploadfiles/upLoadImages/<%=rs("img")%>" width="100" height="134" border="0"></a>
<%
rs.movenext ’指针下移到另一个记录
loop ‘循环
%>

Answer 3

此处应该用javascript，详情见附件。