根据当前日期生成16062801格式编号

张兴康 · 发表于 2020-5-28 17:23:40

之前发过一个帖子：根据日期生成编号，链接如下：http://plat.delit.cn/forum.php?m ... hlight=%B1%E0%BA%C5

现在客户要求去掉年份前面的那两个数字；那么要如何实现呢？

'查询合同订单表中是否有根据当前日期生成的合同编号
dim htbh = ExecuteScalar("select nvl(max(CTR_ID) + 1, '"+mid(formatdatetime(date(),"yyyyMMdd"),2,len(formatdatetime(date(),"yyyyMMdd"))-2)+"01') from CTR_CONTRACT where CTR_ID like '"+mid(formatdatetime(date(),"yyyyMMdd"),2,len(formatdatetime(date(),"yyyyMMdd"))-2)+"%' ")

运行效果如下：