| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 2892 人关注过本帖
标题:VF文件转换为EXCLE文件
只看楼主 加入收藏
cuinanivan
Rank: 1
等 级:新手上路
帖 子:27
专家分:0
注 册:2016-8-24
结帖率:0
收藏
已结贴  问题点数:10 回复次数:8 
VF文件转换为EXCLE文件
用转换命令将BDF文件转换为excel文件    coyp to XX.xls 这个命令  问什么转换完 EXCLE打不开啊 打开只显示一条记录,用VF打开源文件是正常显示  在别的电脑上 使用这个命令就能打开
搜索更多相关主题的帖子: excel 源文件 记录 
2016-09-03 14:54
吹水佬
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
等 级:版主
威 望:451
帖 子:10609
专家分:43210
注 册:2014-5-20
收藏
得分:2 
copy to ...... type ...
2016-09-03 15:01
hyswcyh
Rank: 8Rank: 8
等 级:贵宾
威 望:20
帖 子:391
专家分:896
注 册:2004-11-23
收藏
得分:0 
copy to xx.xls xl5
或者坛子里有转换的代码。
打不开,可以有以下代码:
oExcel=CREATEOBJECT("Excel.Application")
oExcel.WorkBooks.Open(alltrim(cExcelFile))
oExcel.Visible=.T.
2016-09-03 19:29
cuinanivan
Rank: 1
等 级:新手上路
帖 子:27
专家分:0
注 册:2016-8-24
收藏
得分:0 
谢谢
2016-09-03 20:18
sdta
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:江苏省连云港市
等 级:版主
威 望:335
帖 子:9848
专家分:27241
注 册:2012-2-5
收藏
得分:2 
copy to ..... all

坚守VFP最后的阵地
2016-09-03 22:14
wengjl
Rank: 14Rank: 14Rank: 14Rank: 14
等 级:贵宾
威 望:109
帖 子:2233
专家分:3913
注 册:2007-4-27
收藏
得分:2 
以下是引用cuinanivan在2016-9-3 14:54:36的发言:

用转换命令将BDF文件转换为excel文件    coyp to XX.xls 这个命令  问什么转换完 EXCLE打不开啊 打开只显示一条记录,用VF打开源文件是正常显示  在别的电脑上 使用这个命令就能打开



   copy to xx      生成的是 “xx.dbf”

      copy to xx.xls  生成的是 “xx.xls.dbf”  所以用EXCEL是打不开的,用VF打开是正常的

   copy to xx type xl5 生成的才是 “xx.xls” 可以用EXCEL打开的

只求每天有一丁点儿的进步就可以了
2016-09-04 08:52
hyswcyh
Rank: 8Rank: 8
等 级:贵宾
威 望:20
帖 子:391
专家分:896
注 册:2004-11-23
收藏
得分:0 
楼主休息中...
2016-09-08 11:50
厨师王德榜
Rank: 18Rank: 18Rank: 18Rank: 18Rank: 18
等 级:贵宾
威 望:199
帖 子:995
专家分:4966
注 册:2013-2-16
收藏
得分:2 
其实,copy to xx type xl5 也并非最好解决方案。我自己的方案是这样:
程序代码:
if 用户电脑上未安装EXCEL?
    弹出提示框
    return
endif
if DBF 记录数 〉104万
        弹出提示,提醒用户他的电脑不适合直接导出EXCEL这种操作,
        建议用户直接把DBF用TXT格式导出(这样也可以用EXCEL读入)。
else
    if DBF 记录数 〉65536 
       if 用户电脑上的EXCEL版本是2007以下 ?
            弹出提示,提醒用户他的电脑不适合直接导出EXCEL这种操作,
            建议用户直接把DBF用TXT格式导出(这样也可以用EXCEL读入)。
       else
           先 copy to xx type xl5
           再调用EXCEL对象,打开 XX
           把DBF 从 65537 起的记录,从EXCEL对象的第65538行,逐笔写入(因EXCEL对象的标题要占一行)
           保存EXCEL对象
           关闭 EXCEL对象
       endif
    else
       直接 copy to xx type xl5
    endif
endif
具体代码就不写了,前人已经有很多了。
2016-09-08 17:36
hyswcyh
Rank: 8Rank: 8
等 级:贵宾
威 望:20
帖 子:391
专家分:896
注 册:2004-11-23
收藏
得分:2 
超过6万以上的数据不会太多,104万就更少了,大多数都是用于临时交换用的,所以一般情况下,不会影响到什么。
2016-09-10 13:47
快速回复:VF文件转换为EXCLE文件
数据加载中...
 
   



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

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