- 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
- 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
- 4、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
- 5、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们。
- 6、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 7、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
VFP读取Excel表中的数据
在某个文件夹下有若干个excel表,其中excel表的数量和名称是不定的,现在需要将每个excel表中的某些单元格(假设是A3和H4单元格)读入dbf中。请问该如何实现?
gnDbcnumber = ADIR(gadbf, *.xls ) 创建一个数组
CLEAR
FOR nCount = 1 TO gnDbcnumber 遍历所有文件中扩展名为.xls的文件
?gadbf(nCount,1)
ENDFOR
取得所有文件名的问题我已经已经解决,谢谢!再请问如何将excel表中的某些单元格中的数据(假设是A3和H4单元格)读入dbf中?请看以下代码:
EOLE=CREATEOBJECT( Excel.application )
EOLE.Workbooks.OPEN( 你的EXCEL表带路径全名 )
EOLE.CAPTION= VFP应用程序调用Microsoft Excel
EOLE.Worksheets( SHEET1 ).ACTIVATE
EOLE.VISIBLE=.T.
MESSAGEBOX( )
FOR J=3 TO 4
FOR I=ASC( A ) TO ASC( H )
?EOLE.range(CHR(I)+TRANSFORM(J)).VALUE
ENDFOR
ENDFOR
eole.Workbooks.close
eole.quit
RELEASE eole
将?部分换成写入你的表的语句即可。
从Excel表转移数据到VFP表的编程实现方法
作者: 高进龙
摘 要:把整个一个Excel表数据转换为VFP表并不难,难就难在把Excel表中某些行某些列的数据转移到已有数据的某个VFP表中,而且可能还会遇到两表间相应数据列的名称、数据类型、排列顺序不同的问题。作者用VFP编程,轻松实现了这一数据转移工作。本文将就这一程序的设计思想和实现方法做简要介绍。
关键词:Excel表,VFP表,转移数据,编程实现
一、问题的提出
VFP(Visual Foxpro)是一种关系型数据库管理系统,其强大的数据处理能力及其面向对象的编程能力,使其得到数据库应用程序开发人员的广泛使用。 而Excel则是一个优秀的电子表格处理软件,在兼容性、操作界面、公式运算、图表表现等方面有着独到的优势,成为广大办公应用人员常用的工具。因为两种软件各有短长,所以在实际应用中常会遇到两者之间数据的转移问题。
把整个VFP表转换为Excel表或者把整个Excel表转换为VFP表的工作,两种软件都提供了相应的转换功能,一般用户很容易操作。但是把Excel表中部分数据转移到已存在的VFP表中的情况就要复杂得多。两种表的数据转移可能存在以下三个方面的问题:一是Excel表中可能存在某些行的数据不需要或不能被转移,需要转移或者可以转移的仅是其中较规范的某些行;二是Excel表并非所有列的数据,而只是某些列的数据需要被转移到VFP表的相应数据列中,两表中相应列的名称和顺序可能不一致;三是Excel表中与VFP表对应数据列的数据类型可能不一致。因此,对业已存在的这两类数据表间数据转移工作,用手工完成非常麻烦和费时。
在工作实践中,作者运用VFP编程驱动Excel的能力,设计完成了从Excel到VFP的数据转移程序,成功地解决了这一问题。
二、设计思路
综合考虑上述三个问题,程序设计宜采用的方法是把Excel表中数据按单元格逐一转移到VFP表中,所以,需要完成下列三项任务:
(1)建立Excel表中要转移数据的列与VFP表中要接受数据的字段之间一一对应的关系,这项工作等于给两表之间的数据转移牵线搭桥,是非常关键的一项任务(如图2所示)。
(2)读取Excel表中要转移数据的起止行行号,从横向上确定要转移数据的范围。Excel表中一行数据(也可能是一行中的某些列)对应VFP表中的一条记录。
(3)转移数据时要处理两表中数据类型不一致的问题,以及数值型数据小数位数不一致而必须考虑的数据四舍五入问题。
在考虑上述三项任务的实现方法时,还要考虑用户操作的便捷性,直观性。本程序的所有操作对象都展现在图1所示的桌面上,所有操作无需键盘输入,只需点击鼠标。
三、实现方法
本程序设计了一张表单,在表单顶部设置了五个按钮、两个文本框,下部设置了一个表格控件(如图1下半部所示`),它们将完成下列五个步骤的工作:
1、打开数据表
指打开已存在的VFP数据表,打开的VFP表会显示在表单下部的表格控件中。此表被打开,一是为了直观地向用户展示表的结构及数据,二是为了在建立与Excel表关联关系时供用户用鼠标选择相关的列。
2、打
文档评论(0)