تقييم الموضوع :
  • 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

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


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [سؤال] كيف اجعل البرنامج يحفظ بيانات؟ The Light Fire 4 61 منذ 1 ساعه مضت
آخر رد: ali.alfoly
  تغيير قاعدة البيانات الى .bak زيد زينوبي 3 33 منذ 6 ساعة مضت
آخر رد: ابراهيم النعيمي
  قاعدة البيانات لا تدعم اللغة العربية ؟؟؟؟؟؟ صبري زينوبي 13 186 منذ 8 ساعة مضت
آخر رد: صبري زينوبي
  انشاء قاعدة بيانات بإمتداد خاص بك thevirus 1 57 منذ 9 ساعة مضت
آخر رد: أبوبكر سويدان
  [VB.NET] استدعاء بيانات من الاكسس لل vb.net مهند الموسوي 1 64 02-12-16, 03:14 PM
آخر رد: مهند الموسوي
  ازاى يبقى الصفوف فى الداتا جريد فيو مترتبة زى اللى فى الداتا بيز اكسس بالظبط araxis 2 64 01-12-16, 07:04 AM
آخر رد: araxis
  تغيير قاعدة البيانات من اكسس الى sql hglogtd 2 94 26-11-16, 03:03 AM
آخر رد: hglogtd
  [سؤال] مشاركة برنامج متصل بقاعدة بيانات sql على شبكه محلية mohammedbassim 3 79 24-11-16, 11:40 PM
آخر رد: mohammedbassim
  [كود] الحذف من قاعدة البيانات بواسطة كلمة سر المبرمج العبقري 5 117 23-11-16, 05:21 PM
آخر رد: hglogtd
  اضافه خليه في قاعدة البيانات بعد ربطها بVB2010 أحمد العرب 1 52 20-11-16, 10:56 PM
آخر رد: ابراهيم النعيمي

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


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