กระทู้เก่าบอร์ด อ.Yeadram
2,190 7
URL.หัวข้อ /
URL
สร้างรายงานจากตารางที่เก็บข้อมูลเป็นรหัส
เรียน อาจารย์ทุกท่านครับ
ไปเจอตัวอย่างในกระทู้เกี่ยวกับจังหวัดและอำเภอจึงอยากขอคำแนะนำครับจากตัวอย่างตามนี้ครับ http://www.ptlhosp.go.th/occ/1pro.html
คือต้องการสร้างรายงานจากตารางที่เก็บข้อมูลที่เป็นรหัส โดยให้รายงานแสดงเป็นข้อความตามรหัสที่เก็บไว้ในตาราง มีวิธีทำอย่างไรครับ ขอบคุณครับ
ข้อมูลในตารางเก็บแบบนี้ครับ
idperson tam amp idaddress
1 930101 930100 930000
2 931101 931100 930000
3 930203 930200 930000
4 930103 930100 930000
รายงานต้องการให้แสดงแบบนี้ครับ
ชื่อ ตำบล อำเภอ จังหวัด
สุรชัย คูหาสวรรค์ เมืองพัทลุง พัทลุง
รัตนา ชุมพล กิ่งอำเภอศรีนครินทร์ พัทลุง
วิชัย คลองเฉลิม กงหรา พัทลุง
สุดา เขาเจียก เมืองพัทลุง พัทลุง
ไปเจอตัวอย่างในกระทู้เกี่ยวกับจังหวัดและอำเภอจึงอยากขอคำแนะนำครับจากตัวอย่างตามนี้ครับ http://www.ptlhosp.go.th/occ/1pro.html
คือต้องการสร้างรายงานจากตารางที่เก็บข้อมูลที่เป็นรหัส โดยให้รายงานแสดงเป็นข้อความตามรหัสที่เก็บไว้ในตาราง มีวิธีทำอย่างไรครับ ขอบคุณครับ
ข้อมูลในตารางเก็บแบบนี้ครับ
idperson tam amp idaddress
1 930101 930100 930000
2 931101 931100 930000
3 930203 930200 930000
4 930103 930100 930000
รายงานต้องการให้แสดงแบบนี้ครับ
ชื่อ ตำบล อำเภอ จังหวัด
สุรชัย คูหาสวรรค์ เมืองพัทลุง พัทลุง
รัตนา ชุมพล กิ่งอำเภอศรีนครินทร์ พัทลุง
วิชัย คลองเฉลิม กงหรา พัทลุง
สุดา เขาเจียก เมืองพัทลุง พัทลุง
7 Reply in this Topic. Dispaly 1 pages and you are on page number 1
2 @R06523
1.ใช้ตาราง T_person และตารางaddress แต่ตาราง address เพิ่มตารางมา 3 ครั้ง จะได้ address_1,2,3(ตาราง address เพิ่ม 3ครั้ง)
2.เชื่อมโยงข้อมูล
ในตารางT_person tam จับกับ idaddress(ตารางaddress_1)
amp จับกับ idaddress(ตารางadress_2)
จังหวัดก็เหมือนกัน
3.ลากฟิลด์มาวางจบ ได้ทั้ง ตำบล อำเภอ จังหวัด
2.เชื่อมโยงข้อมูล
ในตารางT_person tam จับกับ idaddress(ตารางaddress_1)
amp จับกับ idaddress(ตารางadress_2)
จังหวัดก็เหมือนกัน
3.ลากฟิลด์มาวางจบ ได้ทั้ง ตำบล อำเภอ จังหวัด
3 @R06526
tb1 = ตารางที่เก็บข้อมูลที่เป็นรหัส (Cid, Tid, Aid, Pid) (รหัสบุคคล, รหัสตำบล, รหัสอำเภอ, รหัสจังหวัด)
tb2 = ตารางบุคคล(Cid, Cname)
tb3 = ตารางตำบล(Tid, Tname)
tb4 = ตารางอำเภอ(Aid, Aname)
tb5 = ตารางจังหวัด(Pid, Pname)
1) สร้างคิวรี่เปล่าตัวหนึ่ง ลากตารางทั้ง 5 วางลงไปในมุมองออกแบบ
2) ลากฟิลด์จาก tb1 ไป tb2 โดยใช้ฟิลด์ Cid=Cid
3) ลากฟิลด์จาก tb1 ไป tb3 โดยใช้ฟิลด์ Tid=Tid
4) ลากฟิลด์จาก tb1 ไป tb4 โดยใช้ฟิลด์ Aid=Aid
5) ลากฟิลด์จาก tb1 ไป tb5 โดยใช้ฟิลด์ Pid=Pid
6) ลากฟิลด์มาแสดงผลจำนวน 4 ฟิลด์ดังนี้
CName, Tname, Aname, Pname
7) เซฟคิวรี่ -- จบงาน
tb2 = ตารางบุคคล(Cid, Cname)
tb3 = ตารางตำบล(Tid, Tname)
tb4 = ตารางอำเภอ(Aid, Aname)
tb5 = ตารางจังหวัด(Pid, Pname)
1) สร้างคิวรี่เปล่าตัวหนึ่ง ลากตารางทั้ง 5 วางลงไปในมุมองออกแบบ
2) ลากฟิลด์จาก tb1 ไป tb2 โดยใช้ฟิลด์ Cid=Cid
3) ลากฟิลด์จาก tb1 ไป tb3 โดยใช้ฟิลด์ Tid=Tid
4) ลากฟิลด์จาก tb1 ไป tb4 โดยใช้ฟิลด์ Aid=Aid
5) ลากฟิลด์จาก tb1 ไป tb5 โดยใช้ฟิลด์ Pid=Pid
6) ลากฟิลด์มาแสดงผลจำนวน 4 ฟิลด์ดังนี้
CName, Tname, Aname, Pname
7) เซฟคิวรี่ -- จบงาน
4 @R06641
ขอแนะนำให้เปลียน event จาก combo1-change ไปที่
Private Sub combo2_enter()
combo2.RowSource = "Select * From [tb4] Where ([Aname] Like '" & combo1 & "')"
end sub
ง่ายกว่า สั้นกว่า แต่ถ้าจะให้ sure ขอแนะนำให้เปลี่ยนจาก
Like '" & combo1 & "'
เป็น Like Forms!ชื่อฟอร์ม.combo1
จะได้ตัดปัญหาเรื่อง "' ทั้งหลายแหละครับ
Private Sub combo2_enter()
combo2.RowSource = "Select * From [tb4] Where ([Aname] Like '" & combo1 & "')"
end sub
ง่ายกว่า สั้นกว่า แต่ถ้าจะให้ sure ขอแนะนำให้เปลี่ยนจาก
Like '" & combo1 & "'
เป็น Like Forms!ชื่อฟอร์ม.combo1
จะได้ตัดปัญหาเรื่อง "' ทั้งหลายแหละครับ
5 @R06644
งั้นทดสอบก่อนครับว่า combo1 เก็บอะไรไว้
Private Sub combo2_enter()
msgbox combo1
end sub
สิ่งที่โชว์เป็น รหัสจังหวัด หรือ ชื่อจังหวัด
ถ้าเป็นรหัสจังหวัด ต้องเปลี่ยน Where Aname เป็น Where Aid
Private Sub combo2_enter()
msgbox combo1
end sub
สิ่งที่โชว์เป็น รหัสจังหวัด หรือ ชื่อจังหวัด
ถ้าเป็นรหัสจังหวัด ต้องเปลี่ยน Where Aname เป็น Where Aid
6 @R06661
ที่ Combo1 แสดงเป็นชื่อจังหวัดครับ ผมเคยลองเปลี่ยนดูแล้วครับ ไม่ได้เลยครับท่าน
7 @R06662
อ้างย้อนไปถึง R06533 "ถ้า combo1 เลือกจังหวัดไหนก็ให้ Combo2,Combo3 แสดงข้อมูลตามจังหวัดนั้นๆ"
ข้อมูลของคุณที่มีอยู่ มันสัมพันธ์กันแค่ไหน ตารางข้อมูล ตำบล อำเภอ จังหวัด เป็นตารางเดียวกันหรือคนละตาราง ถ้าเป็นคนละตาราง โครงสร้างความสัมพันธ์เป็นอย่างไร การตอบโจทก์ข้อนี้ มันต้องเริ่มต้นดูตั้งแต่โครงสร้างตารางข้อมูลของคุณเลยครับ ถ้าถามตอบกันไปมาอย่างนี้ คงอีกนานครับ กว่าจะจบ
ลองค้นดูกระทู้เก่าๆ ครับ มีถาม-ตอบกันเยอะแล้วเกี่ยวกับ จังหวัด อำเภอ คอมโบ เนี่ยครับ ลองดูครับ บางกระทู้มีตัวอย่างให้ด้วย
สิ่งสำคัญคือ โครงสร้างของข้อมูลที่คุณมีครับ ถ้ามันรองรับกับการใช้คอมโบ มันก็จะง่ายครับ
ข้อมูลของคุณที่มีอยู่ มันสัมพันธ์กันแค่ไหน ตารางข้อมูล ตำบล อำเภอ จังหวัด เป็นตารางเดียวกันหรือคนละตาราง ถ้าเป็นคนละตาราง โครงสร้างความสัมพันธ์เป็นอย่างไร การตอบโจทก์ข้อนี้ มันต้องเริ่มต้นดูตั้งแต่โครงสร้างตารางข้อมูลของคุณเลยครับ ถ้าถามตอบกันไปมาอย่างนี้ คงอีกนานครับ กว่าจะจบ
ลองค้นดูกระทู้เก่าๆ ครับ มีถาม-ตอบกันเยอะแล้วเกี่ยวกับ จังหวัด อำเภอ คอมโบ เนี่ยครับ ลองดูครับ บางกระทู้มีตัวอย่างให้ด้วย
สิ่งสำคัญคือ โครงสร้างของข้อมูลที่คุณมีครับ ถ้ามันรองรับกับการใช้คอมโบ มันก็จะง่ายครับ
Time: 0.3140s
เอาเป็นว่า ไม่แน่ใจว่าตัวเองอธิบายเก่งหรือเปล่านะครับ
๑. สร้างตารางที่เก็บข้อมูลดังรูปเป็นตัวเลข
๒. สร้างอีกตาราง ที่ใช้สำหรับเก็บค่าตัวหนังสือ รายละเอียดที่ต้องการแสดง โดยเก็บ ID เป็นค่าที่ ลิงค์ไปหาตารางแรก
๓. ส่วนการแสดงผลออกมาโดยสร้างความสัมพันธ์ของสองตารางผ่าน ID แสดงผลเฉพาะค่าตัวหนังสือ
อื่ม แต่เท่าที่ดูนะครับ มีการเก็บค่าตัวเลขเป็น สามชุด ชุดละสองตัว ซึ้งแสดงค่าทั้งหมดออกมาได้แล้ว ใช้งานแค่เพียง คอลัมน์แรกแค่นั้นเองนะครับ สามารถดูข้อมูลได้ทั้งหมด เลย
ถ้าใช้ VBA ช่วยทำงานอ??จจะได้งาน ดีและไว กว่านี้ครับ รอคนที่เก่งๆวีบีเอ มาอธิบายดีกว่านะครับ