กระทู้เก่าบอร์ด อ.Yeadram
1,449 6
URL.หัวข้อ /
URL
การหาข้อมูลจากหลายๆแถว
รบกวนถามทุกๆท่านครับ
ผมทำารายงานตารางดังนี์
No Equipment Old serial Status serial
1 mouse A11 A11
2 mouse B11 B51
3 mouse C11 B11
4 mouse D11 D11
อุปกรณ์ติดตั้งจำนวนหลายๆเครื่อง ซึ่งจะมีข้อมูลดิบว่าการติดตั้งตอนแรกเครื่องนี้ติดตั้งหมายเลขอะไรและล่าสุดหมายเลขอะไร อาจจะมีการถอดเขาออกใส่แทนที่ไปเลย
คือผมเขียนใน VB โดยใส่หมายเลขเช่น B11 แล้วเลือกปุ่มคำสั่งที่สร้างไว้แล้วให้ไปดึงข้อมูลแถวที่มีข้อมูลของ Old serial (B11) และ Status serial ที่มี หมายเลข B11 ให้ออกมาแสดงทางรายงานทั้ง 2 แถวนะครับ
ผมทำารายงานตารางดังนี์
No Equipment Old serial Status serial
1 mouse A11 A11
2 mouse B11 B51
3 mouse C11 B11
4 mouse D11 D11
อุปกรณ์ติดตั้งจำนวนหลายๆเครื่อง ซึ่งจะมีข้อมูลดิบว่าการติดตั้งตอนแรกเครื่องนี้ติดตั้งหมายเลขอะไรและล่าสุดหมายเลขอะไร อาจจะมีการถอดเขาออกใส่แทนที่ไปเลย
คือผมเขียนใน VB โดยใส่หมายเลขเช่น B11 แล้วเลือกปุ่มคำสั่งที่สร้างไว้แล้วให้ไปดึงข้อมูลแถวที่มีข้อมูลของ Old serial (B11) และ Status serial ที่มี หมายเลข B11 ให้ออกมาแสดงทางรายงานทั้ง 2 แถวนะครับ
6 Reply in this Topic. Dispaly 1 pages and you are on page number 1
2 @R10608
สอบถามเพิ่มเติมครับ K.yeadram
คือผมสร้าง textbox มาและปุ่มคำสั่งในการดึงดูข้อมูลนะครับ
เช่น ผมใส่ค่าที่ Textbox B11 แล้วให้แสดงรายงานทั้ง 2 แถวดังที่ถามข้างต้น อยากได้การเขียน VB ขอรายละเอียดอีกหน่อยครับพอดียังไม่เข้าใจครับ มือใหม่
คือผมสร้าง textbox มาและปุ่มคำสั่งในการดึงดูข้อมูลนะครับ
เช่น ผมใส่ค่าที่ Textbox B11 แล้วให้แสดงรายงานทั้ง 2 แถวดังที่ถามข้างต้น อยากได้การเขียน VB ขอรายละเอียดอีกหน่อยครับพอดียังไม่เข้าใจครับ มือใหม่
3 @R10609
ใส่ที่ปุ่ม Event > On Click
DoCmd.ApplyFilter , " Old serial & Status serial like '*' & [Forms]![ชื่อฟอร์ม]![ชื่อ textbox] &'*'
น่าจะประมาณนี้นะครับ
หมายเหตุ ชื่อ Old serial และ Status serial ไม่ใช่ชื่อฟิลด์ แต่เป็นชื่อใน Control Source ของฟิลด์ Old และ Status serial นะครับ ในกรณีชื่อฟิลด์ในฟอร์มไม่เหมือนกับชื่อใน Control Source
ลองนำไปใช้ดูนะครับ
DoCmd.ApplyFilter , " Old serial & Status serial like '*' & [Forms]![ชื่อฟอร์ม]![ชื่อ textbox] &'*'
น่าจะประมาณนี้นะครับ
หมายเหตุ ชื่อ Old serial และ Status serial ไม่ใช่ชื่อฟิลด์ แต่เป็นชื่อใน Control Source ของฟิลด์ Old และ Status serial นะครับ ในกรณีชื่อฟิลด์ในฟอร์มไม่เหมือนกับชื่อใน Control Source
ลองนำไปใช้ดูนะครับ
4 @R10610
แก้ไขนะครับ ตก " ตอนท้ายไป
DoCmd.ApplyFilter , " Old serial & Status serial like '*' & [Forms]![ชื่อฟอร์ม]![ชื่อ textbox] &'*'"
DoCmd.ApplyFilter , " Old serial & Status serial like '*' & [Forms]![ชื่อฟอร์ม]![ชื่อ textbox] &'*'"
5 @R10627
ผมทำารายงานตารางดังนี์
No Equipment Old serial Status serial
1 mouse A11 A11
2 mouse B11 B51
3 mouse C11 B11
4 mouse D11 D11
ผมสร้าง Textbox 1 ตัว และสร้างปุ่มกระบานการเหตุการณ์เพื่อดึงหมายเลขที่ต้องการค้นหาออกมาทาง Report ซึ่งจะมีทั้งอยู่ Old serial ซึ่งเป็นฟิลด์ และ ตำแหน่งที่ติดตั้งอยู่ ปัจจุบันคือ Status serial ให้ออกมาแสดงทั้ง 2 แถว เช่นผมจะหา หมายเลข B11 ก็จะแสดงทั้ง 2 แถวคือแถวที่ 2 และแถวที่ 3 นะครับ
Private Sub Cmd5_Click()
Dim Mouse As String
Dim MouseNow As String
Mouse = "[Old serial] Like '*'"
MouseNow = "[Current Status] Like '*'"
................. ช่วยต่อหน่อยครับ มือใหม่จิงๆ
No Equipment Old serial Status serial
1 mouse A11 A11
2 mouse B11 B51
3 mouse C11 B11
4 mouse D11 D11
ผมสร้าง Textbox 1 ตัว และสร้างปุ่มกระบานการเหตุการณ์เพื่อดึงหมายเลขที่ต้องการค้นหาออกมาทาง Report ซึ่งจะมีทั้งอยู่ Old serial ซึ่งเป็นฟิลด์ และ ตำแหน่งที่ติดตั้งอยู่ ปัจจุบันคือ Status serial ให้ออกมาแสดงทั้ง 2 แถว เช่นผมจะหา หมายเลข B11 ก็จะแสดงทั้ง 2 แถวคือแถวที่ 2 และแถวที่ 3 นะครับ
Private Sub Cmd5_Click()
Dim Mouse As String
Dim MouseNow As String
Mouse = "[Old serial] Like '*'"
MouseNow = "[Current Status] Like '*'"
................. ช่วยต่อหน่อยครับ มือใหม่จิงๆ
6 @R10654
Private Sub Cmd5_Click()
docmd.openreport "reportname",,"[Old Serial] Like 'B11' Or [Status serial] Like 'B11'"
End sub
docmd.openreport "reportname",,"[Old Serial] Like 'B11' Or [Status serial] Like 'B11'"
End sub
Time: 0.3416s
where [Old serial] like 'B11' OR [Status serial] Like 'B11';