تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
تحويل كود من جريد فيو الى جريد كنترول
#1
السلام عليكم.اخواني برجاء المساعدة لو سمحتو كيف استبدل هذا الكود من الجريد العادي للجريد تبع الداف اكسبرس حاولت و بحثت و لكني لم اعثر على نتيجة و لم افهم كيف ارتب كود بهذا الشكل ليشتغل مع الجريد كنترول .. و خاصة بالجزئية تبع ال   i بارك الله فيكم اخواني

كود :
   Sub Load_Records()
       Dim I As Integer = 0
       DataGridView1.Rows.Clear()
       Cnn.Open()
       Cmd = New SqlCommand("SELECT * From Tableemploye", Cnn)
       Drr = Cmd.ExecuteReader
       While Drr.Read
           I += 1
           DataGridView1.Rows.Add(I, Drr.Item("Idemploye").ToString, Drr.Item("nameemploye").ToString)
       End While
       Drr.Close()
       Cnn.Close()
   End Sub
الرد
تم الشكر بواسطة:
#2
و عليكم السلام و رحمة الله و بركاته
يمكن استخدام اكثر من طريقة للعمل
على فرض DataSource الخاص بـ GridCntrol مضبوط مسبقاً
او عبر الكود

PHP كود :
   Sub Load_Data()
 
       Dim dt As New DataTable
        dt
.Columns.Add(New DataColumn With {.ColumnName "Num"})
 
       dt.Columns.Add(New DataColumn With {.ColumnName "Idemploye"})
 
       dt.Columns.Add(New DataColumn With {.ColumnName "nameemploye"})
 
       GridControl1.DataSource dt
        GridView1
.PopulateColumns()


 
       Using Cn As New SqlClient.SqlConnection("Data Source = .;Initial Catalog=SalesDB;Integrated Security=True")

 
           Using Cmd As New SqlClient.SqlCommand("SELECT * From Tableemploye"Cn)
 
               Cn.Open()

 
               Using Drr As SqlClient.SqlDataReader Cmd.ExecuteReader
                    dt
.Load(Drr)
 
                   GridControl1.DataSource dt
                End Using

            End Using

        End Using
    End Sub 

او باستخدام الطريقة AddNewRow 
PHP كود :
Sub Load_Rows()
 
       Dim dt As New DataTable
        dt
.Columns.Add(New DataColumn With {.ColumnName "Num"})
 
       dt.Columns.Add(New DataColumn With {.ColumnName "Idemploye"})
 
       dt.Columns.Add(New DataColumn With {.ColumnName "nameemploye"})
 
       GridControl1.DataSource dt
        GridView1
.PopulateColumns()


 
       Using Cn As New SqlClient.SqlConnection("Data Source = .;Initial Catalog=SalesDB;Integrated Security=True")

 
           Using Cmd As New SqlClient.SqlCommand("SELECT * From Tableemploye"Cn)
 
               Cn.Open()

 
               Using Drr As SqlClient.SqlDataReader Cmd.ExecuteReader

                    Dim I 
As Integer 0
                    Dim newRowHandle 
As Integer GridControl1.NewItemRowHandle

                    While Drr
.Read
                        I 
+= 1
                        GridView1
.AddNewRow()
 
                       GridView1.SetRowCellValue(newRowHandleGridView1.Columns(0), I)
 
                       GridView1.SetRowCellValue(newRowHandleGridView1.Columns(1), Drr.Item("Code").ToString)
 
                       GridView1.SetRowCellValue(newRowHandleGridView1.Columns(2), Drr.Item("Name").ToString)
 
                       GridView1.UpdateCurrentRow()
 
                   End While

 
               End Using

            End Using

        End Using
    End Sub 
اللهم لك الحمد كما ينبغي لجلال وجهك و عظيم سلطانك
في حل و ترحال
الرد
تم الشكر بواسطة: العيدروس , عبد العزيز البسكري
#3
بارك الله فيك استاذ ابو ليلى  و جزاك خيرا ان شاء الله
ساحاول مع الطريقة الثانية ان شاء الله
بجد اشكرك جزيل الشكر و زادك من واسع علمه يا رب
الرد
تم الشكر بواسطة: عبد العزيز البسكري


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  قريد كنترول محمد بن عطية 3 295 13-01-21, 08:26 PM
آخر رد: عبد العزيز البسكري
  [سؤال] كود اضافة صف في القريد كنترول m4n2net2000 2 4,145 26-08-20, 02:41 PM
آخر رد: m4n2net2000
  [سؤال] كيفيه اضافه صف جديد الي الجريد كنترول منه 3 663 20-08-20, 01:26 PM
آخر رد: asemshahen5
  تفعيل الخاصّية : Scroll بالجريد كنترول عبد العزيز البسكري 5 1,157 23-07-20, 11:05 PM
آخر رد: عبد العزيز البسكري
  إستعراض سجلات على أداة الجريد كنترول عبد العزيز البسكري 1 814 25-03-20, 10:46 PM
آخر رد: عبد العزيز البسكري
  [ تمّ الحل ] : إظهار العمود الأوّل على أداة الجريد كنترول عبد العزيز البسكري 3 766 17-03-20, 09:56 PM
آخر رد: محمد كريّم
  [ تمّ الحل ] : تصدير بيانات الجريد كنترول إلى الإكسل عبد العزيز البسكري 5 1,230 04-03-20, 07:29 PM
آخر رد: khodor1985
  مجموع عمود بالجريد كنترول عبد العزيز البسكري 4 906 18-12-19, 11:22 AM
آخر رد: عبد العزيز البسكري
Video [درس فيديو] الدرس 55 (كيفية استعراض السجلات بالجريد كنترول بأكثر من شكل ) Atef Bidier 0 989 09-02-17, 03:16 AM
آخر رد: Atef Bidier
Video [درس فيديو] الدرس 52 (التعرف علي كيفية اضافة الـ Bands بالجريد كنترول) Atef Bidier 0 1,019 03-02-17, 04:18 PM
آخر رد: Atef Bidier

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


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