关于vfp6.0无法导入excel的问题解决

最新推荐文章于 2022-08-22 11:05:33 发布
最新推荐文章于 2022-08-22 11:05:33 发布
阅读量1.5k 收藏
点赞数
分类专栏： VFP6.0 文章标签： VFP6.0
版权声明：本文为博主原创文章，遵循 CC 4.0 BY-SA 版权协议，转载请附上原文出处链接和本声明。
本文链接：https://blog.csdn.net/a448984863/article/details/52626262
版权

原因:

Visual FoxPro 6.0及其中文版，是可运行于Windows 95和Windows NT平台的32位数据库开发系统.如今都是2016年了，Win10的天下。高版本的excel已经无法兼容低版本的系统。

解决方法：

在任意一个安装了office2007或者2003上，打开excel表，另存为excel5.0或者更低版本，即可兼容vfp6.0，从而成功导入。
临界温度
关注
专栏目录
把vfp表中的数据导入指定的excel文件中 (转)
cuiji1279的博客
12-26 834
把vfp表中的数据导入指定的excel文件中 (转)[@more@] select cb_zwhzgo topXLApp = Getobject('F:tempsqlinout.xls','excel.sheet')XLAp...
vfp和python比较_vfp-和vfp相关的内容-阿里云开发者社区
weixin_39673293的博客
12-16 894
Netbeans配置Java SE嵌入式平台(树莓派)1.配置平台来源：http://www.cnblogs.com/xiaobo-Linux/p/7955769.html2. 选择远程3. 填写信息JRE 路径是树莓派上的路径：how?sudo update-alternatives --display java输...文章小波linux2017-12-021034浏览量ARMCC和GCC编译A...
使用VFP读取EXCEL中的数据示例
03-20
使用VFP读取EXCEL中的数据示例 *!* *****数据导入程序，由“学生基本基本情况表模板.xls”导入数据 *!* ***使用VFP控制EXCEL表，计取中指定列的内容*********** *!* "学生基本基本情况表模板.xls"的数据布局 *!* cells(1,1):“标题” *!* cells(2,1):校区 *!* cells(2,3):学历 *!* cells(2,5):专业 *!* cells(2,6):班级 *!* *!* set safe off set talk on LOCAL inf(4) as String *dele file C:\MyDocu~1\Resume.xlw objExcel = CreateObject("Excel.Application") &&创建一个EXCEL应用程序实例 wjm=getfile("xls") objExcel.Workbooks.Open(wjm) &&调用workbooks(Microsoft Excel 应用程序; 中当前打开的所有 Workbook 对象的集合。); 对象的open方法程序来打开指定的文件，并为; 打开的文件创建一个新的工作簿 *objexcel.visible=.f. ***下面的代码判断出生日期字段的格式是否满足要求*** *IF !varTYPE(objexcel.cells(10,6))="d" * MESSAGEBOX("出生日期字段不满足格式要求，不能导入，请将出生日期字段修改为:"+CHR(13); +"mm.dd.yy的格式,如:05.19.83 表示1983年5月19 然后再运行此导入程序") * RETURN *ENDIF inf(1)=substr(objexcel.cells(2,1).value,7)&&校区 Inf(2)=objexcel.cells(2,4).value&&学历 inf(3)=objexcel.cells(2,6).value&&专业 inf(4)=objexcel.cells(2,7).value&&班 LOCAL nrow as Number ,i as Number i=0 *MESSAGEBOX("计算行数") *MESSAGEBOX(objexcel.cells(5,1).value) *MESSAGEBOX(VARTYPE(objexcel.cells(22,1).value)) DO WHILE .t. i=i+1 ?objexcel.cells(i,1).value IF !VARTYPE(objexcel.cells(i,1).value)="C" nrow=i-1 EXIT ENDIF ENDDO *nrow=20 LOCAL arecord(16) *MESSAGEBOX("循环添加记录") USE zlb disinf("zlb.dbf中现有记录"+ALLTRIM(STR(RECCOUNT()))+"条") disinf("正在添加记录") FOR i=4 TO nrow arecord(1)=objexcel.cells(i,1).value&&学号　 arecord(2)=objexcel.cells(i,2).value&&姓名 arecord(3)=objexcel.cells(i,3).value&&性别 arecord(4)=objexcel.cells(i,4).value&&籍贯 arecord(5)=objexcel.cells(i,5).value&&民族 *MESSAGEBOX(VARTYPE(objexcel.cells(i,6).value)) IF VARTYPE(objexcel.cells(i,6).value)="C" arecord(6)=RIGHT(objexcel.cells(i,6).value,2)+"/"+"01"+'/'; +LEFT(objexcel.cells(i,6).value,2) ELSE arecord(6)= RIGHT(STR(objexcel.cells(i,6).value,5,2),2); +"/"+"01"+"/"; +LEFT(STR(objexcel.cells(i,6).value,5,2),2) ENDIF &&arecord(6)=IIF(VARTYPE(objexcel.cells(i,6).value)="c",RIGHT(objexcel.cells(i,6).value,2)+"/"+"01"+'/'+LEFT(objexcel.cells(i,6).value,2),; RIGHT(STR(objexcel.cells(i,6).value,5,2),2)+"/"+"01"+'/'+LEFT(STR(objexcel.cells(i,6).value,5,2),2))&&出生年月 arecord(7)=LEFT(ALLTRIM(STR(objexcel.cells(i,8).value,6,0)),6)&&邮政编码 arecord(8)=objexcel.cells(i,7).value&&通讯地址 arecord(9)=objexcel.cells(i,9).value &&收信人 arecord(10)=iif(!ALLTRIM(objexcel.cells(i,10).value)=="",objexcel.cells(i,10).value; ,"无")&&家庭电话 arecord(11)=inf(3)&&专业 arecord(12)=inf(4)&&班级 arecord(13)=objexcel.cells(i,11).value&&寝室号码 arecord(14)=STR(objexcel.cells(i,12).value,7,0)&&寝室电话 arecord(15)=inf(1)&&校区 arecord(16)=inf(2)&&学历 SELECT zlb APPEND FROM ARRAY arecord ENDFOR disinf("zlb.dbf中现有记录"+ALLTRIM(STR(RECCOUNT()))+"条") disinf("记录添加完毕，共添加了"+ALLTRIM(STR(nrow-3))+"条记录，请查检") INKEY(3) WAIT CLEAR ****定义日期转换函数，此函数能将各种格式的日期转换成mm/dd/yy的格式**** ****如果要转换的日期只有年和月，则自动添加日为'01'*** *!* FUNCTION datetran *!* PARAMETERS soudate *!* IF VARTYPE(soudate)="N" *!* DO case *!* CASE LEN(souDATE) ***关闭工作簿，退出EXCEL objexcel.quit RELEASE objexcel *!* objexcel.save *!* *objExcel.ActiveWorkbook.saved=.f. *!* objexcel.Quit &&退出 *!* RELEASE objexcel *!* retu
VFP导入导出EXCEL2007、2010程序源码
12-10
VFP导入导出EXCEL2007、2010程序源码
vfp直接读取excel代码.doc
05-11
visual foxpro直接读取excel代码,源自网络搜索
在Vf中如何将Excel数据导入（用Vf来导）？
C#,SQL,Castle,Hibernate,MVC,Spring.net
03-16 9871
请大侠们赐教。 --------------------------------------------------------------- 使用import命令，如： IMPORT FROM 表1.xls TYPE xls 将表1.xls导入为表1.dbf --------------------------------------------------------------- 点击“文件
vfp(Visual FoxPro)
03-13
- **数据迁移**: VFP提供了多种数据迁移工具，可以方便地导入和导出数据到其他格式，如Excel、CSV或ODBC兼容的数据库。 3. **VFP与DBF文档** - **DBF文件结构**: DBF文件是二进制文件，包含表的结构信息（字段名...
vfp数据库期末考试题(附答案).docx
12-20
* 可以将 VFP6.0 中的数据导出到一个 Excel 电子表格文件中。（√） * FontSize 属性可用于设置标签中字体的大小。（√） * 索引文件的结构分为结构复合索引文件和独立复合索引文件。（╳） * 只有数据库表才能建立...
通过VFPOLEDB批量导入数据到MSSQL2000
11-30
标题《通过VFPOLEDB批量导入数据到MSSQL2000》和描述《通过VFPOLEDB直接将DBF表数据批量导入MSSQL2000数据库中，在实际企业开发中，经常会用到，导入数据超快，比EXCEL导入快上很多，导入数据后立即释放表资源》提到...
vfp联编一闪而过处理方法
04-17
教你在做vfp程序时，联编出现一闪而过的现象处理
基于vfp 通讯录系统
12-21
6. 导入导出功能：为了数据交换，系统可能支持从CSV、Excel等常见格式导入和导出联系人数据。 7. 报表打印：对于企业用户，系统可能提供打印功能，将联系人列表生成报表，便于纸质备份或会议分享。 8. 安全性与...
超过65536行的数据导入Vfp9、导出至Excel
xiaoliu2015的博客
08-22 2315
excel与vfp之间的数据转换。
VFP中导出数据的几种方法
hylang的专栏
02-25 6497
当VFP处理好数据后，这时你可以用多种方法将这些数据导出，以便被其它应用程序(如Excel等)所用。下面向你简单介绍几种导出数据的方法： 　　1.用“导出数据”对话框。你可以从VFP主菜单中选择“文件/导出…”打开“导出”对话框，在该对话框中的“来源”框中输入表名(c:/vfp/students.dbf)，在“类型”中指定要导出数据的类型(Microsoft Excel)，在“到”框中输入导出的路
评论
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

当前余额3.43元 前往充值 >
需支付：10.00元
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付元
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明：

1.余额是钱包充值的虚拟货币，按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载，可以购买VIP、付费专栏及课程。

余额充值