การนำเข้าข้อมูลจากตารางไฟล์ access หนึ่ง ไปยังตารางอีกไฟล์ access หนึ่ง

[pirin]

เรียนสอบถามอาจารย์ทุกท่าน
 ผมต้องการสร้างปุ่มคำสั่งให้ดึงข้อมูล จากตาราง student ซึ่งเป็นตารางในไฟล์ที่อยู่ในไดร์ฟและชื่อ....  D:\รับสมัครนักเรียน ม.3_เดิม.access   ตามลำดับ
โดยสร้างปุ่มคำสั่ง และเขียนโค๊ดคำสั่งดังนี้ ครับ

Private Sub Command0_Click()
    DoCmd.TransferDatabase acImport, "Microsoft Access", "D:\รับสมัครนักเรียน ม.3.accdb", acTable, "student", "student", False, True
End Sub


ปัญหาคือ 1. จากโค๊ดคำสั่งด้านบน  เมื่อกดปุ่มคำสั่ง ครั้งที่ 1 มันดึงข้อมูลทุกฟิลด์พร้อมสร้างตารางใหม่  ชื่อ student1
            2. ลองกดปุ่มคำสั่ง ครั้งที่ 2 มันดึงข้อมูลทุกฟิลด์พร้อมสร้างตารางใหม่  ชื่อ student2
            3. ลองกดปุ่มคำสั่ง ครั้งที่ 3 มันดึงข้อมูลทุกฟิลด์พร้อมสร้างตารางใหม่  ชื่อ student3



**ในภาพ ที่ระบายตารางสีแดง มันสร้างขึ้นมาใหม่หลังจากกดปุ่มคำสั่ง


ที่อยากได้คือ  1. ต้องการสร้างโค๊ดให้ดึงข้อมูลจากฟิลด์ทุกฟิลด์ ในตาราง student จากไฟล์  D:\รับสมัครนักเรียน ม.3.access  มาเข้าตาราง  student  (ซึ่งโครงสร้างและชื่อฟิลด์เหมือนกันกับตัว D:\รับสมัครนักเรียน ม.3.accdb )
                 2. สรุปง่ายๆคือ ให้ดึงข้อมูลมาใส่ ตาราง student ที่มีอยู่แล้ว  ไม่ต้องมาสร้าง ตารางใหม่ ที่ชื่อว่า  student1   หรือ   student2 (เมื่อกดปุ่มครั้งที่2)
 ****หลังจากได้คำตอบแล้ว จะมาเรียนถาม คำถามต่ออีกครับ *****

[สันติสุข]

SQL ของ Access มีแต่เอาข้อมูลจากฐานข้อมูลที่เรากำลังเปิด ไปใส่เพิ่มเข้าไปในฐานข้อมูลอื่น แต่ในกรณีนี้ตรงกันข้ามกัน สิ่งที่ทำได้ก็คือ

1. สร้างลิงค์เทเบิล student จาก "D:\รับสมัครนักเรียน ม.3.accdb" มายังฐานข้อมูลปัจจุบัน โดยสร้างเป็นลิงค์เทเบิลชื่ออื่นแทน สมมุติสร้างเป็นชื่อ Temp
docmd.TransferDatabase acLink,"Microsoft Access" , "D:\รับสมัครนักเรียน ม.3.accdb",acTable,"student","Temp"

2. สั่งเลือกข้อมูลทั้งหมดจาก Temp นำมาใส่เทเบิล student
currentdb.Execute "insert into student select * from Temp", dbfailonerror

3. ลบลิงค์เทเบิล Temp
docmd.DeleteObject acTable, "Temp"

[pirin]

ขอบคุณครับ อาจารย์สันติสุข