showpic.asp

Flash电子相册 v1.2 Build 1108完整版本下载

<%@ Language=VBScript %>
<!--#include file="conn.asp"-->
<%
tid=Request("tid")
set rs=server.CreateObject("adodb.recordset")
sql="SELECT geshi,map FROM smap where tid="&tid
rs.Open sql,conn,1,3
response.contenttype="image/"&rs("geshi")
Response.BinaryWrite rs("map")
rs.close
set rs=nothing
conn.close
set conn=nothing
%>