上传图片显示问题急！谢谢

esefei 2008-02-28 11:45:02

这是 upload.asp
<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 rs=server.createobject("ADODB.recordset")
rs.Open"select * from image where id is null",conn,1,3
rs.addnew
rs("img").appendchunk mydata
rs.update
rs.close
set rs=nothing
set conn=nothing
%>

这个是showimg.asp

<%
set rs=server.CreateObject("ADODB.recordset")
sql="select * from image where id="&trim(request("id")) （*）
rs.open sql,conn,1,3
Response.ContentType="image/*"
Response.BinaryWrite rs("img").getChunk(7500000)
rs.close
set rs=nothing
set conn=nothing
%>
运行后老是说最后一个页面的“*”号这一行的=号处有问题
不知道怎麽解决了，麻烦帮帮忙哦！

...全文

46 6 打赏收藏转发到动态举报

写回复

用AI写文章

6 条回复

切换为时间正序

请发表友善的回复…

发表回复

若白师妹 2008-02-28

打赏
举报

又一个把图片存数据库的

wingerX 2008-02-28

打赏
举报

有什么错误提示?

一把编程的菜刀 2008-02-28

打赏
举报

Response.BinaryWrite rs("img").getChunk(7500000)
问你一句你乘这个是干吗的？
把图片存数据图，自找麻烦！

一把编程的菜刀 2008-02-28

打赏
举报

conn.close
set conn=nothing

md5e 2008-02-28

打赏
举报

<%
set rs=server.CreateObject("ADODB.recordset")
sql="select * from image where id="&trim(request("id")) （*）
rs.open sql,conn,1,3
Response.ContentType="image/*"
Response.BinaryWrite rs("img")
rs.close
set rs=nothing
set conn=nothing
%>

esefei 2008-02-28