以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  [求助]网络编号  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=108024)

--  作者:liuyixin662
--  发布时间:2017/10/14 14:54:00
--  [求助]网络编号

老师你好,由于2人同时在局域网环境下录入单据,出现重复单据,现将编号方式改为教程的方式,

出现这样一个问题,由于账期为每月1-31日,次月初单据日期需改为上月或前面的日期,

由于日期的改变导致按教程的方式编号不能实现,麻烦老师修改一下代码,谢谢

 

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:网络编号(日期改变后).txt


--  作者:zoudezhao
--  发布时间:2017/10/14 15:02:00
--  

DataRowAdding  事件

把新增单据时的时间调为前20天不行么

Dim s As Date =  Date.Today().AddDays(-20)
Output.Show(s)


--  作者:liuyixin662
--  发布时间:2017/10/14 15:12:00
--  
不行也,规定1-31日
--  作者:liuyixin662
--  发布时间:2017/10/14 15:13:00
--  
只能通过修改日期的方式
--  作者:有点蓝
--  发布时间:2017/10/14 15:30:00
--  
截图说明一下,要改什么日期
--  作者:liuyixin662
--  发布时间:2017/10/14 15:41:00
--  

图片点击可在新窗口打开查看此主题相关图片如下:入库单.bmp
图片点击可在新窗口打开查看

--  作者:有点蓝
--  发布时间:2017/10/14 16:08:00
--  
日期值改变后重新触发1楼的代码不就行了。把重新设置单号的代码写到Datacolchanged事件

去掉新增行的判断

If dr.RowState <> DataRowState.Added Then \'如果不是新增行

--  作者:liuyixin662
--  发布时间:2017/10/14 16:32:00
--  
谢谢老师