| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 516 人关注过本帖
标题:[原创]如何在数据表中查询编号中的缺号
只看楼主 加入收藏
bccn201203
Rank: 9Rank: 9Rank: 9
等 级:蜘蛛侠
威 望:3
帖 子:680
专家分:1140
注 册:2012-3-14
收藏
 问题点数:0 回复次数:0 
[原创]如何在数据表中查询编号中的缺号
程序代码:
*--- 如何在数据表中查询编号中的缺号
CREATE CURSOR TABA (BH I)
FOR I=1 TO 31
    IF MOD(I,10)!=0
       INSERT INTO TABA VALUES (I)
    ENDIF
ENDFOR
*--- BH缺少10、20、30
I=0
CSTR=[]
SCAN
   I=I+1
   IF BH!=I
      CSTR=CSTR+TRANSFORM(I)+[,]
      I=I+1
   ENDIF
ENDSCAN
=STRTOFILE([BH中缺号:]+CSTR,"TABA.TXT")
MODIFY FILE TABA.TXT
MESSAGEBOX([缺少BH:]+LEFT(CSTR,LEN(CSTR)-1))
BROWSE
搜索更多相关主题的帖子: 如何 数据表 color 查询 
2012-09-01 11:35
快速回复:[原创]如何在数据表中查询编号中的缺号
数据加载中...
 
   



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

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