الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

سؤال فى حفظ البيانات ولكن عاجل

بدأه shosho842000 في 25 نوفمبر 2009 · 4 رد · 669 مشاهدة · في ADO.NET
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

السلام عليكم ورحمته الله وبركاته

اتمنى المساعده فى هذا الكود حيث يقوم بحفظ البيانات الى فى datagrid ولكن يظهر خطا فى عندى حقل من نوع checkbox عايزاه لما يكون قيمته 1 يسجل true ولما يكون 0 يسجل false

هذا هو الكود

 If cn.State = ConnectionState.Open Then cn.Close()
        cn.Open()

        For x As Integer = 0 To DataGridView1.Rows.Count - 1
            Dim id, group As Integer
            Dim name As String
            id = DataGridView1.Rows.Item(x).Cells(0).Value
            name = DataGridView1.Rows.Item(x).Cells(1).Value
            group = DataGridView1.Rows.Item(x).Cells(2).Value
            Dim cmd2 As New SqlClient.SqlCommand("SELECT COUNT(*) FROM job1 WHERE id=@id", cn)
            cmd2.Parameters.AddWithValue("@id", id)
            Dim count As Integer = cmd2.ExecuteScalar()
            If count > 0 Then
                Continue For
            End If

            cmd.Connection = cn
            cmd.CommandType = CommandType.Text
            cmd.Parameters.Clear()
            cmd.CommandText = "insert into job1 values (@id,@name1,@group1,@group2)"
            cmd.Parameters.Add("@id", SqlDbType.BigInt).Value = id
            cmd.Parameters.Add("@name1", SqlDbType.VarChar).Value = name
            cmd.Parameters("@name1").Size = 50
            cmd.Parameters.Add("@group1", SqlDbType.BigInt).Value = group
            If DataGridView1.Rows(x).Cells(3).Value = True Then
                cmd.Parameters.Add("@group2", SqlDbType.Bit).Value = True
            Else
                cmd.Parameters.Add("@group2", SqlDbType.Bit).Value = False
                cmd.ExecuteNonQuery()


            End If

        Next
        MessageBox.Show("تم الحفظ ")

وهذا هو الخطا الى بيظهر

Parameterized Query '(@id bigint,@name1 varchar(50),@group1 bigint,@group2 bit)insert' expects parameter @name1, which was not supplied.

سؤال اخر حول الموضوع ماذا اذا ارت ان انقل السجلات المختارة من هذا الجدول الى جدول اخر بمعنى انه تم اختيار بعض السجلات من خلال checkbox اريد ان اخذ هذه السجلات فقط وحفظها فى جدول اخر

وشكراااااااااااااااا

#2

اين المبرمجين انا بجد محتاجه التصحيح فى امر ضرورى ؟؟؟؟؟؟؟؟؟؟؟؟؟

ولكم جزيل الشكر

#3

في كل المرات السابقة, كان السبب الوحيد لهذا الاستثناء أن الخلية التي تم أخد قيمتها و تمريرها كبرمتر كانت القيمة فراغ Nothing.

بالنسبة لسؤال نقل أسطر الداتاجريدفيو, تحتاجين لأن تكون الداتاجريدفيو الثانية لها نفس البنية من الأعمدة و نوع قيم خلاياها. يمكن أن تستعملي الدالة Clone للسطر DataGridViewRow للحصول على نسخة طبق الأصل من السطر الأصلي ثم زيادته على الداتاجريدفيو الثانية.

' الحصول على نسخة طبق الأصل من السطر على المربع الأول
Dim row as DataGridViewRow = DataGridView1.Rows(x).Clone()
' زيادة السطر النسخة على المربع الثاني
DataGridView2.Rows.Add(row)

بالتوفيق :)

#4

هو للاسف القيمه الى بمررها مش فارغا ولا حاجة كل الحقول تحتوى على بيانات ولماشده الموضوع مرفقه المشروع مع قاعده البيانات

المراد عمله فى هذا البرنامج اولا وهو:

عندما اقوم باختيار checkbox من اخر خليه الى رقمها 3 يقوم بتسجيل true وعدم الاختيار يكون false فى قاعده البيانات

واقوم بتمرير جميع البيانات وعدم ترك اى خليه فارغا

وشكرااااااااااااااااااا

New Text Document (2).txt

WindowsApplication13.rar

#5
post-207152-12591830757691_thumb.jpg

مواضيع مشابهة