搜索
编程论坛
→
数据库技术
→
『 VFP论坛 』
→ 怎么用VFP命令提取数据?
标题:
怎么用VFP命令提取数据?
只看楼主
afdwxf
等 级:
新手上路
帖 子:35
专家分:0
注 册:2011-9-29
结帖率:
66.67%
楼主
已结贴
√
问题点数:20 回复次数:16
怎么用VFP命令提取数据?
如下表A.dbf
如下表B.xls
求教各位高手,在VFP中如何用命令把B.xls表的2-8行数据添加到A.DBF表中(不要把B表的第一行也添加到A表中)
并指定"收货数量""结算金额""税额"为数值型取两位小数,"过账日期"为日期型,其他为字符型.
搜索更多相关主题的帖子:
如何
2013-01-25 19:35
tlliqi
等 级:
贵宾
威 望:
204
帖 子:15453
专家分:65956
注 册:2006-4-27
第
2
楼
得分:5
导入
import from B.lxs type xl8
或
import from B.lxs type xl5
USE 表.DBF
APPEND FROM B.lxs TYPE XL5 &&或XL8
2013-01-25 19:56
sdta
来 自:江苏省连云港市
等 级:
版主
威 望:
323
帖 子:9621
专家分:26174
注 册:2012-2-5
第
3
楼
得分:0
回复 楼主 afdwxf
先在EXCEL中设置数据的类型及小数位数,然后保存EXCEL中的修改,关闭EXCEL。
USE A表
APPEND FROM XXX.XLS FIELDS 字段名列表 TYPE XL5 &&字段名列表顺序要与EXCEL表中的顺序相同,如果只添加2-8行,可以将第一行暂时删除。
[
本帖最后由 sdta 于 2013-1-25 20:26 编辑
]
坚守VFP最后的阵地
2013-01-25 20:20
afdwxf
等 级:
新手上路
帖 子:35
专家分:0
注 册:2011-9-29
第
4
楼
得分:0
以下是引用
tlliqi
在2013-1-25 19:56:39的发言:
导入
import from B.lxs type xl8
或
import from B.lxs type xl5
USE 表.DBF
APPEND FROM B.lxs TYPE XL5 &&或XL8
这样会把B表第一行的内容也一起添加进去了,并且日期型的数据无法转换,显为空.
2013-01-25 20:21
afdwxf
等 级:
新手上路
帖 子:35
专家分:0
注 册:2011-9-29
第
5
楼
得分:0
回复 3楼 sdta
数值型和字符型的数据可以在原A表中设定,但日期型的数据就没法添加上去.而且第天都有好多结构相同的数据导进同一个DBF表中.
2013-01-25 20:32
hu9jj
来 自:红土地
等 级:
贵宾
威 望:
396
帖 子:11713
专家分:43267
注 册:2006-5-13
第
6
楼
得分:0
通过VFP控制EXCEL,读出指定单元格的数据。
活到老,学到老! http://www. E-mail:hu-jj@
2013-01-25 20:57
afdwxf
等 级:
新手上路
帖 子:35
专家分:0
注 册:2011-9-29
第
7
楼
得分:0
以下是引用
sdta
在2013-1-25 20:20:30的发言:
先在EXCEL中设置数据的类型及小数位数,然后保存EXCEL中的修改,关闭EXCEL。
USE A表
APPEND FROM XXX.XLS FIELDS 字段名列表 TYPE XL5 &&字段名列表顺序要与EXCEL表中的顺序相同,如果只添加2-8行,可以将第一行暂时删除。
因为导入数据前必须判定B表中的数据是否已经存在A表中,如果已经存在就不可以重复添加,所以只能一行行来做判断,一行行添加.
2013-01-25 21:12
sdta
来 自:江苏省连云港市
等 级:
版主
威 望:
323
帖 子:9621
专家分:26174
注 册:2012-2-5
第
8
楼
得分:0
用代码添加数据就不存在这些问题了
坚守VFP最后的阵地
2013-01-25 21:18
tlliqi
等 级:
贵宾
威 望:
204
帖 子:15453
专家分:65956
注 册:2006-4-27
第
9
楼
得分:3
以下是引用
afdwxf
在2013-1-25 20:21:32的发言:
这样会把B表第一行的内容也一起添加进去了,并且日期型的数据无法转换,显为空.
添加进去 可在vfp中删了这一记录的
2013-01-25 22:15
afdwxf
等 级:
新手上路
帖 子:35
专家分:0
注 册:2011-9-29
第
10
楼
得分:0
SELE C
USE C.DBF &&临时表
ZAP
APPEND FROM B.xls' TYPE XL8
GO 2
SELE A
USE A.DBF
do while!EOF()
SCATTER TO AFDWXF MEMO
SELECT A
LOCATE ALL FOR 物料凭证=C.物料凭证
IF ! FOUND()
GATHER FROM AFDWXF
ENDIF
SELECT C
SKIP 1
ENDD
请各位大侠帮忙看一下,帮改进改进,非常感谢!!!
2013-01-27 23:02
17
1/2页
1
2
参与讨论请移步原网站贴子:
https://bbs.bccn.net/thread-397650-1-1.html
关于我们
|
广告合作
|
编程中国
|
清除Cookies
|
TOP
|
手机版
编程中国
版权所有,并保留所有权利。
Powered by
Discuz
, Processed in 0.307615 second(s), 8 queries.
Copyright©2004-2025, BCCN.NET, All Rights Reserved