منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
مطلوب تعديل كود الحذف لمجموعة بيانات حسب الشرط - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم أسئلة واستفسارات الأعضاء - المنتدى القديم (http://vb4arb.com/vb/forumdisplay.php?fid=94)
+--- قسم : قسم Visual Basic 6 وما قبله (http://vb4arb.com/vb/forumdisplay.php?fid=167)
+--- الموضوع : مطلوب تعديل كود الحذف لمجموعة بيانات حسب الشرط (/showthread.php?tid=9784)



مطلوب تعديل كود الحذف لمجموعة بيانات حسب الشرط - pcfbs2000 - 25-07-13

السلام عليكم

مطلوب تعديل كود فيجوال بيسك 6
لحذف جميع البيانات اللي تطابق الشرط وهو عام 2011
من الجدولasnaf في قاعدة البياناتwewdata حقل العام في الجدولno


Dim db As Database

Set db = OpenDatabase("wewdata.mdb")
Set db = ";pwd=wew2000"

db.Execute ("DELETE from asnaf where no=" & Text1.Text & "")