&&自动生成编号
SELECT 员工信息表
CALCULATE MAX(ALLTRIM(id)) TO mzdbh
nzdbh =VAL(mzdbh)
IF nzdbh = 0
zdbh = "00000001"
ELSE
zdbh = PADL(ALLTRIM(STR(nzdbh+1)),8,"0")
ENDIF
上述代码改为:
SELECT MAX(ID) AS BH FROM 数据1!员工信息表 INTO CURSOR T
ZDBH=IIF(_TALLY=0,[00000001],PADL(INT(VAL(BH))+1,8,[0]))
[
本帖最后由 sdta 于 2013-4-22 16:01 编辑 ]