เสิร์ช 2 เงื่อนไขพร้อมกันใน 1 ปุ่ม
กระทู้เก่าบอร์ด อ.Yeadram

 1,232   2
URL.หัวข้อ / URL เสิร์ช 2 เงื่อนไขพร้อมกันใน 1 ปุ่ม

ปัญหาของหนูก็คือ หนูต้องการให้มันเสิร์ช พื้นที่ และ วันที่สินค้า พร้อมกัน หนูก็ใส่โค้ดนี้
Private Sub srcfordriver_Click()
On Error Resume Next
    Me.subQueryfordriver.Form.FilterOn = False
    Me.subQueryfordriver.Form.Filter = "AreaID = " & Me.cmbsearchArea.Value
    Me.subQueryfordriver.Form.FilterOn = True
End Sub

หนูก็สามารถเสิร์ชพื้นที่ได้ แต่พอหนูเพิ่มอันนี้

Private Sub srcfordriver_Click()
On Error Resume Next
    Me.subQueryfordriver.Form.FilterOn = False
    Me.subQueryfordriver.Form.Filter = "AreaID = " & Me.cmbsearchArea.Value
    Me.subQueryfordriver.Form.Filter = "OrderDate = #" & Me.searchDate.Value & "#"
    Me.subQueryfordriver.Form.FilterOn = True
End Sub

หนูก็เสิร์ชวันที่ได้ค่ะ แต่ว่าเสิร์ชพื้นที่ไม่ได้
ถ้าจะให้มันเสิร์ชพร้อมกันทั้งพื้นที่และวันที่ต้องเพิ่มอะไรเข้าไปคะ
โดย: HuiBin เมื่อ: 13 พ.ย. 2557 , 18:44

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

1 @R19752
น่าจะเป็นอย่างนี้นะครับ

Private Sub srcfordriver_Click()
On Error Resume Next
    Me.subQueryfordriver.Form.FilterOn = False
    Me.subQueryfordriver.Form.Filter = "AreaID = " & Me.cmbsearchArea.Value & " And OrderDate = #" & Me.searchDate.Value & "#"
    Me.subQueryfordriver.Form.FilterOn = True
End Sub

โดย: Gun เมื่อ: 13 พ.ย. 2557 , 21:34
2 @R19753
ได้แล้วค่ะ ขอบคุณมากกกนะคะ

แล้วถ้าอย่างนี้พอค้นหาเสร็จแล้วจะสั่งปริ้นแต่พอสั่งแล้วเป็นAreaเดียวแต่มาหลายวัน

ถ้าต้องการให้ปริ้นวันที่เดียวและ Area เดียวจะต้องใส่โค้ดอะไรเพิ่มจากตรงนี้หรอคะ ใส่ไม่ถูก

Private Sub Command14_Click()
DoCmd.OpenReport "rpQueryfordriver", acViewPreview, , "AreaID= " & Me.AreaID, acWindowNormal
End Sub

ขอบคุณค่ะ
โดย: HuiBin เมื่อ: 13 พ.ย. 2557 , 21:59
@ ประกาศใช้งานเว็บบอร์ดใหม่ => บอร์ดเรียนรู้ Access สำหรับคนไทย
แล้วจะใส่ลิ้งอ้างอิงมาที่โพสต์เก่านี้หรือไม่ก็ตามสะดวกครับ
Time: 0.3216s