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

之前发过一个帖子:根据日期生成编号,链接如下: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)+"%' ")

运行效果如下:
根据当前日期生成16062801格式编号


原文地址:http://bbs.delit.cn/thread-1103-1-1.html

转载请注明出处:

撰写人:度量科技http://www.delit.cn