showimg.asp

来自「asp_erp 源碼 附詳盡使用說明及數據庫」· ASP 代码 · 共 16 行

<!--#include file="conn.asp"-->
<%
id =Request("id")
On Error Resume Next
set rs=server.CreateObject("adodb.recordset")
sql="select img from ImgData where id="&id
rs.Open sql,conn,1,3
if not rs.eof then
response.contenttype="image/*"
Response.BinaryWrite (rs("img"))
end if
rs.close
Set rs=NotHing
conn.close
Set conn=NotHing
%>