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


كود :
Dim connString As String = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Application.StartupPath & "\dataset datc values - القاعدة الاساسية.mdb"



        Using conn As New OleDb.OleDbConnection(connString)
            Using da As New OleDb.OleDbDataAdapter("SELECT[رقم الصنف], SUM([جديد][تالف][مستعمل]) AS [جديد],[تالف],[مستعمل] FROM [MODZ] GROUP BY [رقم الصنف]", conn)
                Using dt As New DataTable
                    da.Fill(dt)
                    Me.DataGridView2.DataSource = dt
                End Using
            End Using
        End Using
    End Sub

ليش خطا انا ابا اجمع 3 اعمدة في عامود كيييف ؟؟؟
لقد اكتشفت مع الأيام أنه ما من فعلٍ مغايرٍ للأخلاق, وما من جريمة بحق المجتمع إلا ولليهود والنصارى يداً فيها  Idea

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

السلام عليكم ورحمة الله


PHP كود :
Dim connString As String "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" Application.StartupPath "\dataset datc values - القاعدة الاساسية.mdb"



        
Using conn As New OleDb.OleDbConnection(connString)
            
Dim sqlSting _
                
" SELECT [رقم الصنف] " _
                
"      , (SUM([جديد]) + SUM([تالف]) + SUM([مستعمل])) AS [المجموع] " _
                
"      , SUM([جديد]) AS [جديد] " _
                
"      , SUM([تالف]) AS [تالف] " _
                
"      , SUM([مستعمل]) AS [مستعمل] " _
                
" FROM [MODZ] " _
                
" GROUP BY [رقم الصنف]"

            
Using da As New OleDb.OleDbDataAdapter(sqlStingconn)
                
Using dt As New DataTable
                    da
.Fill(dt)
                    
Me.DataGridView2.DataSource dt
                End Using
            End Using
        End Using
    End Sub 

الرد }}}}
تم الشكر بواسطة: kslawy
#3
(20-12-14, 06:16 AM)الوليد ☺ كتب :
السلام عليكم ورحمة الله



PHP كود :
       Dim connString As String "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" Application.StartupPath "\dataset datc values - القاعدة الاساسية.mdb"



 
       Using conn As New OleDb.OleDbConnection(connString)
 
           Dim sqlSting _
                
" SELECT [رقم الصنف] " _
                
"      , (SUM([جديد]) + SUM([تالف]) + SUM([مستعمل])) AS [المجموع] " _
                
"      , SUM([جديد]) AS [جديد] " _
                
"      , SUM([تالف]) AS [تالف] " _
                
"      , SUM([مستعمل]) AS [مستعمل] " _
                
" FROM [MODZ] " _
                
" GROUP BY [رقم الصنف]"

 
           Using da As New OleDb.OleDbDataAdapter(sqlStingconn)
 
               Using dt As New DataTable
                    da
.Fill(dt)
 
                   Me.DataGridView2.DataSource dt
                End Using
            End Using
        End Using
    End Sub 

انت معلمي : بس لو تشرح لي والله
لقد اكتشفت مع الأيام أنه ما من فعلٍ مغايرٍ للأخلاق, وما من جريمة بحق المجتمع إلا ولليهود والنصارى يداً فيها  Idea

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


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [VB.NET] سؤال كيف يمكن معرفة التغير في قاعدة البيانات وليد الزنتاني 2 109 10-11-16, 01:20 AM
آخر رد: وليد الزنتاني
Lightbulb [VB.NET] سؤال حول التعامل مع الماسح الضوئي salhigc 3 120 02-11-16, 04:15 PM
آخر رد: salhigc
Exclamation [VB.NET] سؤال احتاج مساعده فيه a_abdullah 11 161 25-10-16, 03:20 PM
آخر رد: a_abdullah
  سؤال بسيط في فصل التاريخ عن الوقت فراس صلاح 3 132 19-10-16, 04:17 AM
آخر رد: mhmd_911
  سؤال : عن داتا قريد تقسيم قيمة الى عمودين abid 5 124 13-10-16, 04:40 AM
آخر رد: abid
  سؤال بخصوص طباعة تقرير في فيجوال بيسك 2010 haiderkh 2 101 12-10-16, 08:48 PM
آخر رد: أبو عمر
  [VB.NET] سؤال في الريبورت فيور دمعتز السمان 1 76 08-10-16, 01:52 AM
آخر رد: ابو ليلى
  سؤال عن ربط البرنامج الفيجوال بيسك بالموقع لسه مبتدئ 4 158 06-10-16, 07:13 PM
آخر رد: سعود
  [VB.NET] سؤال بخصوص التقارير في فيجوال بيسك 2010 haiderkh 3 183 16-09-16, 05:44 PM
آخر رد: Adrees
  [سؤال] سؤال يخص ملفات exe ramez live vb 12 365 09-09-16, 08:58 PM
آخر رد: أبو عمر

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


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