الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

كيف يمكن حذف جميع سجلات الجدول؟؟؟

مغلق
بدأه Dena22 في 21 سبتمبر 2005 · 3 رد · 1,090 مشاهدة · في لغة Ms Visual Basic 6 وما قبلها من إصدارات
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

ماهي طريقة حذف جميع سجلات الجدول باستخدام الربط مع الاكسس و ado ؟ أي أن أجعل المستخدم يستطيع استخدام البرنامج وكأنه جديد بدون بيانات؟

؟؟؟؟؟؟؟؟؟؟؟

#2

بهذه الجملة تستطيعين حذف جميع السجلات من الجدول

dim Rs as New Adodb.Recordset

Rs.Open "Delete * from MyTable"

Set Rs=Nothing

تحياتي

OMANI FOR EVER

-------------------------------------------------

post-12787-12780191801974.jpg

-------------------------------------------------

#3

شكرا جزيلا اخي omani على الرد

ولكن هل يمكنني حذف محتويات عمود معين واستبدالها بقيم أخرى؟

#4
أختي الكريمة الاستبدال يختلف عن الحذف فطريقة الاستبدال هي كالتالي : 

فلنفترض ان الجدول مفتوح لديك والبيانات المطلوب استبدالها موجودة في الفيلد الثاني من الجدول 



Dim Rs as new Adodb.Recordset

'فتح الجدول 
Rs.OPen " select * from MyTable",dbConn, adOpenDynamic, adLockOptimistic
'إعادة الجدول الى البداية
if Rs.BOF=False then Rs.MoveFirst
'بدء عمل تغيير البيانات 
DO until Rs.Eof
   rs.field(1)=ضع البيانات الجديده هنا
    rs.update
    rs.movenext
Loop

Rs.Close
Set Rs=nothing

تحياتي

OMANI FOR EVER

-------------------------------------------------

post-12787-12780191801974.jpg

-------------------------------------------------

هذا الموضوع مغلق.

مواضيع مشابهة