| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 1374 人关注过本帖
标题:[求助]关于显示sql2000中的图片?
取消只看楼主 加入收藏
lqg
Rank: 1
等 级:新手上路
帖 子:26
专家分:0
注 册:2004-11-16
收藏
 问题点数:0 回复次数:9 
[求助]关于显示sql2000中的图片?

大家好!!!

我也是一个asp的爱好者, 我在用asp 在sql里面存图片时成功,但是无法在网页上显示! 而我用的显示代码运行时老是提示下载并出错!

代码如下:

<%

set conn=server.CreateObject("adodb.connection")

conn.open "dsn=student;uid=aspbook;pwd=aspbook"

set rs=server.createobject("ADODB.recordset") sql="select img from image where id=9" rs.open sql,conn,1,1

Response.ContentType = "image/jpg"

Response.BinaryWrite rs("img").getChunk(7500000)

rs.close set rs=nothing set conn=nothing

%>

请各位大侠指导!

图片附件: 游客没有浏览图片的权限,请 登录注册

[此贴子已经被作者于2004-11-16 09:50:08编辑过]

搜索更多相关主题的帖子: conn sql Response set 
2004-11-16 08:59
lqg
Rank: 1
等 级:新手上路
帖 子:26
专家分:0
注 册:2004-11-16
收藏
得分:0 

错误的提示我没有记下来!

不过我把代码改了一下:

<%

set conn=server.CreateObject("adodb.connection")

conn.open "dsn=student;uid=aspbook;pwd=aspbook"

set rs=server.createobject("ADODB.recordset") sql="select img from image where id=1" rs.open sql,conn,1,1

Response.ContentType = "text/html"

Response.BinaryWrite rs("img")

rs.close set rs=nothing set conn=nothing

%>

屏幕上什么也没有,但网页执行完毕!

再次谢谢版主的关心!!


2004-11-16 09:19
lqg
Rank: 1
等 级:新手上路
帖 子:26
专家分:0
注 册:2004-11-16
收藏
得分:0 

我把其中的:

response.contentype="text/html"

改成了:response.contentype="image/jpg"

后,运行时提示下载,但单击“打开”后,dm运行,但无内容!!

我在做公司的员工档案!!问题急需解决,我将不胜感谢!~!!


2004-11-16 09:30
lqg
Rank: 1
等 级:新手上路
帖 子:26
专家分:0
注 册:2004-11-16
收藏
得分:0 
我按您说的方法试了一下,也提示下载!!打开后无内容!!

2004-11-16 09:35
lqg
Rank: 1
等 级:新手上路
帖 子:26
专家分:0
注 册:2004-11-16
收藏
得分:0 

改完后的代码:

<%

set conn=server.CreateObject("adodb.connection")

conn.open "dsn=student;uid=aspbook;pwd=aspbook"

set rs=server.createobject("ADODB.recordset") sql="select img from image where id=1" rs.open sql,conn,1,1

Response.ContentType = "image/jpg"

Response.BinaryWrite rs("img").GetChunk(rs("img").ActualSize)

rs.close set rs=nothing set conn=nothing

%>


2004-11-16 09:39
lqg
Rank: 1
等 级:新手上路
帖 子:26
专家分:0
注 册:2004-11-16
收藏
得分:0 
提示下载的对话框在一楼!!!

2004-11-16 09:51
lqg
Rank: 1
等 级:新手上路
帖 子:26
专家分:0
注 册:2004-11-16
收藏
得分:0 

我按照您的说法做了,下载的对话框没了,但网页是一片空白!!并且没有错误!!


2004-11-16 13:30
lqg
Rank: 1
等 级:新手上路
帖 子:26
专家分:0
注 册:2004-11-16
收藏
得分:0 

我是不是在存储时有错误?

我使用以下代码存储的:

<% 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) dim strsql dim rec,conn,studentrs dim strconn set conn=server.CreateObject("adodb.connection") set studentrs=server.CreateObject("adodb.recordset") conn.open "dsn=student;uid=aspbook;pwd=aspbook" set rec=server.createobject("adodb.recordset")

rec.Open "SELECT * FROM image where (id is null)",conn,1,3 rec.addnew

rec("img").appendchunk mydata rec.update rec.close set rec=nothing set conn=nothing %>


2004-11-16 13:40
lqg
Rank: 1
等 级:新手上路
帖 子:26
专家分:0
注 册:2004-11-16
收藏
得分:0 
这个问题困扰了我一个星期了!!!

2004-11-16 14:03
lqg
Rank: 1
等 级:新手上路
帖 子:26
专家分:0
注 册:2004-11-16
收藏
得分:0 

...............................................................................................


2004-11-16 15:53
快速回复:[求助]关于显示sql2000中的图片?
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.013728 second(s), 9 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved