منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
[سؤال] كود البحث بين رقمين لمجموعة فواتير وكود بين تاريخين واسم الشركة ونوع المادة - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغات البرمجة الاخرى (http://vb4arb.com/vb/forumdisplay.php?fid=4)
+--- قسم : قسم لغة vb6.0 (http://vb4arb.com/vb/forumdisplay.php?fid=18)
+---- قسم : قسم أسئلة vb6.0 (http://vb4arb.com/vb/forumdisplay.php?fid=28)
+---- الموضوع : [سؤال] كود البحث بين رقمين لمجموعة فواتير وكود بين تاريخين واسم الشركة ونوع المادة (/showthread.php?tid=1770)



كود البحث بين رقمين لمجموعة فواتير وكود بين تاريخين واسم الشركة ونوع المادة - princeofislam - 31-01-14

الاخوة الاعزاء اولا جزاكم الله عنا كل خير لما تقدموه لنا من علم وعمل في هذا المنتدى

ويا ريت المساعدة ممكن يملكون الوقت والعلم في برنامجي حيث انني عملت شركة صغيرة والحمد لله واريد ان اسحل البيانات ..ينقض يرنامجي كودين و هما العمود الفقري للبرنامج

adodc with datagrid

database name : KASS
recoredset name: KASS
Fileds are :
1-number
2-name
3-kind
4-date
5-total





1: كود البحث عن مجموعة من الفواتير بين الارقام الاخرى ..مثال الفواتير المدخلة من رقم 1 الى رقم 50 ما هو كود البحث للفواتير من رقم 8 الى رقم 46 مثلا ..

2: كود سحب الزبون من كل بضاعة ..مثال ... سحب احمد مادة الاسمنت من تاريخ 2/1//2014 لغاية تاريخ 14/3/2014 هو عشرة اطنان
يعني بحث باسم المادة واسم الزبون بين تاريحين ....مع مراعام انني استخدم ADODC AND DATAGRID

3- كود البحث بين تاريخن ياسم الزبون والمادة المسحوبة [/b]

اعرف ان الموضوع صعب نوعا ما لاكن الجئ اليكم بعد الله عز وجل ..عسى ان يكون من يملك الوقت والعلم ..وفقكم الله احبابي


RE: كود البحث بين رقمين لمجموعة فواتير وكود بين تاريخين واسم الشركة ونوع المادة - superwoofer - 31-01-14

الفاتورة

If rs.State = 1 Then rs.Close
rs.CursorLocation = adUseClient
rs.Open "SELECT * FROM الجدول WHERE اسم حقل الفاتورة BETWEEN " & Text1.Text & " AND " & Text2.Text & " ORDER BY اسم حقل الفاتورة ", db, 1, 3
Set DataGrid1.DataSource = rs
If rs.EOF Then
MsgBox "no found", vbInformation
End If

التاريخ

If rs.State = 1 Then rs.Close
rs.CursorLocation = adUseClient

rs.Open "SELECT * FROM الجدول WHERE اسم حقل التاريخ between #" & DTPicker1 & " # and #" & DTPicker2 & "#" & " order by اسم حقل التاريخ", db, 1, 3

Set DataGrid1.DataSource = rs
If rs.EOF Then
MsgBox "no found", vbInformation
End If


RE: كود البحث بين رقمين لمجموعة فواتير وكود بين تاريخين واسم الشركة ونوع المادة - princeofislam - 31-01-14

اخي سوبر ...الكود اعطاني خطا ...هل من حل اخي ...رجاءا


RE: كود البحث بين رقمين لمجموعة فواتير وكود بين تاريخين واسم الشركة ونوع المادة - superwoofer - 31-01-14

ارفق البرنامج


RE: كود البحث بين رقمين لمجموعة فواتير وكود بين تاريخين واسم الشركة ونوع المادة - princeofislam - 31-01-14

تفضل ايها المبدع

http://vb4arb.com/vb/showthread.php?tid=1772

هذا هو البرنامج يا سيدي

ارجو من الله العون والمساعدة ومنكم بعد الله ......


RE: كود البحث بين رقمين لمجموعة فواتير وكود بين تاريخين واسم الشركة ونوع المادة - تركي الحلواني - 01-02-14

تم الرد في الموضوع السابق


البحث بين تاريخين