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



0 สมาชิก และ 1 บุคคลทั่วไป กำลังดูหัวข้อนี้

29 มี.ค. 63 , 17:22:49
อ่าน 166 ครั้ง

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)
 ****หลังจากได้คำตอบแล้ว จะมาเรียนถาม คำถามต่ออีกครับ *****

 

29 มี.ค. 63 , 23:45:30
ตอบกลับ #1

สันติสุข

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"
ช่วยพกถุงผ้า/ถุงพลาสติกใช้แล้วไปซื้อของเพื่อลดการใช้พลาสติก ขยะ รักษาสิ่งแวดล้อม และไม่ให้ภาวะโลกร้อนวิกฤติเร็วขึ้นกว่านี้
ช่วยคลิกโฆษณาข้างล่างนี้ เพื่อสนับสนุนเวปบอร์ดด้วยครับ
:nice day:
 
โพสต์นี้ได้รับคำขอบคุณจาก: pirin

30 มี.ค. 63 , 17:14:48
ตอบกลับ #2

pirin

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

 


บอร์ดเรียนรู้ Access สำหรับคนไทย