ASP图片显示代码如下

记录集如下:
<%
Dim rs
Dim rs_numRows

Set rs = Server.CreateObject("ADODB.Recordset")
rs.ActiveConnection = MM_conn_STRING
rs.Source = "SELECT * FROM shop ORDER BY id ASC"
rs.CursorType = 0
rs.CursorLocation = 2
rs.LockType = 1
rs.Open()

rs_numRows = 0
%>

图片显示如下：
<%if rs.bof and rs.eof then
response.write"！"%>

<%
do while not rs.eof
%>
<tr><td><%=(rs.Fields.Item("shoppic").Value)%></td>
<%
rs.movenext
%>
<td><%=(rs.Fields.Item("shoppic").Value)%></td></tr>
<%
rs.movenext
loop
%>

<% end if %>

<%
rs.Close()
Set rs = Nothing
%>

结果是什么也不显示也不提示出错，，我这是那里做错了
<%if rs.bof and rs.eof then
response.write"！"%>
'_____

ASP图片显示代码如下 asp 不同的点击数怎样显示不同的图片?如下代码 ASP留言板求助(代码如下，怎么不显示呢) asp.net写代码 关于显示图片 ASP图片列表显示代码问题 ASP怎么控制图片的显示,程序如下： 如何修改ASP中的代码使图片横向显示 修改ASP中的代码使所有图片整体横向显示 关于显示图片的ASP代码,,求高手~~~~~~~~~ 如何通过asp能向Sql数据库中存入图片和显示图片？事例如下