求ASP将文件上传到数据库和从数据库读取出文件的方法
我需求讲文件如图片,WORD文件等上传到数据库中二进制类型的类型的字段中.
同时求从数据库读取出文件的办法.谢谢
问题点数：100、回复次数：5Top
1 楼qhlkj（天堂鸟）回复于 2006-03-11 00:27:59 得分 80
upload.htm
<html>
<body>
<center>
<form name="mainForm" enctype="multipart/form-data" action="process.asp" method=post>
<input type=file name=mefile><br>
<input type=submit name=ok value="OK">
</form>
</center>
</body>
</html>
process.asp
<%
response.buffer=true
formsize=request.totalbytes
formdata=request.binaryread(formsize)
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 connGraph=server.CreateObject("ADODB.connection")
connGraph.ConnectionString="driver={Microsoft Access Driver
(*.mdb)};DBQ=" &
server.MapPath("images.mdb") & ";uid=;PWD=;"
connGraph.Open
set rec=server.createobject("ADODB.recordset")
rec.Open "SELECT * FROM [images] where id is null",connGraph,1,3
rec.addnew
rec("img").appendchunk mydata
rec.update
rec.close
set rec=nothing
set connGraph=nothing
%>
showimg.asp
<%
set connGraph=server.CreateObject("ADODB.connection")
connGraph.ConnectionString="driver={Microsoft Access Driver
(*.mdb)};DBQ=" &
server.MapPath("images.mdb") & ";uid=;PWD=;"
connGraph.Open
set rec=server.createobject("ADODB.recordset")
strsql="select img from images where id=" & trim(request("id"))
rec.open strsql,connGraph,1,1
Response.ContentType = "image/*"
Response.BinaryWrite rec("img").getChunk(7500000)
rec.close
set rec=nothing
set connGraph=nothing
%>
Top
2 楼qhlkj（天堂鸟）回复于 2006-03-11 00:28:37 得分 10
网上一把一把的多啊........Top
3 楼conan22（conan）回复于 2006-03-12 21:36:06 得分 0
谢谢,还有吗? 如果还要上传和下载其他格式的文件呢?如word,rar等Top
4 楼emhuangzi（小皇----加油 加油!）回复于 2006-03-12 22:00:34 得分 10
以前都是做ACCESS的..都是传到指定可读写的文件夹里面..
然后在数据库中存取路径的.Top
5 楼conan22（conan）回复于 2006-03-13 23:13:05 得分 0
没了吗?
谢谢大家了.Top
