ขอวิธีดึงข้อมูลใน Table มาแสดงบน Form
กระทู้เก่าบอร์ด อ.Yeadram

 6,453   9
URL.หัวข้อ / URL
ขอวิธีดึงข้อมูลใน Table มาแสดงบน Form

ถ้าข้อมูลใน table มีซัก 20 คอลัม มีวิธีเขียน Vb ให้ดึงข้อมูลมาในทีเดียวไหมครับ

9 Reply in this Topic. Dispaly 1 pages and you are on page number 1

1 @R07495
ไปที่หน้า Form Design ตรงมุมบนซ้ายมือสุดจะเป็นช่องสี่เหลี่ยม คลิกตรงกลางแล้วเลือก Properties มันจะเปิดเมนูย่อยขึ้นมาให้ตรง Record Source คลิกตรงปุ่ม ... ที่อยู่ขวาสุด มันจะเปิดหน้า Query Design ขึ้นมาให้ คุณก็เลือก Table ที่คุณต้องการ เมื่อเลือกได้แล้วก็ให้ดับเบิ้ลคลิก เลือก * แล้วคุณก็หิดหน้า Query นั้น แล้วก็ตอบ Yes ก็เป็นอันเสร็จครับ
2 @R07499
ขอบคุณครับ

แล้วถ้าเรามีข้อมูลหลายๆ table ละครับ
เช่น ครั้งแรกเลือกข้อมูลจาก table ที่ 1 มาแสดง ครั้งต่อไปเป็น table ที่ 2
3 @R07500
อธิบายให้ละเอียดอีกหน่อยครับผม
4 @R07503
คือผมมี table 1, 2, 3, . . . ซึ่งแต่ละ table จะเก็บข้อมูลของผู้ใช้แต่ละคน
แต่ข้อมูลทั้งหมดนั้นจะแสดงผ่าน form เดียวกัน
ยกตัวอย่าง
ถ้า User1 ล็อคอินเข้ามา form ก็จะเชื่อมข้อมูลไปที่ table1
ถ้า User2 ล็อคอินเข้ามา form ก็จะเชื่อมข้อมูลไปที่ table2
ประมาณนี้ละครับ

อีกคำถามนะครับ
ผมจะบันทึกข้อมูลจาก textbox ลงใน field ใน table ได้ยังไงครับ
ขอบคุณครับ
5 @R07504
ผมคิดว่าคุณต้องกำหนด User ก่อนครับว่า ถ้า User 1 Login ก็ให้ไปที่ Form 1 ถ้า User 2 Login ก็ให้ไปเปิด Form 2 อย่างนี้อ่ะครับผม

ส่วนอีกคำถามนะครับ
สมมติ Textbox ชื่อ Txt01 นะครับ
คุณก็สร้างปุ่ม Button ขึ้นมา 1 ปุ่ม ชื่อ AAA ก็แล้วกันนะครับ เสร็จแล้วคุณก็ไปคลิกขวาที่ปุ่ม AAA นั้นแล้วเลือก Properties แล้วไปเลือกที่ On Click แล้วไปคลิกตรง ...ที่อยู่ด้านหลังครับ แล้วเลือก Code Builder คลิก Ok มันจะเปิดหน้า VBA ขึ้นมา คุณก็ใส่ตามนี้นะครับ

Private Sub AAA_Click()
DoCmd.RunSQL ("INSERT INTO ชื่อ Table ( ฟิวด์ของTable )SELECT [Forms]![Form1]![Txt01] AS Expr1")   
End Sub
6 @R07507
เยี่ยมเลยครับ
ขอถามต่อคำถามแรกนะครับ
ถ้ากรณีนี้ก็ต้อง สร้าง form ให้ทุก user เลยใช่ไหมครับ
คือทุก user ของผมจะใช้ form เดียวกันครับ เลยว่าจะลักไก่ ใช้ form เดียวเลย
7 @R07508
พอใช้คำสั่งแบบ SQL ไมมันขึ้นแบบนี้ละครับ
8 @R07509
คงต้องเรียนถามท่านผู้รู้แล้วครับผมเรื่องนี้ หรือ อีกทางนึงก็ให้ไปสร้างที่ Query เลยครับ แล้วก็ไปเปลี่ยนให้มัน Run Query แทนครับ

Private Sub AAA_Click()
DoCmd.OpenQuery ("ชื่อ Query")
End Sub
9 @R07510
ครับผม
ขอบคุณมากๆครับ
@ ประกาศใช้งานเว็บบอร์ดใหม่ => บอร์ดเรียนรู้ Access สำหรับคนไทย
แล้วจะใส่ลิ้งอ้างอิงมาที่โพสต์เก่านี้หรือไม่ก็ตามสะดวกครับ
Time: 0.3529s