إنضمامك إلي منتديات استراحات زايد يحقق لك معرفة كل ماهو جديد في عالم الانترنت ...

انضم الينا
استراحات زايد الصفحة الرئيسية


 
 
LinkBack أدوات الموضوع انواع عرض الموضوع
  #1  
قديم 09-01-2010, 10:20 AM
عضو ماسي
بيانات محروم.كوم
 رقم العضوية : 503
 تاريخ التسجيل : Dec 2007
الجنس : female
علم الدوله :
 المشاركات : 2,100,669
عدد الـنقاط :3341
 تقييم المستوى : 2140

لدي قاعدة بيانات و كونت بها Delete procedure نصه
ALTER
proc [dbo].[Deleteitems](@MainLineID int)
as
begin
delete
from dbo.Main_Line
where MainLineID=@MainLineID
end
و عند تطيقه علي برنامج vb.net 2005 كتبت كود الحذف هكذا فأين الخطا
PrivateSub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
Dim i AsInteger

Dim ta AsNew M_ListDataSetTableAdapters.Main_LineTableAdapter
Dim x As MsgBoxResult
x = MsgBox(
"Are you sure", MsgBoxStyle.YesNo, "Confirm")
If x = MsgBoxResult.Yes Then
For i = 0 To DataGridView1.RowCount - 1
If DataGridView1.Rows(i).Cells(0).Value = TrueThen
ta.Deleteitems(DataGridView1.Rows(i).Cells(1).Valu e)
EndIf
Next
EndIf
EndSub
__DEFINE_LIKE_SHARE__
رد مع اقتباس
 

مواقع النشر (المفضلة)


تعليمات المشاركة
لا تستطيع إضافة مواضيع جديدة
لا تستطيع الرد على المواضيع
لا تستطيع إرفاق ملفات
لا تستطيع تعديل مشاركاتك

BB code is متاحة
كود [IMG] متاحة
كود HTML معطلة
Trackbacks are متاحة
Pingbacks are متاحة
Refbacks are متاحة



الساعة الآن 04:03 PM


Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
Content Relevant URLs by vBSEO 3.5.2 TranZ By Almuhajir

RSS RSS 2.0 XML MAP HTML