| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 2012 人关注过本帖
标题:热点求助:如何把一个有250多列(即有250多个字段名)的DBF表按一定规则排列 ...
只看楼主 加入收藏
xuevfp89
Rank: 1
等 级:新手上路
帖 子:93
专家分:0
注 册:2014-1-22
收藏
得分:0 
真奇怪,应用6楼的编程,有时排序准确,有时不准确,这是怎么回事?
2014-03-13 11:35
sdta
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:江苏省连云港市
等 级:版主
威 望:335
帖 子:9841
专家分:27213
注 册:2012-2-5
收藏
得分:0 
不可能
是否修改了什么地方

坚守VFP最后的阵地
2014-03-13 11:53
TonyDeng
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
等 级:贵宾
威 望:304
帖 子:25859
专家分:48889
注 册:2011-6-22
收藏
得分:0 
又是一個數據結構沒做好的例子,實現了也沒意義,這種實現方法是不值得學習的。

授人以渔,不授人以鱼。
2014-03-13 12:32
xuevfp89
Rank: 1
等 级:新手上路
帖 子:93
专家分:0
注 册:2014-1-22
收藏
得分:0 
回复22楼:是真的啊,如果在样本表末尾再增加一行,并随意在某些列的最后一行增加1,再编程执行排序,得出的排序结果,有时不准确啊。
2014-03-13 16:46
xuevfp89
Rank: 1
等 级:新手上路
帖 子:93
专家分:0
注 册:2014-1-22
收藏
得分:0 
回复22楼:是真的啊,在样本表末尾再增加一空白行(用 appe blan 命令),并随意在某些列的最后一行添加1,再执行编程排序,得出的排序结果,就不准确啊
2014-03-13 17:04
xuevfp89
Rank: 1
等 级:新手上路
帖 子:93
专家分:0
注 册:2014-1-22
收藏
得分:0 
在样本表末尾增加一空白行(用 appe blan 命令),随意在某些列的最后一行添加1(增加一行空白行之后,最好在该列全是空白的那列最一行添加1),再执行编程排序,得出的排序结果,就不准确啊。我是用6楼您原来的编程并加以完善,没有任何修改:
CREATE CURSOR T (FIELD_NAME C(10),NUM N(4)) && 过渡表
SELECT * FROM 样本表 INTO CURSOR TEMP READWRITE
*--- 在数据表最后插入一条记录
INSERT INTO TEMP ((FIELD(2))) VALUES (PADC("小计",FSIZE(FIELD(2)),"-"))

FOR I=3 TO FCOUNT()-2
    IF TYPE(FIELD(I))="N"
       COUNT TO HJ FOR EMPTY(EVALUATE(FIELD(I))) AND RECNO()<RECCOUNT()
       *--- 数值型字段计数,并将结果添加到最后一条记录
       REPLACE RECORD RECCOUNT() (FIELD(I)) WITH HJ IN TEMP
       INSERT INTO T VALUES ((FIELD(I,[TEMP])),HJ)
    ENDIF
ENDFOR
SELECT * FROM T ORDER BY 2 DESC INTO CURSOR TEMP1
LCSTR=[]
SCAN
   LCSTR=LCSTR+ALLTRIM(FIELD_NAME)+IIF(RECNO()<RECCOUNT(),[,],[])
ENDSCAN
SELECT 期数,种类,&LCSTR,类别,期号 FROM 样本表 INTO TABLE CXB
USE IN TEMP
ERASE TEMP.DBF && 删除TEMP.DBF
2014-03-13 17:08
xuevfp89
Rank: 1
等 级:新手上路
帖 子:93
专家分:0
注 册:2014-1-22
收藏
得分:0 
最好在该列全是空白的那列最一行添加1
最好在该列全是空白的那列最后一行添加1

2014-03-13 17:10
xuevfp89
Rank: 1
等 级:新手上路
帖 子:93
专家分:0
注 册:2014-1-22
收藏
得分:0 
先执行编程,排序结果正确,接着,增加一行空白行,在空格数最多的某一列的最后一行添加1,再执行编程,排序结果就不正确了。真奇怪。
2014-03-13 18:57
sdta
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:江苏省连云港市
等 级:版主
威 望:335
帖 子:9841
专家分:27213
注 册:2012-2-5
收藏
得分:0 
自己慢慢研究吧,一句两句也说不明白。
代码是没问题的。

坚守VFP最后的阵地
2014-03-13 19:05
xuevfp89
Rank: 1
等 级:新手上路
帖 子:93
专家分:0
注 册:2014-1-22
收藏
得分:0 
唉,我又说错话了,真该自打嘴巴,在26楼时,我居然说:“我是用6楼您原来的编程并加以完善”,哪里有加以完善,完全是6楼的创作啊,我又得罪人了。真不懂说话。
2014-03-13 19:08
快速回复:热点求助:如何把一个有250多列(即有250多个字段名)的DBF表按一定规 ...
数据加载中...
 
   



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

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