如何在SQL server2000中插入图片并提取(我用Dreamware要把照片存入库中,并提出...)
我试了下面代码能存,不能提,.............各位高手指点!
在master数据库中创建表:
Create table img(id int identity(1,1) not null,img image)
在这里我做了三个页面form.html save.asp show.asp
各页面代码如下:
[form.html]
<html>
<body>
<center>
<form name="mainForm" enctype="multipart/form-data" action="save.asp" method="post">
<input type=file name="mefile">
<input type="submit" name="ok" value="OK">
</form>
</center>
</body>
</html>
[save.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 imgConn = server.createobject("adodb.connection")
imgConn.open "Driver={SQL Server};Description=sqldemo;Server=localhost;Uid=sa;Password=;Database=master"
set rec=server.createobject("adodb.recordset")
rec.Open "select * from img",imgConn,1,3
rec.addnew
rec("img").appendchunk mydata
rec.update
rec.close
set rec=nothing
set imgConn=nothing
%>
<a href="show.asp">show</a>
[show.asp]
<%
Response.Expires = 0
Response.buffer=True
Response.clear
Set imgConn = server.createobject("adodb.connection")
imgConn.open "Driver={SQL Server};Description=sqldemo;Server=localhost;Uid=sa;Password=;Database=master"
set rec=server.createobject("ADODB.recordset")
strsql="select img from img order by id desc"'
rec.open strsql,imgConn,1,3
Response.ContentType ="image/*"
Response.BinaryWrite rec("img").getChunk(7500000)
rec.close
set rec=nothing
set connGraph=nothing
%>
我的问题如下:
1、第一次从save.asp面的链接“show”进入show.asp时提示“打开” “保存” “取消”，当我选择打开时，自动启动文本编辑器打开为乱码。
2、当我把show.asp中的这段代码:
set rec=server.createobject("ADODB.recordset")
strsql="select img from img order by id desc"' where id= & trim(request(id))
rec.open strsql,imgConn,1,3
Response.ContentType ="image/*"
Response.BinaryWrite rec("img").getChunk(7500000)
rec.close
set rec=nothing
set connGraph=nothing
[ 此贴被XChinux在2006-01-12 13:01重新编辑 ]
