اذهب الي المحتوي
أوفيسنا

الردود الموصى بها

قام بنشر

السلام عليكم جميعا

بصراحة انا استفدت من هذا الموقع كثيرا وهو رائع جدا باعضائه الرائعين

 

لدي استفسار حول كيفية تفريغ قاعدة بيانات بمعنى هذف كل البيانات المدخلة فيها طبعا دون تأثر القاعدة الرئيسية

فقط اريد مسح كامل البيانات الموجودة والبدء بادخال بيانات حقيقة من الصفر

قام بنشر
منذ ساعه, بلال العجوري said:

السلام عليكم جميعا

بصراحة انا استفدت من هذا الموقع كثيرا وهو رائع جدا باعضائه الرائعين

 

لدي استفسار حول كيفية تفريغ قاعدة بيانات بمعنى هذف كل البيانات المدخلة فيها طبعا دون تأثر القاعدة الرئيسية

فقط اريد مسح كامل البيانات الموجودة والبدء بادخال بيانات حقيقة من الصفر

الطريقة التقليدية تعمل استعلام حذف للجداول

وتشغله من مكان معين  تعمل لكل جدول استعلام حذف مستقل  

مثال

252.jpg

  • 2 months later...
قام بنشر

 

Dim s1, As String
On Error GoTo y:
If MsgBox("هل تريد حذف البينات كلها من البرنامج  ", vbYesNo, " تحذير ") = vbYes Then
s1 = "DELETE * FROM [in]"        اسم الجدول 
DoCmd.Requery
DoCmd.SetWarnings False   ايقاف اي عملية للاكسيس
DoCmd.RunSQL s1
الكود اعلاه يحذف جميع البيناتا في الجودل 

انشئ حساب جديد او قم بتسجيل دخولك لتتمكن من اضافه تعليق جديد

يجب ان تكون عضوا لدينا لتتمكن من التعليق

انشئ حساب جديد

سجل حسابك الجديد لدينا في الموقع بمنتهي السهوله .

سجل حساب جديد

تسجيل دخول

هل تمتلك حساب بالفعل ؟ سجل دخولك من هنا.

سجل دخولك الان
  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information