标题:VFP 在表单中添加图片到数据表中不能存
只看楼主
hus720814
Rank: 1
等 级:新手上路
帖 子:24
专家分:0
注 册:2010-8-24
结帖率:66.67%
 问题点数:0 回复次数:12 
VFP 在表单中添加图片到数据表中不能存

请问高手:
第一问题,我做了一个表单,表单名是车辆录入数据.scr,表名是车辆数据.bdf,表单字段有名称\编号\日期.....图片等等,我想把图
片通过车辆录入数据表单存到车辆数据表中,请高手指导.我是初学者.谢谢!!!
下面是我的代码,请高手帮帮忙.


file_name=GETFILE('bmp;jpg;psd;ico','','',0,'打开')  
scan
   lsc ="车辆数据\imag\" +allt(名称) +"(" +allt(出厂编号) +").bmp"  
   if file(lsc)
      appe gene 图片 from (lsc)
   endif
endscan
搜索更多相关主题的帖子: 数据 表单 VFP 
2010-09-16 09:44
hus720814
Rank: 1
等 级:新手上路
帖 子:24
专家分:0
注 册:2010-8-24
得分:0 
请大哥帮帮忙
2010-09-16 13:26
啸凡
Rank: 8Rank: 8
等 级:贵宾
威 望:45
帖 子:1356
专家分:885
注 册:2006-2-22
得分:0 
图片字段可以用通用型,但最好用二进制备注型字段,并使用FILETOSTR()函数把图片置换成字符存入,在需要显示的时候再用STRTOFILE()转换成原来的图片格式进行显示。本论坛中有相关帖子,您可以查找一下。

两人行已有我师……
2010-09-16 22:00
啸凡
Rank: 8Rank: 8
等 级:贵宾
威 望:45
帖 子:1356
专家分:885
注 册:2006-2-22
得分:0 
补充一为点,您把获取图片文件用了GETFILE()函数来获得图片文件名已经足够了,不知道您为什么还要使用SCAN……ENDSCAN?

两人行已有我师……
2010-09-16 22:03
hus720814
Rank: 1
等 级:新手上路
帖 子:24
专家分:0
注 册:2010-8-24
得分:0 
请大哥,你能帮我写一段源代码,我试了好多次没有成功.
2010-09-17 09:32
hus720814
Rank: 1
等 级:新手上路
帖 子:24
专家分:0
注 册:2010-8-24
得分:0 
用这个函数FILETOSTR()和STRTOFILE()怎样写代码,
2010-09-17 09:35
pmc1234
Rank: 5Rank: 5
等 级:职业侠客
帖 子:398
专家分:383
注 册:2010-1-6
得分:0 
file_name=GETFILE('bmp;jpg;psd;ico','','',0,'打开')  

   lsc ="车辆数据\imag\" +allt(名称) +"(" +allt(出厂编号) +").bmp"  
   if file(lsc)
      appe gene 图片 from (lsc)
   endif
2010-09-17 09:53
hus720814
Rank: 1
等 级:新手上路
帖 子:24
专家分:0
注 册:2010-8-24
得分:0 
还是不行吗
2010-09-17 10:08
hus720814
Rank: 1
等 级:新手上路
帖 子:24
专家分:0
注 册:2010-8-24
得分:0 
我是在表单中加了一个图像控件,在控件chick里写了如下代码:
file_name=GETFILE('bmp;jpg;psd;ico','','',0,'打开')
lsc ="添加通信车台数据\imag\" +allt(车台名称) +"(" +allt(出厂编号) +").bmp"  
   if file(lsc)
      appe gene 图片 from (lsc)
   endif
添加完后图象控件不显示图象,数据表中通用型字段没有图片
2010-09-17 10:13
hus720814
Rank: 1
等 级:新手上路
帖 子:24
专家分:0
注 册:2010-8-24
得分:0 
请帮帮
2010-09-17 12:45



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-320557-1-1.html




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

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