![]() ![]() ![]() ![]() |
|||||
|
|||||
樓主 tammy ![]()
![]() |
出貨單號欄位格式為: 201201310001 201201310002 隔天不需跳一號, 隔天出貨單號格式為: 201202010003 201202010004 ... 請問這在Access 2007 裡面怎麼設定??? 謝謝
搜尋相關Tags的文章:
[ 日期+流水號 ] ,
本篇文章發表於2012-01-31 15:18 |
1樓 |
Private Sub 出貨日期_AfterUpdate()
1001 Z = DMax("出貨單號", "出貨資料表") 1002 If IsNull(Z) = False Then '若出貨單號之最大值有記錄 1003 Me![出貨單號] = Format(Me![出貨日期], "yyyymmdd") & Format(CStr(Val(Right(Z, 4) + 1)), "0000") '加1後顯示 1004 Else '若出貨單號之最大值沒有記錄 1005 Me![出貨單號] = Format(Me![出貨日期], "yyyymmdd") & "0001" '顯示0001 1006 End If End Sub
本篇文章回覆於2012-01-31 16:06
== 簽名檔 ==
--未登入的會員無法查看對方簽名檔-- |
2樓 |
Private Sub 出貨日期_AfterUpdate()
1001 Z = DMax("出貨單號", "出貨資料表") 1002 If IsNull(Z) = False Then '若出貨單號之最大值有記錄 1003 Me![出貨單號] = Format(Me![出貨日期], "yyyymmdd") & Format(CStr(Val(Right(Z, 4) + 1)), "0000") '加1後顯示 1004 Else '若出貨單號之最大值沒有記錄 1005 Me![出貨單號] = Format(Me![出貨日期], "yyyymmdd") & "0001" '顯示0001 1006 End If End Sub 請問如果隔天新增單號要從yyyymmdd0001開始要怎麼做
本篇文章回覆於2021-03-27 17:37
== 簽名檔 ==
--未登入的會員無法查看對方簽名檔-- |
3樓 |
程式碼缺日期做篩選條件
請把 1001 Z = DMax("出貨單號", "出貨資料表") 改為 1001 Z = DMax("出貨單號", "出貨資料表", "出貨日期 =#" & Me![出貨日期] & "#")
本篇文章回覆於2021-03-28 16:28
== 簽名檔 ==
--未登入的會員無法查看對方簽名檔-- |
回覆 |
如要回應,請先登入. |