showimg.asp

图书管理系统的所有程序

<%'由于在数据库连接文件中含有JavaScript代码，所以这里不能应用include包含文件文件，必须重新写数据库连接的代码
Set conn=Server.CreateObject("ADODB.Connection")
conn.open("driver={SQL Server};server=(local);UID=sa;database=db_bookmanage")
Pbarcode=Request.QueryString("barcode")
Set rs=Server.CreateObject("ADODB.RecordSet")
sql="Select * From tb_bookinfo Where barcode ='"&Pbarcode&"'"
rs.Open sql,conn,1,3
response.ContentType="image/*"
response.BinaryWrite rs("cover").getChunk(8000000)
rs.close()
set rs = nothing



%>