12-09-16, 08:19 AM
السـلام عليكم روحمة الله وبركاته
أتشـرف بأن أتقدم لكم وأقول كل عام وأنتم وجميع المسلمون بألف خيـر ونسأل الله أن يعيده علينا أعواماً عديده وأزمنة مديده
عندي مشـكله وهي أنني عملت أجراء ستورد برستجر وكلاس وفورم
هذا الأجراء لحذف أستورد برستجر
وهذه الداله موجوده في الكلاس
هذا الأجراء لزر
يعطيني خطأ لم يتم أرجاع كائن مثيل وش المشكله
أتشـرف بأن أتقدم لكم وأقول كل عام وأنتم وجميع المسلمون بألف خيـر ونسأل الله أن يعيده علينا أعواماً عديده وأزمنة مديده
عندي مشـكله وهي أنني عملت أجراء ستورد برستجر وكلاس وفورم
هذا الأجراء لحذف أستورد برستجر
كود :
ALTER proc [dbo].[DeletMokof]
@Num_ID Nvarchar (15)
as
delete from All_Data
where Num_ID = @Num_ID
وهذه الداله موجوده في الكلاس
كود :
Public Sub DeletMokof(ByVal IDNUM As String)
cls.Open()
Dim param(1) As SqlParameter
param(0) = New SqlParameter("@IDNUM", SqlDbType.NVarChar)
param(0).Value = IDNUM
cls.SendData("DeletMokof", param)
cls.Clos()
End Sub
هذا الأجراء لزر
كود :
sen.DeletMokof(TextBox1.Text)
يعطيني خطأ لم يتم أرجاع كائن مثيل وش المشكله