+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : الأقسام التعليمية - المنتدى القديم (http://vb4arb.com/vb/forumdisplay.php?fid=90)
+--- قسم : مكتبة أكواد المنتدى (http://vb4arb.com/vb/forumdisplay.php?fid=111)
+---- قسم : مكتبة أكواد الفيجوال بيسك 6 (http://vb4arb.com/vb/forumdisplay.php?fid=116)
+---- الموضوع : طريقة تصفير الجدوال في قواعد البيانات (تصفير قاعدة البيانات) (/showthread.php?tid=6078)
طريقة تصفير الجدوال في قواعد البيانات (تصفير قاعدة البيانات) - RaggiTech - 17-10-12
كاتب الموضوع : جهاد العريقي
بفرض اننا نمتلك جدول واحد في قاعدة البيانات واردنا حذف كل البيانات في هذا الجدول او في قاعدة البيانات نستخدم الكود الاتي
كود :
[COLOR=#000000][COLOR=#0000bb]
لتصفير قاعدة البيانات
[/COLOR][color=#007700]Private [/color][color=#0000bb]Sub Command3_Click[/color][COLOR=#007700]()
[/COLOR][color=#0000bb]Dim db [/color][color=#007700]As [/color][COLOR=#0000bb]Database
Set db [/COLOR][color=#007700]= [/color][color=#0000bb]OpenDatabase[/color][color=#007700]([/color][color=#dd0000]"MyDataBase.mdb"[/color][COLOR=#007700])
[/COLOR][color=#0000bb]db[/color][color=#007700].[/color][color=#0000bb]Execute [/color][color=#007700]([/color][color=#dd0000]"DELETE * from MyTable"[/color][COLOR=#007700])
[/COLOR][COLOR=#0000bb]End Sub
[/COLOR][/COLOR]واذا اردنا ان نحذف با قي البيانات من عذة جداول فيمكن تكرار العملية
كود :
[color=#000000][COLOR=#0000bb]db[/color][color=#007700].[/color][color=#0000bb]Execute [/color][color=#007700]([/color][color=#dd0000]"DELETE * from MyTable"[/color][COLOR=#007700])
[/COLOR][color=#0000bb][/color][/COLOR]حيث نضع بدل MYTable اسم الجدول المراد ..
يمكن الاستغنا عن * وكتابة امر Sql كالاتي
كود :
[COLOR=#000000][COLOR=#0000bb]Delete From MyTable
[/COLOR][/COLOR]