主题:VFP自动编号为何提示嵌套错误?谢谢大家
hbwhr
[专家分:0] 发布于 2012-03-12 09:43:00
要给201101数据库自动编流水号,字段名为lsh,按下列程序运行时,一直提示嵌套错误,请各位指点。
sele 1
use 201101
go top
ls1=001
do while not eof()
ls1=ls1+1
repl Lsh with allt(str(ls1))
skip 1
end do
sele 1
use
谢谢大家!
回复列表 (共5个回复)
沙发
fyyylyl [专家分:8550] 发布于 2012-03-12 11:02:00
end do--enddo
板凳
lygcw9603 [专家分:250] 发布于 2012-03-12 12:10:00
sele 1
use 201101
go top
ls1=001
do while not eof()
ls1=ls1+1
repl Lsh with allt(str(ls1))
skip 1
[color=800000] end do[/color] &&应该 ENDDO 不能分开写
sele 1
use
[color=FF0000]REPLACE LSH WITH PADL(RECNO(),6,"0") [/color]&& 6是LSH字段的宽度
3 楼
liupeisong [专家分:2340] 发布于 2012-03-12 20:21:00
REPLACE ALL zzzsbmh WITH '0660981'+RIGHT('00000'+ALLTRIM(STR(RECNO()+98)),5)
类似这样的一条命令就可以,不需要编程序的(根据记录号生成编号)
4 楼
sywzs [专家分:5650] 发布于 2012-03-13 05:58:00
REPLACE ALL LSH WITH CHRTRAN(STR(RECNO(),6)," ","0")
5 楼
hbwhr [专家分:0] 发布于 2012-03-20 14:27:00
非常感谢。终于找到原因了。
我来回复