تقييم الموضوع :
  • 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 safalo 1 46 19-09-17, 03:48 PM
آخر رد: أبو نوره
  [سؤال] اعذروني اخواني سؤال في الفيس بوك لسه مبتدئ 0 40 16-09-17, 02:09 PM
آخر رد: لسه مبتدئ
  سؤال مستعجل اخواني Amjad 5 141 08-09-17, 07:20 PM
آخر رد: طـلال
  سؤال مستعجل اخواني وضروري Amjad 2 100 08-09-17, 05:42 AM
آخر رد: Amjad
  [سؤال] سؤال ضروري (الصوره) DF.12 0 75 28-08-17, 03:08 PM
آخر رد: DF.12
  [سؤال] سؤال بخصوص الListBox ابو روضة 12 415 23-08-17, 03:46 PM
آخر رد: ابو ليلى
  سؤال من الخبراء خاص بالتحزيم نبيل كونكت 0 62 19-08-17, 10:40 AM
آخر رد: نبيل كونكت
  سؤال الاتصال بقاعدة بيانات عن طريق Web Service كفاح 8 194 12-08-17, 01:29 AM
آخر رد: سلامات
  [سؤال] سؤال عن الرقم القومى عادل م 2 123 08-08-17, 05:12 PM
آخر رد: Amir_alzubidy
  سؤال حول تحديث برنامج ndjakoub 18 513 04-08-17, 01:49 AM
آخر رد: سعود

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


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