Board logo

標題: [發問] 長期性訂單且須每日維護的設計 [打印本頁]

作者: starry1314    時間: 2016-10-11 20:12     標題: 長期性訂單且須每日維護的設計

本帖最後由 starry1314 於 2016-10-11 20:17 編輯

1.請問一筆訂單 需維持30天(且每日三餐需照實際是否有將這一天這一餐的商品送出,並且做上記號)原以EXCEL表格製作,但如遇到超過30天甚至長達一年的將很難讓操作者去使用,反而要一直建立新訂單
想轉為accesse表格製作,讓她可無限延伸
但遇上一個難題
原EXCEL 是可依照訂購的起  始 日期 預先將這日期區間內的儲存格都做上【已送】的記號,
但到access 反而要使用者去單格一一去填寫日期 及配送紀錄,反而造成工作效率大幅下降

想請問各位有什麼好建議嗎....
[attach]25523[/attach]
個人想的是 是否可以VBA 已訂單的日期區建 自動再子表單新增 這區間的所有訂單明細
如 8/1~8/30  子表單則自動新增
8/1
8/2
8/3

查詢到的新增資料到子表單,是否可以變數來反覆輸入呢?
8/1~8/30
直到 i = 結束日期 為止
i = 起始日期 +1
不知該如何套入以下代碼

DIM RS AS RECORDSET
IF ME.DIRTY THEN ME.REFRESH
SET RS=CURRENTDB.OPENRECORDSET("歷史記錄資料表")
RS.ADDNEW
RS("商品名稱")=ME![商品名稱]
RS("訂購日期")=ME![訂購日期]
RS("數量")=ME![數量]
RS.UPDATE
RS.CLOSE
ME![子表單].REFRESH
作者: ky2599y    時間: 2016-11-5 00:38

並不了解你的完整需求,僅能用猜的,參考看看吧。
[attach]25727[/attach]
作者: starry1314    時間: 2016-11-5 16:36

回復 2# ky2599y


   辛苦了,但不是這種一筆紀錄輸入的差在如你設的日期區間 開始 11/1 結束11/5
並且在選擇完品項後 例如 甲
會有份子資料表 依訂單日期自動建立後,內容依序讀取(設定好的菜單內容以日期為準) 套入
以下訂單明細為依據一開始選擇輸入後自動建立的
[attach]25729[/attach]
作者: ky2599y    時間: 2016-11-5 21:47

所以你菜單是事先定好的,假設你定出了一星期的菜單,沒有必要把一天三餐菜單又存到客戶應單去吧,把客戶訂單與菜單以日期為關聯不就可以,就如同一本書,他有目錄,目錄是以頁為關聯,讀者看到第幾頁就可以進到該章節了
作者: starry1314    時間: 2016-11-5 22:25

本帖最後由 starry1314 於 2016-11-5 22:27 編輯

回復 4# ky2599y


   因為不是所有客戶都會是一樣的東西,只是預設帶入這些資料 如有不喜歡的菜色會需要單獨針對每餐去做變動

所以才需要才回存到客戶訂單裡面,再針對個人去客製化
作者: ky2599y    時間: 2016-11-5 23:05

回復 5# starry1314

1. 一個月1~30天都不同?可時修改出餐前一天?當天?一開始訂餐時?
2. 客製化完成後客戶針對某樣菜色不滿意,要求這菜色以後不要出現,每天記得住要改嗎?
換個角度在與客戶談妥菜色後會幫他產生一份菜單檔案,每日按三餐紀錄是否送出,當客戶要改時直接進入菜單去改
也不用每天三餐要開啟預設菜單再修改內容進行存檔
3. 做個按鈕點下去就秀他的菜單這樣不也挺方便
作者: starry1314    時間: 2016-11-5 23:29

1.是的,都不同 未送出去都可改
2.預設帶入就建立訂單的那一次,那次就改好一開始所談的菜色
之後每當接收到客戶有所變動的內容,才會去做修正,否則就照一開始設定的去製作
但就必須將它訂餐天數(EX: 11/1~11/10)的菜色校正過一次
至於由客戶去做更改,是以後希望做到的方向
3.這個原本的方式是由EXCEL+ACCESSE去做的,要解決2才能完全轉由ACCESS
作者: ky2599y    時間: 2016-11-6 22:26

你的問題太大
回到你原始問題好了
新增 + 迴圈判斷

DIM RS AS RECORDSET
IF ME.DIRTY THEN ME.REFRESH
SET RS=CURRENTDB.OPENRECORDSET("歷史記錄資料表")
For i = 1 To (Me!結束日 - Me!起始日) + 1
RS.ADDNEW
RS("商品名稱")=ME![商品名稱]
RS("訂購日期")= Me![起始日] + i - 1
RS("數量")=ME![數量]
RS.UPDATE
Next i
RS.CLOSE
ME![子表單].REFRESH
作者: hcm19522    時間: 2016-11-7 11:50

http://blog.xuite.net/hcm19522/twblog/463912600
作者: starry1314    時間: 2016-11-8 21:53

回復 9# hcm19522


  感謝協助,但需要的是在Accesse的做法,想完全擺脫EXCEL




歡迎光臨 麻辣家族討論版版 (http://forum.twbts.com/)