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

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


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  سؤال .. عن طريقة ادراج صورة من السكانر وطباعتها ناصر شير 0 28 اليوم, 02:54 AM
آخر رد: ناصر شير
  [VB.NET] سؤال عن vb.net 2010 ناصر شير 5 59 اليوم, 02:40 AM
آخر رد: ناصر شير
  سؤال حول تخزين الملفات abudawoodd 7 84 17-02-17, 11:59 PM
آخر رد: abudawoodd
  [VB.NET] سؤال بخصوص Next button Setup Factory dubai.eig 1 42 14-02-17, 07:23 PM
آخر رد: dubai.eig
  سؤال حول حماية المشروع Mohamed20 0 43 13-02-17, 10:35 PM
آخر رد: Mohamed20
  [VB.NET] سؤال بخصوص setup factory dubai.eig 0 60 02-02-17, 10:46 PM
آخر رد: dubai.eig
  سؤال فى اداه ListView Mohamed20 5 97 01-02-17, 02:03 AM
آخر رد: Mohamed20
  اول سؤال لي في منتداكم الرائع ..... من اين ابداء وبما ابداء البرمجة zin1zamanh 17 407 30-01-17, 09:55 PM
آخر رد: alsouf
Exclamation سؤال حول المعامل Ctype ndjakoub 2 109 17-01-17, 10:54 AM
آخر رد: silverlight
  سؤال محمد بن عطية 3 125 13-01-17, 12:10 AM
آخر رد: مساعدة

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


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