让我郁闷了好几天的问题,谁能解决百分相赠
这是一个上传图片和显示图片的问题。网上介绍的方法很多和这个一样,但是为什么我的不行呢?源代码如下:
首先我添加了一个系统数据源img,数据库中有两个字段id和img。我使用的是access,id 的数据类型为integer,img的数据类型为ole 对象。
---------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.Open "dsn=img;uid=;pwd="
set rec=server.createobject("ADODB.recordset")
rec.Open "SELECT * FROM table1",connGraph,1,3
rec.addnew
rec("id")=1
rec("img").appendchunk(mydata)
rec.update
rec.close
set rec=nothing
set connGraph=nothing
%>
--------------show.asp-----------------------
<%
set connGraph=server.CreateObject("ADODB.connection")
connGraph.Open "dsn=img;uid=;pwd="
set rec=server.createobject("ADODB.recordset")
strsql="select * from table1"
rec.open strsql,connGraph,1,1
Response.ContentType="image/*"
Response.BinaryWrite rec("img").getChunk(7500000)
rec.close
set rec=nothing
set connGraph=nothing
%>
-------------------------------------------------
然后用<img src="show.asp">标签显示图片。
问题是网页上面不能显示图片,也没有错误提示。我打开数据库察看,能够发现新加了一条纪录,但是为什么不能显示呢?
那位高手指点一下。