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

كيف اقوم بارسال بيانات من قاعدة البيانات اكسس
الى داتاجريدفيو
الحقول في جدول قاعدة البيانات
الاسم
التاريخ

المطلوب
اظهار بيانات الاسم في داتاجريدفيو في العمود الأول
اظهار اليوم الأول من الشهر في العمود الثاني
اظهار اليوم الثاني من الشهر في العمود الثالث
وهكذا حتى نهاية الشهر
بعد اليوم ٣١
نظهر الشهر
والعمود الأخير نظهر السنه
الرد }}}}
تم الشكر بواسطة:
#2
اخواني جزاكم الله الف خري توصلت لكود نقل بيانات من قاعدة البيانات اكسس الى الداتا قريد حسب المشاركة رقم 1

لكن واجهتني مشكلة في حالى ان السجل لبعض الاشخاص في يوم 1 فارغ وليس به بيانات لحقل المبلغ وفي يوم 2 يوجد بيانات لا يظهر في القريد.
إلا في حالة تعبة يوم 1 ولو برقم 0

هذا الكود
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 1
            
For 0 To dt.Rows.Count 1
                Me
.DGVExp.Rows(i).Cells(0).Value dt.Rows(i).Item("Customer_Name")
            
Next
        End 
If
        
Dim ST As String ""
        
For Each Row As DataGridViewRow In Me.DGVExp.Rows
            ST 
Row.Cells(0).Value
            Con
.Open()
            
Dim cmd1 As New OleDbCommand("SELECT Amount_Pur FROM Purchasing WHERE Listing_Date1 = #" Me.DTPDay1.Text "# AND Customer_Name LIKE '" ST "'"Con)
            
Dim cmd2 As New OleDbCommand("SELECT Amount_Pur FROM Purchasing WHERE Listing_Date1 = #" Me.DTPDay2.Text "# AND Customer_Name LIKE '" ST "'"Con)
            
Dim cmd3 As New OleDbCommand("SELECT Amount_Pur FROM Purchasing WHERE Listing_Date1 = #" Me.DTPDay3.Text "# AND Customer_Name LIKE '" ST "'"Con)
            
Dim cmd4 As New OleDbCommand("SELECT Amount_Pur FROM Purchasing WHERE Listing_Date1 = #" Me.DTPDay4.Text "# AND Customer_Name LIKE '" ST "'"Con)
            Try
                
Row.Cells(1).Value cmd1.ExecuteScalar.ToString
                Row
.Cells(2).Value cmd2.ExecuteScalar.ToString
                Row
.Cells(3).Value cmd3.ExecuteScalar.ToString
                Row
.Cells(4).Value cmd4.ExecuteScalar.ToString
            
Catch ex As Exception
            End 
Try
            
Con.Close()
        
Next 
الرد }}}}
تم الشكر بواسطة:
#3
من لديه حل يفيدني جزاكم الله خير

ام سؤالي غير واضح ام الكود غير مفهوم
الرد }}}}
تم الشكر بواسطة:
#4
هذا مثال
ارجوا التعديل علية

في المثال اسفل الشاشة يظهر الاسماء بدون تكرار فقط
المطلوب اظهار بيانات المبلغ لكل يوم مقابل الاسم
حتى ولو لم يسجل لشخص بيانات في يوم سابق


الملفات المرفقة
.rar   ExProgCount.rar (الحجم : 186.11 ك ب / التحميلات : 35)
الرد }}}}
تم الشكر بواسطة:
#5
للمعلومية لمن حمل البرنامج تغيير فورمات التاريخ في الاجراء ControlDate

الى MM/dd/yyyy بدلا من dd/MM/yyyy

لا اعلام لماذ لم يقبلها كما هي
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  ارسال بيانات عن طريق الإنترنت أسامة السالمي 7 140 22-05-17, 04:43 PM
آخر رد: Amir_alzubidy
  البحث في قاعدة بيانات اكسس hatem555 6 135 22-05-17, 02:53 AM
آخر رد: hatem555
  باستخراج من قاعدة البيانات بشرط listbox items rabeh.ram 0 72 19-05-17, 01:56 PM
آخر رد: rabeh.ram
  [سؤال] ممكن مسساعدة في تصدير مشروع بقاعدة بيانات MySql & vb.net2013 فراس الغزي 1 59 19-05-17, 12:45 PM
آخر رد: Adrees
  قاعدة البيانات تاكل التحديثات rabeh.ram 7 131 14-05-17, 11:01 AM
آخر رد: rabeh.ram
  [VB.NET] عايز اعرف ازاى اعمل برنامج بقاعدة بيانات xaml MOSTAFA.KAMEL 3 120 13-05-17, 11:01 PM
آخر رد: العواد الصغير
  نسخ بيانات جدول الى جدول كرم ابوهشام 1 49 13-05-17, 07:32 PM
آخر رد: Amir_alzubidy
  [سؤال] كيفية حفظ صورة بصيغة pdf الى قاعدة البيانات مصطفى_ظيمة 17 297 13-05-17, 01:06 PM
آخر رد: مصطفى_ظيمة
  مساعده في قاعدة بيانات بالفيجوال a_abdullah 9 286 11-05-17, 11:54 AM
آخر رد: khaled12345
  كود ربط الصورة مع بيانات الموظف a.baomar 3 88 09-05-17, 02:25 PM
آخر رد: أبووسم

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


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