منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب > قسم قواعد البيانات > قسم أسئلة قواعد البيانات تحت بيئة الـ.NET > كيف اقوم بوضع بيانات حقل في العمود الاول من القريد
نسخة كاملة : كيف اقوم بوضع بيانات حقل في العمود الاول من القريد
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .

aftfm

10-05-14, 02:04 PM
السلام عليكم ورحمة الله و بركاته

هذا اجراء لارسال بيانات حقل بدون تكرار الى اداة ListBox

المطلوب تعديل الكود لارسال بيانات الحقل الى العمود الاول في الداتا قريد
كود :
Using MYDataAdapter As New OleDbDataAdapter("Select DISTINCT Tar FROM tbl1", Con)
            Call DataSet2.Clear()
            Me.ListBox1.Items.Clear()
            '==========
            Call MYDataAdapter.Fill(DataSet2, "TarTable")
            For Each MYRow As DataRow In DataSet2.Tables("TarTable").Rows
                Dim a As String = MYRow.Item("Tar")
                If String.IsNullOrEmpty(a) = Nothing Then
                    ListBox1.Items.Add(a)
                End If
            Next
        End Using

aftfm

10-05-14, 07:41 PM
تم الحل

كود :
Using MYDataAdapter As New OleDbDataAdapter("SELECT DISTINCT Tar FROM tbl1", Con)
            Call MYDataAdapter.Fill(DataSet2, "TarTable")
            For Each MYRow As DataRow In DataSet2.Tables("TarTable").Rows
                Dim a As String = MYRow.Item("Tar")
                If String.IsNullOrEmpty(a) = Nothing Then
                    MYDataAdapter.Fill(DataSet2)
                    DataGridView1.DataSource = DataSet2.Tables(0).DefaultView
                End If
            Next
        End Using

vbnet

10-05-14, 07:57 PM
-
استخدم DataTable طالما أنك تتعامل مع جدول واحد.
كود :
Using da As New OleDbDataAdapter("SELECT DISTINCT [Tar] FROM [tbl1] WHERE ([Tar] IS NOT NULL) AND (TRIM([Tar]) <> '') ", Con)
    Dim dt As New DataTable
    da.Fill(dt)
    DataGridView1.DataSource = dt
End Using

aftfm

11-05-14, 11:11 AM
الله ينور عليك ويزيدك علماً

ما هو الفرق بين DataSet , DataTable

حريف برمجة

11-05-14, 04:57 PM
(11-05-14, 11:11 AM)aftfm كتب : [ -> ]الله ينور عليك ويزيدك علماً

ما هو الفرق بين DataSet , DataTable

DataTable = وضع فيه جدول واحد فقط .
DataSet = امكانية وضع فيها اكثر من جدول .

ولأختيار جدول من ضمن الجداول الموجوده في DataSet كالتالي :

كود :
DataSet.Tabel(0)      صفر يعني أول جدول قمت بتعبئته في الداتا سيت

DataSet.Tabel(1)      واحد يعني ثاني جدول قمت بتعبئته في الداتا سيت

DataSet.Tabel(2)       أثنين يعني ثالث جدول قمت بتعبئته في الداتا سيت
وهكذا او ممكن بأسمه مباشرة

كود :
DataSet.Tabel("Tab1")
Tab1 يعني اسم الجدول في الداتا سيت

aftfm

11-05-14, 05:56 PM
الف شكر اخي العزيز

لم اقصد هذا ولكن

Dim ds as new DataSet
&
Dim dt as new DataTable
منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب > قسم قواعد البيانات > قسم أسئلة قواعد البيانات تحت بيئة الـ.NET > كيف اقوم بوضع بيانات حقل في العمود الاول من القريد