| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
共有 3206 人关注过本帖
标题:实时错误481,无效图片
取消只看楼主 加入收藏
henshai
Rank: 1
等 级:新手上路
帖 子:69
专家分:0
注 册:2007-1-11
收藏
得分:0 
你将photo列设置为ole类型..
然后用程序去写上去..也是用Stream去写.

这个什么意思啊
手动不能写成这样的
2007-12-01 20:24
henshai
Rank: 1
等 级:新手上路
帖 子:69
专家分:0
注 册:2007-1-11
收藏
得分:0 
还是无效图片啊
2007-12-01 20:27
henshai
Rank: 1
等 级:新手上路
帖 子:69
专家分:0
注 册:2007-1-11
收藏
得分:0 
我手动在access里面写的,插入对象里面选择的
2007-12-01 20:57
henshai
Rank: 1
等 级:新手上路
帖 子:69
专家分:0
注 册:2007-1-11
收藏
得分:0 
加个msn吧,这样方便点啊
2007-12-01 20:59
henshai
Rank: 1
等 级:新手上路
帖 子:69
专家分:0
注 册:2007-1-11
收藏
得分:0 
无效图片

Set Stm = New ADODB.Stream
With Stm
  .Mode = adModeReadWrite
  .Type = adTypeBinary
  .Open
  .Write rs("Photo")
  .SaveToFile App.Path + "\PhotoTemp.jpg"
End With
'显示图片
Stm.Close
Picture1.Picture = LoadPicture(App.Path + "\PhotoTemp.jpg")
2007-12-01 21:17
henshai
Rank: 1
等 级:新手上路
帖 子:69
专家分:0
注 册:2007-1-11
收藏
得分:0 
这里 cnn 1,3什么意思?
With Stm
.Type = adTypeBinary
.Open
.LoadFromFile App.Path + "\Sunset.jpg"
End With

With rs
.Open "SELECT * FROM StdInfo", Cnn, 1, 3
.AddNew
.Fields("Photo") = Stm.Read
.Update
End With
2007-12-01 21:29
快速回复:实时错误481,无效图片
数据加载中...
 
   



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

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.017056 second(s), 10 queries.
Copyright©2004-2025, BC-CN.NET, All Rights Reserved