>hi,
>
>i try and i get data,but still the same message
>? m.lcBillNo,m.lcDateIn
>? THISFORM.TEXT1.VALUE
>? THISFORM.TEXT2.VALUE
>
>thanks.
>m.qasem

In case m.lcBillNo - "N", m.lcDateIn - "D"

Local lcFilter
lcFilter = "BILLNO=" + Transform( m.lcBillNo) + " AND DATEIN=CTOD('" + DTOC( m.lcDateIn) + "')"
Set Filter To &lcFilter

In case m.lcBillNo - "C", m.lcDateIn - "D"

Local lcFilter
lcFilter = "BILLNO='" + AllTrim( m.lcBillNo) + "' AND DATEIN=CTOD('" + DTOC( m.lcDateIn) + "')"
Set Filter To &lcFilter

and so on...

HTH