readdbfile.asp

. 缓存处理技术

<!--#include file="Conn.asp"-->
<%
if Request.QueryString("SID")<>"" and IsNumeric(Request.QueryString("SID")) then

set rs=Server.CreateObject("adodb.recordset")
rs.Open "select ShopImage from Shops where ShopId="&Request.QueryString("SID"),conn,1,3
if rs.eof and rs.bof then
   Response.Write "无此标志"
else
   Response.BinaryWrite rs("ShopImage")
end if
rs.Close
set rs=nothing

End if
%>