06-05-15, 02:21 AM
(آخر تعديل لهذه المشاركة : 10-05-15, 05:17 PM {2} بواسطة Ahmed_Mansoor.)
السلام عليكم
ارجو المساعده في جعل (textbox) الخاص في البحث ان يبحث بعدة طرق او بعدة اوامر مثلا
حاليا لديه txtsearch موجود على فورم الست فيو(listvew) يبحث برقم فاتورة البيع فتظهر معلومات الفاتورة كاملا
الذي اريده هو
ان ان اجعل الـ txtsearch يبحث في التاريخ او اسم العميل وغيرها من المعلومات الموجوده داخل الست فيو حيث جربت
حيث جربت اغير حقل الخاصر بالبحث من (id) الى date لم تنجح وادناة الكود
ارجو المساعده في جعل (textbox) الخاص في البحث ان يبحث بعدة طرق او بعدة اوامر مثلا
حاليا لديه txtsearch موجود على فورم الست فيو(listvew) يبحث برقم فاتورة البيع فتظهر معلومات الفاتورة كاملا
الذي اريده هو
ان ان اجعل الـ txtsearch يبحث في التاريخ او اسم العميل وغيرها من المعلومات الموجوده داخل الست فيو حيث جربت
حيث جربت اغير حقل الخاصر بالبحث من (id) الى date لم تنجح وادناة الكود
Private Sub txtsearch_Change()
If txtsearch = "" Or rs.RecordCount = 0 Then
check_RS
rs.Open "select * from sales", Cnn
fill
Else
check_RS
rs.Open "select * from sales where salesno = " & txtsearch, Cnn
fill
check_RS1
rs1.Open "select * from sales_total where sales_no = " & txtsearch, Cnn
If rs1.RecordCount <> 0 Then
Set lst = salesList.ListItems.Add(, , "")
lst.SubItems(3) = "Total Amount : "
lst.SubItems(4) = rs1(1)
End If
End If
If txtsearch = "" Then
cmdShow.Enabled = False
Else
cmdShow.Enabled = True
End If