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

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


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  سؤال في ريبورت فيو زيد زينوبي 2 59 أمس, 01:29 PM
آخر رد: صبري زينوبي
  سؤال فى ادوات الديف اكسبريس salah mansour 4 49 أمس, 10:55 AM
آخر رد: salah mansour
  سؤال فى الداتا جريد salah mansour 1 96 21-05-17, 12:09 AM
آخر رد: boudyonline
  سؤال مهم فى اجازت العاملين salah mansour 9 137 17-05-17, 01:07 AM
آخر رد: salah mansour
Exclamation سؤال حول طباعة تقارير RDLC ndjakoub 1 44 16-05-17, 12:45 AM
آخر رد: alma2
  سؤال بخصوص التحكم بالمحرك عن طريق الحاسوب Basil Abdallah 2 64 16-05-17, 12:29 AM
آخر رد: alma2
  سؤال فى اجازات العاملين salah mansour 3 93 13-05-17, 02:57 AM
آخر رد: mansoor
  [VB.NET] اجعل ملفات Dll جزء من مشروعك مع سؤال 0theghost0 1 78 12-05-17, 10:47 PM
آخر رد: silverlight
  سؤال Mohamed20 1 61 12-05-17, 03:48 AM
آخر رد: mansoor
  [VB.NET] سؤال حول حفظ كوكيز موقع trakktour 2 107 10-05-17, 03:50 PM
آخر رد: trakktour

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


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