[Adata]

ســــلام عليكم ارجوكم ماهي المشكلة اريد اضافة العمود الاول من داتا جريد الي حقل في قاعدة البيانات
 If con.State = 1 Then con.Close()
       '        con.Open()
       For i1 As Integer = 0 To Dgv.Rows.Count - 1
           If con.State = 1 Then con.Close()
           con.Open()
           cmd = New SqlCommand("INSERT INTO Schedule(Num)VALUES(@Num)", con)
           cmd.Parameters.AddWithValue("@Num", Dgv.CurrentCell(i1))
           cmd.ExecuteNonQuery()

       Next
       con.Close()

[Kamil]

وعليكم السلام

جرب هذا الكود 

PHP كود :

If con.State = 1 Then con.Close()
con.Open()

For i1 As Integer = 0 To Dgv.Rows.Count - 1
    Dim value As Object = Dgv.Rows(i1).Cells("اسم_العمود").Value

    ' التحقق من أن القيمة ليست فارغة قبل إجراء الإدراج
    If value IsNot Nothing AndAlso Not String.IsNullOrEmpty(value.ToString()) Then
        cmd = New SqlCommand("INSERT INTO Schedule(Num) VALUES(@Num)", con)
        cmd.Parameters.AddWithValue("@Num", value)
        cmd.ExecuteNonQuery()
    End If
Next

con.Close() 


[Adata]

(13-01-24, 09:22 PM)Kamil كتب : وعليكم السلام

جرب هذا الكود 

PHP كود :

If con.State = 1 Then con.Close()
con.Open()

For i1 As Integer = 0 To Dgv.Rows.Count - 1
    Dim value As Object = Dgv.Rows(i1).Cells("اسم_العمود").Value

    ' التحقق من أن القيمة ليست فارغة قبل إجراء الإدراج
    If value IsNot Nothing AndAlso Not String.IsNullOrEmpty(value.ToString()) Then
        cmd = New SqlCommand("INSERT INTO Schedule(Num) VALUES(@Num)", con)
        cmd.Parameters.AddWithValue("@Num", value)
        cmd.ExecuteNonQuery()
    End If
Next

con.Close() 


---

يعطي خطأ عند تغير اسم العمود كما موجود عندي

[تركي الحلواني]

1- تأكد من نوع العمود.
2- تحقق بانه لا يوجد حقل اجباري يجب ادخال البيانات به.

[aljzazy]

انت عامل لوب اذا القيمة ستأخذ من حلقة التكرار للعامود الاول وهو
dgv.rows(i1).cells(0).value