ลักษณะเดียวกับโพสนี้ https://www.thai-access.com/index.php?topic=905.0

https://www.thai-access.com/yeadram_view.php?topic_id=5576

ขอเพิ่มเติมจาก อ. OddyWriter หน่อยครับ

แนวทางการออกแบบ Databased ที่ผมทำมานี้ เหมาะสมแล้วหรือไม่? ถ้าไม่ ผมควรจะออกแบบอย่างไรเพื่อให้ได้ตามโจทย์ที่ผมต้องการ?

เท่าที่เห็นตอนนี้
- ในระบบมีเทเบิลที่มี 2 ฟิลด์เยอะทีเดียว บางตัวจำเป็นหรือไม่ อย่างเช่นเทเบิล tblBlood ถ้าเป็นผม ผมจะกำหนดตัวเลือกลงในส่วนของ Lookup tab ของฟิลด์ tblContractor.BloodID ไปเลยว่ามีอะไรให้เลือกบ้าง เพราะ 1)กรุ๊ปเลือดตายตัวอยู่แล้ว มีไม่กี่กรุ๊ป (A, A+, A-, ...)  2)ระบบของเราไม่มีความจำเป็นต้องเก็บรายละเอียดอะไรของกรุ๊ปเลือดนั้นอีก เช่น กรุ๊ปนั้นมีแอนติเจ้น A,B,D หรือเปล่า การแยกเทเบิลออกไปในกรณีนี้ เป็นภาระแก่ระบบที่ต้องมาลิงค์ไปยังเทเบิล tblBlood อีกต่างหาก 3)ถ้าตั้งค่า BloodID เป็นอะไรที่ไม่สื่อความหมาย เช่น ตัวเลข ดังนั้นเวลาเปิดดูเทเบิล tblContractor ก็จะต้องมานั่งนึกอีกว่ามันคือเลือดกรุ๊ปอะไรกันแน่ ส่วนเทเบิลอื่นเช่น tblPlant คุณคิดว่าโรงงานจะสร้างเพิ่ม/เปลี่ยนแปลงบ่อยขนาดไหน ถ้าไม่ เมื่อไหร่ที่มีก็ค่อยมาเพิ่มใน Lookup tab ก็ได้
- เข้าใจว่าฟิลด์ xxxID ในทุกเทเบิลจะเป็น Primary Key แต่เราใช้ฟิลด์อื่นๆที่เหมาะสมกว่าเป็น Primary Key ก็ดีกว่าเพราะมัน unique คือมีค่าเดียวไม่ซ้ำกันอยู่แล้ว เช่น tblContractor เราเป็นบุคคลทั้งหมด เราก็ใช้เลขประจำตัวประชาชน (เข้าใจว่าคือฟิลด์ NationalID) มาใช้แทน
- ในความสัมพันธ์ระหว่างเทเบิล (Database Tools - Relationships) ดูความเหมาะสมว่าควรกำหนด Referential Integrity, Cascade Update, Cascade Delete ด้วยหรือไม่  (ส่วนมากผมกำหนด Referential Integrity)

Subform โดยให้เป็น Unbound SubForm

- ไม่รู้ว่าทำไมกำหนดเป็น Unbound  ถ้าจะเป็น Unbound ซึ่งเราต้องควบคุมการเขียนลงเทเบิลอื่นๆอีกที ก็ย้ายเท็กซ์บ็อกซ์และคอนโทรลต่างๆใน Unbound SubForm มาไว้บน MainForm แล้วตีกรอบเพื่อแสดงเป็นนัยว่าเป็นข้อมูลที่แยกต่างหากจาก Session ไปเลยน่าจะดูเรียบง่ายกว่า หรือจะนำมาใส่ใน Tab control บน MainForm อีกที ก็สื่อเป็นหมวดหมู่ดี

ซึ่งผมเขียน Expression ที่ txtWorkID โดยเมื่อ Dropdown เลือก NationalID เมื่อไหร่ ระบบจะไปดึง Last WorkID ของพนง.คนนั้น ๆ มาจากtblWork(Transaction Table) มาโชว์ / เกิด Error ใน Subform

- ต้องเอาโค้ดที่ทำการดึงและแปะลงฟิลด์ที่เกิด #Error นั้นมาดูครับ

การทำแบบฟอร์มเพื่อคีย์หลักสูตรที่แต่ละตำแหน่งต้องอบรมให้ครบตามกฎหมาย

- ก็ต้องมีเทเบิลหลักสูตร (tbSubject หรือเปล่า ?) ,เทเบิลตำแหน่ง (อันนี้ผมไม่รู้เทเบิลไหน สมมุติชื่อ tbP หรือเป็นแค่ฟิลด์ในเทเบิล tbWork ? สมมุติชื่อฟิลด์ F) และสร้างเทเบิลหลักสูตรที่ต้องอบรม (สมมุติชื่อ tbC) ที่มีทั้งฟิลด์ Primary Key ของเทเบิลหลักสูตรและ Primary Key ของเทเบิลตำแหน่ง(หรือแค่ฟิลด์ F ถ้าคุณไม่ได้มีเทเบิลตำแหน่งแยกออกมาต่างหาก) มานำมาตั้งเป็น Primary Key ของ tbC ดังนั้นคุณก็สร้างฟอร์มที่มี Mainform เป็น tbP และมี Subform เป็น tbC เพื่อป้อนหลักสูตรที่ต้องอบรมตามกฎหมายได้แล้ว

หมายเหตุ : Database ไม่ต้องใส่ d ต่อท้ายครับ

1.ใน Form ผมหาผลรวมของ ชุด1 ได้แล้ว แต่ผมรวมมันโดยใช้ text box แต่ไม่รู้ว่าค่าตัวนี้มันไปบันทึกไว้ที่ไหน

Textbox ที่ Control Source อ้างถึงแหล่งข้อมูลอื่นๆนอกจากฟิลด์ในเทเบิล(ไม่รวม Calculated Field) จะไม่สามารถแก้ไขอะไรได้ และไม่ได้มีการบันทึกไว้ที่ไหน เป็นเพียงการแสดงผลเท่านั้น

2. ที่report อยากให้มี drop down list ให้เลือกว่าเราจะเลือกตัวไหนมา report ต้องทำอย่างไรครับ

Report แสดงได้อย่างเดียว ไม่มีส่วนให้รับ input จากผู้ใช้ผ่านหน้าของ Report เอง ต้องไปใส่ Listbox/Combo Box ในหน้าฟอร์มอื่นๆก่อนอีกทีนึงหรือจะใส่เอาไว้ในหน้า FACADE INPUT DATA เลยก็ได้ แล้วเมื่อคลิกปุ่มพิมพ์ ก็ค่อยไปแสดงหน้า Report ให้ตรงตามเงื่อนไขที่ได้เลือกไว้ ถ้าใช้เป็นแมโครก็ใช้ OpenReport action แล้วใส่เงื่อนไขในบรรทัด Where Condition หรือถ้าเขียนเป็นโค้ด VBA ก็ใช้คำสั่ง
DoCmd.OpenReport "ชื่อรายงาน", acViewPrint (เพื่อพิมพ์เลย หรือ acViewPreview เพื่อดูก่อนพิมพ์), , "เงื่อนไข"
สำหรับเงื่อนไข ก็จะมีรูปแบบเป็น expression เช่น "ฟิลด์ = Forms![ชื่อฟอร์ม]![ชื่อ Listbox/Combo Box]" เป็นต้น
หรือลองค้นกระทู้เก่าด้วยคำว่า OpenReport ก็จะเห็นเยอะแยะครับ


1.table คือสำหรับสร้างฐานข้อมูล input data

ใช่

2. qry เอา input มาจัดเรียงและสร้างการคำนวนผลของ input data เพื่อทำ form

เราสามารถเอาเทเบิลต่างๆที่มีความสัมพันธ์กัน มาเชื่อมโยงกัน(เหมือน Lookup ไปชีทอื่นใน Excel) แล้วเลือกเอาเฉพาะฟิลด์ที่เราสนใจจากเทเบิลเหล่านั้นออกมา หรือเอามาคำนวน แล้วจะเอาคิวรี่มาเป็นแหล่งข้อมูลของ Form, Report, Recordset หรือเอามาแสดงด้วยตัวมันเองเลยก็ได้

3. form เพื่อให้หน้าตาในการ input data ง่ายและสะดวกในการใช้งาน

จะว่าอย่างงั้นก็ได้ครับ อีกอย่างคือเพื่อไม่ให้ผู้ใช้เข้าไปถึงแหล่งข้อมูลทั้งหมดเอง

4. report เพื่อแสดงรายการที่ต้องให้แสดงและ print

ใช่ครับ

เพิ่มเติม : Access เป็นโปรแกรมประเภท ระบบจัดการฐานข้อมูล (Database Management System, DBMS) แบบคุณสมบัติปานกลาง หลักการที่สำคัญของ DBMS ก็คือจะมีคุณสมบัติ ACID ลองอ่าน https://www.thai-access.com/yeadram_view.php?topic_id=272

หลักการคือ พอขึ้นเรคอร์ดใหม่ปั๊ป ก็เอา "กล่องเป้าหมาย" ของบรรทัดสุดท้ายมาใส่พร้อมบันทึกเรคอร์ดครับ ก็ใส่โค้ดนี้ลงไปใน Form_Current event procedure

Private Sub Form_Current()

    Dim RS As DAO.Recordset
   
    If Me.NewRecord Then
        Set RS = Me.RecordsetClone
        If RS.RecordCount > 0 Then
            RS.MoveLast
            If Not IsNull(RS("ชื่อฟิลด์กล่องเป้าหมาย")) Then
                Me.ชื่อเท็กซ์บ็อกซ์กล่องเป้าหมาย = RS("ชื่อฟิลด์กล่องเป้าหมาย")
                DoCmd.RunCommand acCmdSaveRecord
            End If
        End If
        RS.Close
    End If
           
End Sub


ขอแทรกหน่อยครับ ดูแล้วเหมือนว่า TerminatedDate จะขึ้นกับ Contractor เพียงอย่างเดียว ไม่ได้ขึ้นกับ WorkID เลย ดังนั้น TerminatedDate ควรไปอยู่ในเทเบิลของ Contractor มากกว่าหรือไม่

ผมไม่ค่อยแน่ใจถึงสิ่งที่ต้องการ  แต่เอาเป็นว่า ถ้าต้องรวมตาม [place] และ [product] เดียวกัน ก็แก้ส่วน sum โดยเพิ่มเงื่อนไข and เข้าไปในส่วนของ where ตามโค้ดข้างล่างนี้ แต่ถ้าต้องมีเงื่อนไขฟิลด์อื่นเพิ่มเติม ก็ทำในลักษณะเดียวกัน คือเพิ่ม and เข้าไปอีกครับ

select T1.*,(select sum(T3.Inboxes) from [In] as T3 where (T3.place = T1.place) and (T3.product = T1.product)) as SumOfBoxin
from [In] as T1
where T1.[date] = (select max(T2.[date]) from [In] as T2 where T2.place = T1.place)

ยังไงก็ทดสอบผลลัพธ์กับข้อมูลเยอะๆ เพื่อดูว่าถูกต้องหรือไม่ด้วย

https://accessexperts.com/blog/2019/11/13/critical-office-update-breaks-access-query-is-corrupt/?fbclid=IwAR1gvYE82pQJmKUW9HFjBbhrYAnBMDmGEmJ3XI-GdEB09wk0vyvS9hTSEyE

ตามข้อกำหนดของ Access บอกว่าสามารถมีการใช้ไฟล์ฐานข้อมูลหนึ่งๆได้พร้อมๆกันที่ 255 หรือ 256 คนนี่แหล่ะครับ ส่วนที่เคยเจอก็ 20 กว่าคนพร้อมๆกัน