مشكله فى الحذف

بدأه shosho842000 في 23 ديسمبر 2009 · 7 رد · 845 مشاهدة · في ADO.NET

#123 ديسمبر 2009 في 04:19 صاحب الموضوع

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

فى مشكله عندى عند الحذف بحيث انه يظهر رساله تم الحذف ولكن لا يتم الحذف ؟؟؟؟؟ من الجدول حيث ان الكود كالاتى :\

 For x As Integer = DataGridView1.Rows.Count - 1 To 0 Step -1
            Dim row As DataGridViewRow = DataGridView1.Rows(x)
            If Not row.IsNewRow Then
                If row.Cells(5).Value = True Then
                    If cn.State = ConnectionState.Open Then cn.Close()
                    cn.Open()
                    cmd.Parameters.Clear()
                    Dim id As Integer = row.Cells(0).Value
                    cmd.CommandType = CommandType.StoredProcedure
                    cmd.CommandText = "deletemilitry"
                    cmd.Parameters.Add("@id", SqlDbType.Int).Value = id
                    cmd.ExecuteNonQuery()
                    DataGridView1.Rows.Remove(row)
                End If
            End If
        Next
        MessageBox.Show("تم الحذف ")

ALTER PROCEDURE [dbo].[deletemilitry]
	-- Add the parameters for the stored procedure here
@id int
AS
BEGIN
	-- SET NOCOUNT ON added to prevent extra result sets from
	-- interfering with SELECT statements.
	SET NOCOUNT ON;

    -- Insert statements for procedure here
	delete  from militry where id=@id
END

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

#223 ديسمبر 2009 في 09:07

حولي قيمة الخليه الي boolan

If convert.toboolan( row.Cells(5).Value)=true

ثانيا علي ما اعتقد بس مش متاكد

cmd.parameters.addwithvalue("@id,id)

تم تعديل هذه المشاركة بواسطة yaser107 في 23 ديسمبر 2009 في 09:12

من برامجي

برنامج free accounts

broker advisor

swap-mobile

#324 ديسمبر 2009 في 16:51

شكرا على الرد ولكن لا يوجد اى تغير

هو بيقوم بحذف السطر مع على datagrid ولكن لا يقوم بحذفه من قاعده البيانات

؟؟؟؟؟؟؟؟

#424 ديسمبر 2009 في 18:32

أخي الفاضل

Shosho842000

هناك طعباً مشاكل في الكود وبما انك تستخدم StoredProcedure لحذف البيانات الموجوده في DataBase أقصد في الجدول بدلالة حقل id فكان يجب عليك أن تكتب هذا السطر

sqlcon.Open()

                Dim cmd As New SqlCommand("deletemilitry", sqlcon)
                cmd.CommandType = CommandType.StoredProcedure

                Dim textbox As String = Convert.ToString(Me.textbox.Text)
                cmd.Parameters.Add("@id", SqlDbType.Int, 4).Value = textbox
                cmd.ExecuteNonQuery()

                sqlcon.Close()

بدلا من