+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (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=22522)
تعديل كود الحذف - دهشوش1 - 12-11-17
السلام عليكم
اخواني ممكن المساعدة في تصحيح او تعديل كود ( الحذف )
في المشروع الاول
لكي يعمل بنفس طريقة
المشروع الثاني
الموجودة في المرفقات
الكود هو
If rs.State = 1 Then rs.Close
sql = "Delete * from Tabel1 where Num =" & Text1.Text & ""
rs.Open sql, db, adOpenKeyset, adLockOptimistic
MsgBox " تمت عملية الحذف بنجاح", vbInformation
RE: تعديل كود الحذف - دهشوش1 - 12-11-17
رااااائع ااخى وشكرااا عالمتابعة وعلى سعة صدرررك
منكم نستفيد يعطييك الف عافيه اخي
وتعليقك في مكانه فهمت مغزاك
واشكركم على جهووودكم في هذا المنتدى الرائع
RE: تعديل كود الحذف - دهشوش1 - 17-11-17
(13-11-17, 12:18 AM)Amir_alzubidy كتب : حياك الله اخي الحبيبحياك الله اخي
اتمنى لك التوفيق
الشكر لا يعبر عن امتناني لك والله
ماشاء الله تبارك الله
فعلا هذا ما احتاجة
الان اصبح المشروع جاااهز تقريبا ولن استغني عن لمساتك وعن هذا المنتدى الراااائع
جزيت خيراااا وفق الله اخي