ดูที่คุณ TTT ตอบใน www.thai-access.com/yeadram_view.php?topic_id=4551 แต่ไม่มีข้อมูลว่าเทเบิลอะไรที่ถูกคนอื่นล็อคเอาไว้ครับ ยังหาโค้ดไม่เจอ แล้วเหมือนว่าจะไม่มีการเปิดเผยวิธีการหรือฟังก์ชั่นที่เกี่ยวข้องออกมาจากไมโคนซอฟท์

คอมฯทุกเครื่องตั้งชื่อเครื่องพิมพ์ตัวนี้ให้เหมือนๆกันหรือยังครับ

หลังจากมึนและค้นหาอยู่นาน พบว่าการ UNION ตั้งแต่ 3 เทเบิลขึ้นไปเป็น bug ของ MySQL ODBC ตั้งแต่ปี 2005 และตามที่ฝรั่งบอก ปัญหานี้ยังไม่ได้รับการแก้ไข bugs.mysql.com/bug.php?id=7684 ลองหา MySQL ODBC ตัวใหม่ล่าสุดที่ใช้กับเวอร์ชั่น MySQL ของคุณได้ ถ้าโชคดีอาจปัญหานี้ไปได้ ยังไงก็ตามมีการแนะนำวิธีแก้ปัญหาเฉพาะหน้าเอาไว้ในโพสสุดท้ายใน stackoverflow.com/questions/12804495/multiple-union-query-doesnt-work/15004004 โดยบอกว่าให้ใส่ ( ) ครอบแต่ละ select statement เอาไว้เพื่อที่ MySQL ODBC จะได้ตีความให้เป็นการทำทีละคู่แทน

มันบอกว่าคำสั่ง SQL มีอะไรผิดไวยกรณ์ น่าจะเป็นตั้งแต่ SELECT ตัวที่ 3 เป็นต้นไป ตอนนี้ผมกำลังทำงานใน Partition ที่ใช้ Access รุ่นเก่า จะเปิด .accdb ไม่ได้ครับ ช่วยก๊อปปี้คำสั่ง SQL ทุกตัวอักษรเอามาแสดงให้ดูหน่อยครับ

เรียนถามต่อครับ....ถ้าใช้ query รวมได้หรือไม่ ผมทดลองรวมแล้วได้ 2 ตาราง พอเพิ่มอีกตารางแจ้ง error

SELECT [รหัสประจำตัว], [เลขประจำตัวประชาชน], [ชื่อ], [นามสกุล], [เหตุจำหน่าย]
FROM [sadsadee_3001]
UNION ALL
SELECT [รหัสประจำตัว], [เลขประจำตัวประชาชน], [ชื่อ], [นามสกุล], [เหตุจำหน่าย]
FROM [sadsadee_3006];

Error ว่า ?

ปัญหาคือ Access SQL ไม่มี Hyperlink data type โดยเฉพาะ  แต่ DAO มี   ซึ่ง Hyperlink จริงๆก็คือ Memo data type ที่เพิ่มคุณสมบัติของ hyperlink เข้าไป   ดังนั้นแนะนำว่าให้ใช้ DAO เพิ่มฟิลด์ Hyperlink ลงในเทเบิลแล้วกีอปปี้ค่าจากฟิลด์เดิมมาใส่ เสร็จแล้ลบฟิลด์เดิมทิ้งแทน

โค้ดการสร้างฟิลด์ Hyperlink

    Dim DB As DAO.Database
    Dim TD As DAO.TableDef
    Dim FD As DAO.Field
   
    Set DB = CurrentDb
    Set TD = DB.TableDefs("T")
    Set FD = TD.CreateField("H", dbMemo)
   
    FD.Attributes = FD.Attributes Or dbHyperlinkField
    TD.Fields.Append FD

ส่วนชื่อของ Autonumber ใช้คำว่า COUNTER ครับ

ไม่เคยทำระบบที่ต้องสร้างข้อมูลซ้ำกันแบบนี้ ดีที่สุดคือไม่สร้างซ้ำ แต่ถ้าจำเป็นต้องสร้างซ้ำแล้ว โดยหลักการของ DBMS แล้ว น่าจะเป็นเรื่องของ Trigger http://www.mysqltutorial.org/mysql-triggers.aspx ที่จะทำงานเมื่อเกิดการเปลี่ยนแปลงข้อมูลในเทเบิล ก็ต้องเขียนโค้ดใน Trigger ใน MySQL สำหรับทุกเทเบิล ให้ไปปรับปรุงข้อมูลในเทเบิลที่เกี่ยวข้องให้ถูกต้องตรงกัน

อีกอย่างที่ต้องคำนึงถึงคือเรื่องของ Transaction Control คือ DBMS จะปรับปรุงข้อมูลทั้งเทเบิลตัวเองและที่เกี่ยวข้องได้สำเร็จ ก็ต้องทำได้สำเร็จทั้งคู่ (Commit Transaction) ถ้าเทเบิลใดเทเบิลหนึ่งปรับปรุงไม่สำเร็จ ก็ต้องยกเลิกได้ทั้งคู่โดยอัตโนมัติ  (Rollback Transaction)  ไม่งั้นข้อมูลก็จะไม่เหมือนกัน ตรงนี้ผมไม่รู้ว่า MySQL สนับสนุนให้ทำได้พร้อม Trigger ด้วยหรือไม่ และถ้าทำได้ ถ้าเกิดกรณี Rollback Transaction แล้ว  จะมี runtime error อะไรส่งกลับมาบอก Access ด้วยหรือไม่ ตรงนี้ก็ต้องทดลองด้วยนะครับ

ลองใช้โค้ดนี้ดูว่าจะทำงานให้ไหม โดยเลือกรายการแรกในหน้า[ค้นหา] > คลิกปุ่ม [เลือก] > เลือกรายการอื่นในหน้า [ค้นหา] > คลิกปุ่ม [เลือก] อีกที

Forms("Sale").SetFocus
Forms("Sale").subformsale.SetFocus
on error resume next
DoCmd.GoToRecord , , acNewRec
on error goto 0
Forms("Sale").subformsale.Form.Item = Me.Item

ถ้ามี error อะไรหรืออาการเป็นอย่างไร แจ้งมาด้วยครับ

Forms("ชื่อฟอร์ม").SetFocus
Docmd.RunCommand acCmdDocMinimize ' สำหรับหดฟอร์ม หรือใช้ acCmdDocMaximize สำหรับขยายเต็มวินโดว์ของ Access หรือใช้ acCmdDocRestore สำหรับกลับคืนขนาดก่อนการหดหรือขยายฟอร์ม