تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
استخراج بيانات جدول الى القريد حسب اليوم والشهر
#1
السلام عليكم ورحمة الله و بركاته

اخواني لدي قاعدة بيانات اكسس بها جدول

الحقول

Name
Date
Amount

اريد اظهار بيانات الجدول في شاشة اخرى

حسب اليوم والشهر وبشرط يكون عناوين القريد

الاسم ثم 1 اي اليوم الاول ثم 2 وحتى 31 يوم ثم الشهر والسنه

واظهار الاسم وما يقابله من مبلغ في ايام الشهر المختار

مع العلم ان البيانات الموجودة في الجدول
هي كما ذكرت الاسم والتاريخ اي التاريخ كامل 01/01/2013 ثم ا لمبلغ
الرد }}}}
تم الشكر بواسطة:
#2
طيب اخواني جزاكم الله خير

اريد فقط اظهار الاسم من قاعدة بيانات اكسس الى الداتا قريد حسب الشهر

بمعنى لو اخترت في اداة التاريخ DateTimePicker 01/02/2013 يظهر لي الاسم الذي يقابله هذا الشهر اياً كان اليوم بدون تكرار للاسم
وهكذا في بقية الاشهر
الرد }}}}
تم الشكر بواسطة:
#3
السلام عليكم ورحمة الله وبركاته



ما رأيك تجرب الأداة (@@ أداة توليد كود إستعلام مع إمكانية اختبار الاستعلام مباشرة @@) وترد لي خبر.



السلام عليكم ورحمة الله وبركاته
الرد }}}}
تم الشكر بواسطة:
#4
السلام عليكم ورحمة الله وبركاته



استخدم الاستعلام التالي في الأداة
PHP كود :
SELECT FROM table1 WHERE Month(date) = 


بانتظارك...........



السلام عليكم ورحمة الله وبركاته
الرد }}}}
تم الشكر بواسطة:
#5
الف شكر اخي العزيز ابو رائد
في الحقيقة في مولد الاستعلام مشي الحال

لكن الكود في برنامجي بيظهر فقط اسم واحد ولا يظهر باقي الاسماء الذين لهم سجل في نفس الشهر

لا اعلم ما هو السبب
يعني انا اريد ارسال بيانات الاسماء خلال شهر 2 الى العمود الاول في القريد بدون تكرار الاسم خلال هذا الشهر
لدي Label يظهر فيه رقم الشهر وكتبت الكود المرسل من قبلك لكن ظهر لي فقط اسم و احد وباقي الاسماء لم يظهرها

هذا الكود الذي لدي

PHP كود :
For Each Row As DataGridViewRow In Me.DGVExp.Rows
            Dim cmd 
As New OleDbCommand("SELECT DISTINCT Customer_Name FROM Purchasing WHERE Month(Listing_Date1) = '" Me.lblMonth.Text.Trim "'"Con)
            
Con.Open()
            Try
                
Row.Cells(0).Value cmd.ExecuteScalar.ToString
            
Catch ex As Exception
            End 
Try
            
Con.Close()
        
Next 
الرد }}}}
تم الشكر بواسطة:
#6
السلام عليكم ورحمة الله وبركاته


الكود اللي انت استخدمته غريب

جرب هذا الكود
PHP كود :
Dim sql As String " SELECT DISTINCT Customer_Name " _
                    
"   FROM Purchasing             " _
                    
"  WHERE Month(Listing_Date1) = " Val(Me.lblMonth.Text)

Dim dt As New DataTable
Dim da 
As New OleDbDataAdapter(sqlCon)
da.Fill(dt)

If 
dt.Rows.Count Me.DGVExp.Rows.Count Then Me.DGVExp.RowCount dt.Rows.Count

For 0 To dt.Rows.Count 1
    Me
.DGVExp.Rows(i).Cells(0).Value dt.Rows(i).Item("Customer_Name")
Next 



السلام عليكم ورحمة الله وبركاته
الرد }}}}
تم الشكر بواسطة:
#7
يا سلام عليك الف شكر اخي العزيز ابو رائد
جعلها الله في موازين حسناتك

مشي الحال
الرد }}}}
تم الشكر بواسطة:
#8
في مشكلة واحدة في حالة اختيار شهر لم يكن له سجل في قاعدة البيانات

تظهر هذه الرساله

قيمة '0' لا تصلح لـ 'RowCount'. يجب أن يكون 'RowCount' أكبر من 1 أو مساويًا له. اسم المعلمة: RowCount

الخطأ في السطر

PHP كود :
Me.DGVExp.RowCount dt.Rows.Count 
الرد }}}}
تم الشكر بواسطة:
#9
السلام عليكم ورحمة الله وبركاته


aftfm كتب :في مشكلة واحدة في حالة اختيار شهر لم يكن له سجل في قاعدة البيانات

تظهر هذه الرساله

قيمة '0' لا تصلح لـ 'RowCount'. يجب أن يكون 'RowCount' أكبر من 1 أو مساويًا له. اسم المعلمة: RowCount

الخطأ في السطر

PHP كود :
Me.DGVExp.RowCount dt.Rows.Count 



معناته نضع شرط التحقق من وجود اسطر من الاستعلام كاتالي
PHP كود :
Dim sql As String " SELECT DISTINCT Customer_Name " _
                    
"   FROM Purchasing             " _
                    
"  WHERE Month(Listing_Date1) = " Val(Me.lblMonth.Text)

Dim dt As New DataTable
Dim da 
As New OleDbDataAdapter(sqlCon)
da.Fill(dt)

If 
dt.Rows.Count 0 Then
    
If dt.Rows.Count Me.DGVExp.Rows.Count Then Me.DGVExp.RowCount dt.Rows.Count

    
For 0 To dt.Rows.Count 1
        Me
.DGVExp.Rows(i).Cells(0).Value dt.Rows(i).Item("Customer_Name")
    
Next
End 
If 



السلام عليكم ورحمة الله وبركاته
الرد }}}}
تم الشكر بواسطة:
#10
الف شرك جزاك الله خير

:o
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  ابي اربط برنامجي بسيرفر او قاعده بيانات مبارك 3 172 22-11-16, 02:57 PM
آخر رد: مبارك
  [سؤال] المساعدة في نقل سجلات من جدول الى جدول اخر مهندس حيدر 7 267 13-11-16, 02:16 PM
آخر رد: محمود بكرى
  [سؤال] كيفية اضافة عناصر عمود فى جدول من قاعدة بيانات فى جدول اخر hidn 1 164 04-11-16, 09:25 AM
آخر رد: thevirus
  [سؤال] قراءة رابط من قاعدة بيانات في ادة التصفح شمس الدين 03 2 77 27-10-16, 10:43 PM
آخر رد: شمس الدين 03
  كيفية الاتصال بقاعدة بيانات Access على الشبكة المحلية warda saeed 7 7,193 27-10-16, 09:53 PM
آخر رد: thevirus
  ربط قاعدة بيانات اكسس بفجوال دوت نت 2015 كنونو 0 121 26-09-16, 01:35 PM
آخر رد: كنونو
Lightbulb [سؤال] كيف يتم رفع قاعدة بيانات mysql بطريقة برمجية sanosi 0 124 26-08-16, 05:00 PM
آخر رد: sanosi
  [سؤال] مساعدة في حفظ بيانات من جدولين mosasaad 5 262 22-08-16, 10:25 AM
آخر رد: سعود
  [VB.NET] مشكله عند الحفظ على قاعدة بيانات باستخدام Data Source وقاعدة بيانات اكسس2007 coderarab 7 356 24-07-16, 06:26 PM
آخر رد: سعود
  كيف يتم ربط قاعدة بيانات مع موقع ؟ ابراهيم حورس 1 218 10-07-16, 02:00 AM
آخر رد: boudyonline

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم