| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 1627 人关注过本帖
标题:重复记录删除问题
只看楼主 加入收藏
yjc9894301
Rank: 1
等 级:新手上路
帖 子:36
专家分:0
注 册:2011-3-25
结帖率:88.89%
收藏
已结贴  问题点数:20 回复次数:23 
重复记录删除问题
一数据表,以[报名序号]为主关键字的部分记录有重复,用下面查询这些记录,并进行逻辑删除,为什么只能查询出7条记录?
程序代码如下:
use lsb
select  lsb
 index on 报名序号 tag 报名序号
go top
scan
    i=报名序号
    skip
    if 报名序号=i
        skip -1
        delete
        skip
    endif
endscan
搜索更多相关主题的帖子: 关键字 报名 记录 数据表 
2014-04-25 17:41
sdta
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:江苏省连云港市
等 级:版主
威 望:335
帖 子:9841
专家分:27213
注 册:2012-2-5
收藏
得分:0 
那应该查询出多少条记录

坚守VFP最后的阵地
2014-04-25 18:12
sdta
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:江苏省连云港市
等 级:版主
威 望:335
帖 子:9841
专家分:27213
注 册:2012-2-5
收藏
得分:0 
上传lsb.dbf

坚守VFP最后的阵地
2014-04-25 18:18
sdta
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:江苏省连云港市
等 级:版主
威 望:335
帖 子:9841
专家分:27213
注 册:2012-2-5
收藏
得分:0 
图片附件: 游客没有浏览图片的权限,请 登录注册

坚守VFP最后的阵地
2014-04-25 18:28
sdta
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:江苏省连云港市
等 级:版主
威 望:335
帖 子:9841
专家分:27213
注 册:2012-2-5
收藏
得分:0 
程序代码:
Close Databases
Use lsb Alias lsb
Select lsb
Index On 报名序号1 Tag 报名序号
I=""
Scan
    If 报名序号1==I
       Skip -1
       Delete
       Skip
    Endif
    I=报名序号1
Endscan  
Browse For Deleted()=.t.
Set Order To
Close Databases
Erase lsb.CDX
收到的鲜花
  • tlliqi2014-04-25 21:25 送鲜花  20朵   附言:加分

坚守VFP最后的阵地
2014-04-25 18:59
tlliqi
Rank: 19Rank: 19Rank: 19Rank: 19Rank: 19Rank: 19
等 级:贵宾
威 望:204
帖 子:15453
专家分:65956
注 册:2006-4-27
收藏
得分:0 
select * from lsb where 报名序号1 in(select 报名序号1 from lsb group by 报名序号1 having count(报名序号1)>1)
2014-04-25 20:11
qjbzjp
Rank: 13Rank: 13Rank: 13Rank: 13
来 自:尧的故乡
等 级:贵宾
威 望:48
帖 子:1914
专家分:4397
注 册:2007-3-14
收藏
得分:0 
能查出12条重复记录:
USE lsb
INDEX on 报名序号1 TO myindx
n=""
SCAN
    IF n=报名序号1
        DELETE
    ENDIF
    n=报名序号1
ENDSCAN
BROWSE FOR DELETED()
收到的鲜花
  • tlliqi2014-04-25 21:25 送鲜花  20朵   附言:加分

相互学习,互相交流,共同提高。
2014-04-25 20:39
qjbzjp
Rank: 13Rank: 13Rank: 13Rank: 13
来 自:尧的故乡
等 级:贵宾
威 望:48
帖 子:1914
专家分:4397
注 册:2007-3-14
收藏
得分:0 
能查出12条重复记录:
图片附件: 游客没有浏览图片的权限,请 登录注册


[ 本帖最后由 qjbzjp 于 2014-4-25 20:43 编辑 ]

相互学习,互相交流,共同提高。
2014-04-25 20:39
sdta
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:江苏省连云港市
等 级:版主
威 望:335
帖 子:9841
专家分:27213
注 册:2012-2-5
收藏
得分:0 
以下是引用qjbzjp在2014-4-25 20:39:21的发言:

能查出12条重复记录:
楼主代码的意思中传递的信息是:逻辑删除相同记录中第一次出现的记录

坚守VFP最后的阵地
2014-04-25 21:04
tlliqi
Rank: 19Rank: 19Rank: 19Rank: 19Rank: 19Rank: 19
等 级:贵宾
威 望:204
帖 子:15453
专家分:65956
注 册:2006-4-27
收藏
得分:0 
应该是第一次出现后的记录吧
2014-04-25 21:16
快速回复:重复记录删除问题
数据加载中...
 
   



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

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