asp上传二进制图片到数据库（图文教程）

asp上传二进制图片到数据库，和读取数据库里的二进制文件，可显示pdf文档
尝试一下>> 显示PDF文件

上传保存图片


formsize=request.totalbytes
formdata=request.binaryread(formsize)   '如果这里报错， IIS设置 ASP>>限制属性>>最大请求实体主体限制，改大'
bncrlf=chrB(13)&chrB(10)
divider=leftB(formdata,clng(instrb(formdata,bncrlf))-1)
datastart=instrb(formdata,bncrlf&bncrlf)+4
dataend=instrb(datastart+1,formdata,divider)-datastart
mydata=midb(formdata,datastart,dataend)
set rs=server.createobject("ADODB.recordset")
rs.open "SELECT * FROM imgurl",conn,3,3
rs.addnew
rs("img").AppendChunk myData
rs.update
rs.close
set rs=nothing
set conn=nothing
response.redirect "default.asp"

显示图片


set rs=server.createobject("ADODB.recordset")
sql="select * from imgurl where id="&trim(request("id"))
rs.open sql,conn,1,1

if rs("filetype")="pdf" then
  Response.ContentType="application/pdf"
else
  Response.ContentType="image/*"
end if
Response.BinaryWrite rs("img").getChunk(8000000)
rs.close
set rs=nothing
set conn=nothing