关于自动编号的问题？ - VFP论坛

| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛 |

编程论坛 → 数据库技术 → 『 VFP论坛』 → 关于自动编号的问题？

我的收件箱(0)

欢迎加入我们，一同切磋技术

共有 2069 人关注过本帖

标题：关于自动编号的问题？

只看楼主加入收藏

caolp

等　级：新手上路
帖　子：160
专家分：5
注　册：2014-7-12
结帖率：92.31%

楼主

已结贴√ 问题点数：20 回复次数：28

关于自动编号的问题？

请教老师一个问题，我想在每输入居民一条信息时，序号（XH）会自动增加1，序号（XH）设5位，我用下面的一段代码，每条记录序号（XH）的结果始终都是01000，请老师帮我分析一下。
IF EMPTY(序号)
SELECT MAX(序号) FROM 居民信息 INTO ARRA A
CEND=VAL(SUBSTR(A(1),1))+1
XH=ALLT(PADL(ALLT(STR(CEND,5)),5,'0'))
endif
repl 序号 with XH

搜索更多相关主题的帖子: 记录　信息　

2014-08-09 16:40

hu9jj

来　自：红土地
等　级：贵宾
威　望：400
帖　子：11857
专家分：43421
注　册：2006-5-13

第 2 楼

得分:5

试试：
IF EMPTY(序号)
    SELECT MAX(序号) FROM 居民信息 INTO ARRA A
    CEND=VAL(A)+1
    XH=PADL(ALLT(STR(CEND)),5,'0')
endif
repl 序号 with XH

活到老，学到老！http://www.（该域名已经被ISP盗卖了）E-mail:hu-jj@

2014-08-09 17:06

caolp

等　级：新手上路
帖　子：160
专家分：5
注　册：2014-7-12

第 3 楼

得分:0

老师，还是不行，运行结果还是01000，是不是和数据类型有关系？我的序号是字符型的。

2014-08-09 17:14

caolp

等　级：新手上路
帖　子：160
专家分：5
注　册：2014-7-12

第 4 楼

得分:0

尾数为什么不加1呢？

2014-08-09 17:29

tlliqi

等　级：贵宾
威　望：204
帖　子：15453
专家分：65956
注　册：2006-4-27

第 5 楼

得分:0

回复 3 楼 caolp

测试了下二楼的没问题
IF EMPTY(序号)
SELECT MAX(序号) FROM 居民信息 INTO ARRA A
CEND=VAL(A)+1
endif
repl 序号 with PADL(ALLT(STR(CEND)),5,'0')

2014-08-09 17:34

tlliqi

等　级：贵宾
威　望：204
帖　子：15453
专家分：65956
注　册：2006-4-27

第 6 楼

得分:0

居民信息.rar (1.76 KB)

图片附件: 游客没有浏览图片的权限，请登录或注册

2014-08-09 17:38

sdta

来　自：江苏省连云港市
等　级：版主
威　望：335
帖　子：9841
专家分：27213
注　册：2012-2-5

第 7 楼

得分:0

程序代码：

CLOSE TABLES
USE 居民信息
APPEND BLAN
IF EMPTY(序号)
    SELECT MAX(序号) FROM 居民信息 INTO ARRA A
    CEND=INT(VAL(A)+1)
ENDIF
REPLACE 序号 WITH PADL(CEND,5,'0')
BROWSE

PADL(eExpression, nResultSize [, cPadCharacter])
参数eExpression指定需填充的表达式。除了逻辑表达式、通用字段或图片字段，这个表达式可以是任何类型的表达式。
因此在使用某个函数时，对其中参数的含义要弄明白。

坚守VFP最后的阵地

2014-08-09 19:11

caolp

等　级：新手上路
帖　子：160
专家分：5
注　册：2014-7-12

第 8 楼

得分:0

以下是引用sdta在2014-8-9 19:11:04的发言：

CLOSE TABLES
USE 居民信息
APPEND BLAN
IF EMPTY(序号)
SELECT MAX(序号) FROM 居民信息 INTO ARRA A
CEND=INT(VAL(A)+1)
ENDIF
REPLACE 序号 WITH PADL(CEND,5,'0')
BROWSE

PADL(eExpression, nResultSize [, cPadCharacter])
参数eExpression指定需填充的表达式。除了逻辑表达式、通用字段或图片字段，这个表达式可以是任何类型的表达式。
因此在使用某个函数时，对其中参数的含义要弄明白。

谢谢老师帮忙，按您的方法，还是不行。代码没有错，问题出在那，我还是没有查出来。我把表传上来，麻烦老师帮我看看。

居民信息.rar (9.35 KB)

2014-08-09 20:25