| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 1157 人关注过本帖
标题:求程序,直接以某一字段分类导出各个文件
只看楼主 加入收藏
zbl105
Rank: 1
等 级:新手上路
帖 子:7
专家分:0
注 册:2013-5-13
结帖率:33.33%
收藏
已结贴  问题点数:20 回复次数:11 
求程序,直接以某一字段分类导出各个文件
我的问题是:有一表格“成绩表”,里面有一个字段名为“班主任”,每次都要导出为Excel格式,然后按“班主任”分类,为每一个班主任做一个以班主任姓名命名的Excel文件,能不能通过程序的方式,可以直接生成以班主任姓名命名的dbf和Excel文件。
搜索更多相关主题的帖子: 班主任 成绩表 Excel 命名 
2013-11-22 09:13
bccn0906
Rank: 9Rank: 9Rank: 9
来 自:广州
等 级:蜘蛛侠
威 望:2
帖 子:414
专家分:1183
注 册:2013-10-16
收藏
得分:20 
CLOSE DATABASES
USE 成绩表 IN 0
SELECT distinct  班主任 FROM 成绩表 INTO CURSOR t1
SELECT t1
SCAN
    SELECT 成绩表
    COPY TO ('d:\'+ALLTRIM(t1.班主任)) FOR ALLTRIM(班主任)==ALLTRIM(t1.班主任) &&注意修改你的保存路径
    COPY TO ('d:\'+ALLTRIM(t1.班主任)) FOR ALLTRIM(班主任)==ALLTRIM(t1.班主任) xl5  &&注意修改你的保存路径

    SELECT t1
ENDSCAN
CLOSE DATABASES


[ 本帖最后由 bccn0906 于 2013-11-22 09:31 编辑 ]
2013-11-22 09:23
zbl105
Rank: 1
等 级:新手上路
帖 子:7
专家分:0
注 册:2013-5-13
收藏
得分:0 
成功,非常感谢。
2013-11-22 09:40
zbl105
Rank: 1
等 级:新手上路
帖 子:7
专家分:0
注 册:2013-5-13
收藏
得分:0 
效果好。

[ 本帖最后由 zbl105 于 2013-11-22 10:18 编辑 ]
2013-11-22 09:51
bccn0906
Rank: 9Rank: 9Rank: 9
来 自:广州
等 级:蜘蛛侠
威 望:2
帖 子:414
专家分:1183
注 册:2013-10-16
收藏
得分:0 
。。。

[ 本帖最后由 bccn0906 于 2013-11-22 15:16 编辑 ]
2013-11-22 09:54
sdta
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:江苏省连云港市
等 级:版主
威 望:335
帖 子:9841
专家分:27213
注 册:2012-2-5
收藏
得分:0 
SELECT distinct  班主任 FROM 成绩表 INTO CURSOR t1
SELECT t1
SCAN
    SELECT * FROM 成绩表 INTO CURSOR T2
    COPY TO ('d:\'+ALLTRIM(t1.班主任)) FOR ALLTRIM(班主任)==ALLTRIM(t1.班主任) &&注意修改你的保存路径
    COPY TO ('d:\'+ALLTRIM(t1.班主任)) FOR ALLTRIM(班主任)==ALLTRIM(t1.班主任) xl5  &&注意修改你的保存路径
    SELECT t1
ENDSCAN
USE IN T1
USE IN T2


坚守VFP最后的阵地
2013-11-22 10:05
bccn0906
Rank: 9Rank: 9Rank: 9
来 自:广州
等 级:蜘蛛侠
威 望:2
帖 子:414
专家分:1183
注 册:2013-10-16
收藏
得分:0 
回复 6楼 sdta
要不就改成这样,好吗
SELECT distinct  班主任 FROM 成绩表 INTO CURSOR t1
SELECT t1
SCAN
    SELECT * FROM 成绩表 INTO CURSOR T2 where ALLTRIM(班主任)==ALLTRIM(t1.班主任)
    select t2
    COPY TO ('d:\'+ALLTRIM(t1.班主任)) &&注意修改你的保存路径
    COPY TO ('d:\'+ALLTRIM(t1.班主任)) xl5  &&注意修改你的保存路径
    SELECT t1
ENDSCAN
USE IN T1
USE IN T2



[ 本帖最后由 bccn0906 于 2013-11-22 10:13 编辑 ]
2013-11-22 10:11
zbl105
Rank: 1
等 级:新手上路
帖 子:7
专家分:0
注 册:2013-5-13
收藏
得分:0 
刚才是我的成绩表中本身就没有o,是我看错了。
2013-11-22 10:20
sdta
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:江苏省连云港市
等 级:版主
威 望:335
帖 子:9841
专家分:27213
注 册:2012-2-5
收藏
得分:0 
回复 4楼 zbl105
用代码导出

坚守VFP最后的阵地
2013-11-22 10:40
sdta
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:江苏省连云港市
等 级:版主
威 望:335
帖 子:9841
专家分:27213
注 册:2012-2-5
收藏
得分:0 
回复 7楼 bccn0906
打开原始表是个麻烦的事情

坚守VFP最后的阵地
2013-11-22 10:41
快速回复:求程序,直接以某一字段分类导出各个文件
数据加载中...
 
   



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

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