| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 535 人关注过本帖
标题:删除不完全重复记录的问题
只看楼主 加入收藏
悠闲小鱼
Rank: 1
等 级:新手上路
帖 子:48
专家分:0
注 册:2007-4-18
结帖率:60%
收藏
已结贴  问题点数:20 回复次数:6 
删除不完全重复记录的问题
date: 20131005 start time: 10:45:16 file: 02C0_1号站
date: 20131005 start time: 10:50:04 file: 02C1_2号站
date: 20131005 start time: 10:50:06 file: 02C1_2号站
date: 20131005 start time: 11:08:25 file: 04C1_3号站
date: 20131005 start time: 11:52:59 file: 02B0_4号站
date: 20131005 start time: 11:59:29 file: 03B0_5号站
date: 20131005 start time: 11:59:33 file: 03B0_5号站
date: 20131005 start time: 12:18:40 file: 04B1_6号站
求助怎么将上面红色的重复记录删除。
搜索更多相关主题的帖子: start 记录 file 
2013-11-25 15:30
tlliqi
Rank: 19Rank: 19Rank: 19Rank: 19Rank: 19Rank: 19
等 级:贵宾
威 望:204
帖 子:15453
专家分:65956
注 册:2006-4-27
收藏
得分:0 
date: 20131005 start time: 10:50:04 file: 02C1_2号站
date: 20131005 start time: 10:50:06 file: 02C1_2号站
怎么知道删除第二条呢?
2013-11-25 15:35
qjbzjp
Rank: 13Rank: 13Rank: 13Rank: 13
来 自:尧的故乡
等 级:贵宾
威 望:48
帖 子:1914
专家分:4397
注 册:2007-3-14
收藏
得分:0 
CREATE TABLE mynew(h1 C(5),h2 C(8),h3 C(5),h4 C(5),h5 C(8),h6 C(5),h7 C(10))
APPEND FROM G:\记录.txt DELIMITED WITH BLANK
CLEAR
USE mynew EXCLUSIVE
n0=VAL(SUBSTR(h7, 6,1))
SCAN  
    IF VAL(SUBSTR(h7, 6,1))<n0
        DELETE
    ELSE
        n0=VAL(SUBSTR(h7, 6,1))+1
    ENDIF
ENDSCAN
pack
BROWS

相互学习,互相交流,共同提高。
2013-11-25 16:45
bccn0906
Rank: 9Rank: 9Rank: 9
来 自:广州
等 级:蜘蛛侠
威 望:2
帖 子:414
专家分:1183
注 册:2013-10-16
收藏
得分:0 
...

[ 本帖最后由 bccn0906 于 2013-11-25 17:46 编辑 ]
2013-11-25 17:05
bccn0906
Rank: 9Rank: 9Rank: 9
来 自:广州
等 级:蜘蛛侠
威 望:2
帖 子:414
专家分:1183
注 册:2013-10-16
收藏
得分:20 
SET DELETED ON
CREATE CURSOR t1 (str1 varchar(80))
SELECT t1
APPEND FROM c:\记录.TXT sdf
DELETE FOR LEFT(str1,4)<>'date'
SELECT t1
str2=''
SCAN
    IF LEFT(str1,26)+ALLTRIM(SUBSTR(str1,36))==str2
        DELETE
    ELSE
        str2=LEFT(str1,26)+ALLTRIM(SUBSTR(str1,36))
    ENDIF
ENDSCAN
COPY TO c:\记录2.TXT sdf
收到的鲜花
  • 悠闲小鱼2013-11-26 08:30 送鲜花  3朵   附言:我很赞同
2013-11-25 17:46
sdta
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:江苏省连云港市
等 级:版主
威 望:335
帖 子:9841
专家分:27213
注 册:2012-2-5
收藏
得分:0 
删除第二条重复的记录

坚守VFP最后的阵地
2013-11-25 19:40
sdta
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:江苏省连云港市
等 级:版主
威 望:335
帖 子:9841
专家分:27213
注 册:2012-2-5
收藏
得分:0 
CREATE CURSOR mynew (h1 C(5),h2 C(8),h3 C(5),h4 C(5),h5 C(8),h6 C(5),h7 C(10))
APPEND FROM 记录.txt DELIMITED WITH BLANK
SELECT * FROM MYNEW WHERE H5 IN (SELECT MIN(H5) H5 FROM MYNEW GROUP BY H7)

坚守VFP最后的阵地
2013-11-25 20:33
快速回复:删除不完全重复记录的问题
数据加载中...
 
   



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

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