| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 8797 人关注过本帖
标题:求解用OLEAPP.ACTIVEWORKBOOK.SAVEAS()保存的xls文件为何在excel2013中打开 ...
取消只看楼主 加入收藏
IHORSE
Rank: 1
等 级:新手上路
帖 子:41
专家分:5
注 册:2007-2-11
结帖率:100%
收藏
已结贴  问题点数:20 回复次数:2 
求解用OLEAPP.ACTIVEWORKBOOK.SAVEAS()保存的xls文件为何在excel2013中打开提示错误。
用createobj的方法创建了excel对象,然后把dbf表的内容写入到一个xls文件中,
有部分语句如下:


OLEAPP=CREATEOBJECT("Excel.Application")
OLEAPP.VISIBLE=.F. &&bu显示 Excel。
OLEAPP.WORKBOOKS.ADD
****这几行代码是写入数据的

OLEAPP.ACTIVEWORKBOOK.SAVEAS("&xlsfile")  &&xlsfile对应某个具体文件
OLEAPP.WORKBOOKS.CLOSE


 写入数据成功了的,但是,用excel2013打开这个xls文件的时候提示“。。。。的文件格式和扩展名不匹配,文件可能已经损坏或不安全,除非您信任其来源,否则请勿打开。是否仍要打开它?”,点击“是”按钮后,可以打开,文件内容也可读。但是,只要不另存为excel的格式而直接保存,下次打开该文件仍要出现这个提示。
请问这是什么原因?如何才能避免??

搜索更多相关主题的帖子: excel 扩展名 Excel 
2016-02-03 10:21
IHORSE
Rank: 1
等 级:新手上路
帖 子:41
专家分:5
注 册:2007-2-11
收藏
得分:0 
回复 2楼 吹水佬
好吧,我把那excel文件放上来
代号-1.rar (10.99 KB)
2016-02-03 11:30
IHORSE
Rank: 1
等 级:新手上路
帖 子:41
专家分:5
注 册:2007-2-11
收藏
得分:0 
回复 9楼 aaaaaa
问题解决了:
首先在程序中判断当前安装的office版本,如果<12,说明是office2003及之前版本,那么就在程序中只创建xls文件
如果>12,说明是office2007及以上版本,则在程序中自动创建xlsx文件。
2016-02-04 11:05
快速回复:求解用OLEAPP.ACTIVEWORKBOOK.SAVEAS()保存的xls文件为何在excel2013中 ...
数据加载中...
 
   



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

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