picdisplay.asp

这是一个校友录管理系统

<!--#include file="conn.asp"-->
<%
ID=Request.QueryString("ID")
IF ID="" Then ID=0
IF Not IsNumeric(ID) Then ID=0
ID=Int(ID)
TypeID=Request.QueryString("typeid")
IF TypeID="big" Then
TypeID="big"
TypeInfo="大&nbsp;&nbsp;&nbsp;图&nbsp;&nbsp;&nbsp;片"
Else
TypeID="small"
TypeInfo="小&nbsp;&nbsp;&nbsp;图&nbsp;&nbsp;&nbsp;片"
End IF
%>
<%
SQL="Select * From [user] Where ID=" & ID
Set RS=Server.CreateObject("ADODB.Recordset")
RS.Open SQL,Conn,1,1
IF Not RS.EOF Then
Response.ContentType="image/gif"
IF TypeID="big" Then
IF RS("bigLogo")<>"" Then
Response.BinaryWrite RS("bigLogo")
End IF
Else
IF RS("smallLogo") <> "" Then
Response.BinaryWrite RS("smallLogo")
End IF
End IF
End IF
%>