تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
طلب كود حذف البيانات من قاعدة البيانات
#1
السلام عليكم الاخوه مشرفي واعضاء منتدانا الغالي رمضان كريم وصيام مقبول واجر ثابت
لدي مشروع فيجوال بيسك 6 مرتبط بقاعدة بيانات عن طريق ADODC والقاعدة تحوي جدول واحد أسمه Tab1فيه عده سجلات منها StName و Class ارغب في حذف محتويات الحقل Class فقط وان ابقي على الاسماء في حقل StName كيف يمكن ذلك مع الشكر الجزيل
استخدمت الكود التالي الا انه يقوم بحذف جميع البيانات والكود هو :
Adodc1.RecordSource = " delete Class from tab1 "
Adodc1.Refresh
الرد }}}}
تم الشكر بواسطة:
#2
ان لم تنجح العملية يرجى ارفاق المثال
كود :
Private Sub Command1_Click()
Dim I As Integer

If Adodc1.Recordset.State = adStateOpen Then Adodc1.Recordset.Close
Adodc1.RecordSource = "SELECT * FROM Tab1 " & "

I = 0
If Adodc1.Recordset.RecordCount > 0 Then

  Adodc1.Recordset.MoveFirst
  DoEvents
 
  Do Until Adodc1.Recordset.EOF
     
     I = I + 1
     DoEvents
Adodc1.Recordset.Fields("Class") = ""
Adodc1.Recordset.Update
DoEvents
Adodc1.Recordset.MoveNext
DoEvents

Loop
MsgBox "Done..."
Adodc1.CommandType = adCmdText
Adodc1.Refresh
Else
MsgBox "NoRecords!"
End If
End Sub
سأعود قريباً ان شاء الله

الرد }}}}
#3
السلام عليكم استاذ Amir_alzubidy  اسف على الازعاج ولكن جربت الكود ولم يعمل وقد ارفقت ملف المشروع كما تفضلت
ولو اردت ان احذف محتويات اكثر من حقل من حقول الجدول كان احذف محتويات الحقل Class و الحقل A1 و A2 كيف يمكنني ذلك مع الشكر اسال  الله ان يوفقك ويحفظك من كل سوء بحق شهره الفضيل


الملفات المرفقة
.rar   App1.rar (الحجم : 1.43 م ب / التحميلات : 10)
الرد }}}}
تم الشكر بواسطة:
#4
اهلا و سهلا
تم التعديل

.rar   App2.rar (الحجم : 1.35 م ب / التحميلات : 46)
سأعود قريباً ان شاء الله

الرد }}}}
#5
لو سمحتم عايز اعرف ازاى وانا بسجل فى قاعده البيانات و عملت add أزى لو البرنامج خرج قبل ما احفظ يمسح اخر سجل السجل
هى اجرائيه فى ان لود فورم بس انا مش عارفها
الرد }}}}
تم الشكر بواسطة:
#6
لو سمحت يا جماعه عايز اعرف ازاى لو عملت data1.recoudset.addnew
ومعملتش حفظ ازاى اخليه يعمل كنسل ,,,.. لأنه بيحفظه عند الخروج
الرد }}}}
تم الشكر بواسطة:
#7
هذا اكبر دليل على الخطأ الفادح الذي يعيب على شركة مايكروسوف
الربط بالادوات
طريقة معقدة . مقيدة . مجهدة للنفس للاسف
انا احزن لما اشوف حد لليوم يتبع طريقة الربط بالادوات
...
فرضا لو تركنا كود يحذف لك السجل الاخير في الحدث الذي ذكرته في المشاركة السابقة . الان كيف راح اعرف بهذه الحالة هل تم حذفه بسبب انقطاع التيار الكهربائي ام هل تم الغاء السجل فعلا من خلال الخروج من البرنامج
سأعود قريباً ان شاء الله

الرد }}}}
تم الشكر بواسطة: عبد العزيز البسكري , Ahmed_Mansoor
#8
طيب اعمل ايه امير بارك الله فيك
بس انا كنت قابلت كود مثل هاذا وكان فى unload_form1 بس مش فاكره خالص
ومش عارف اوصله تانى كان ليه علاقه بالموضوع دا data1.شئ لاست موف ..... مش فاكر صراحه
اعمل ايه
الرد }}}}
تم الشكر بواسطة:
#9
السلام عليكم
هذا مثال تطبيقي كما يجب ان يكون لفرضية الخروج وعدم حفظ السجل الاخير
هناك ملاحظة بالمرفق اقرأها جيداً قبل التنفيذ



.rar   Example.rar (الحجم : 16.82 ك ب / التحميلات : 7)
سأعود قريباً ان شاء الله

الرد }}}}
تم الشكر بواسطة: عبد العزيز البسكري , Ahmed_Mansoor


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  كيفية ربط قاعدة البيانات القوائم المنسدلة bidaya 12 128 منذ 8 ساعة مضت
آخر رد: bidaya
  فتح برنامج مبرمج بالفيجوال بيسك6 و قاعدة بيانات MYSQL Ahmed Salem12 1 55 01-12-16, 03:40 PM
آخر رد: sendbad100
  [سؤال] برجاء المساعده في تغيير إسم جدول في قاعدة بيانات SQl Server بالفيجول بيسك6 engabuhema 2 57 24-11-16, 01:49 AM
آخر رد: ahmedabdelaliem
  مشكلة : قاعدة بيانات البرنامج بعد التنصيب لا تصبح بشكل ملف للقراءة فقط haiderkh 3 93 10-11-16, 12:56 AM
آخر رد: Ahmed_Mansoor
  [سؤال] رفع فيديو في قاعدة البيانات jihad20003000 0 55 04-11-16, 02:35 PM
آخر رد: jihad20003000
  احتاج كود لعمل نسخة من قاعدة بيانات اكسس اثناء الاتصال بها sendbad100 3 123 01-11-16, 08:57 AM
آخر رد: sendbad100
  البحث المتقدم في قاعدة بيانات اكسس haniblack 4 140 31-10-16, 10:00 PM
آخر رد: moamen said
  [سؤال] هل يوجد كود لمعرفة اسم حقل في جدول ( الاسم الرئيسي) الموجود بقاعدة البيانات allobaed 3 86 30-10-16, 01:32 AM
آخر رد: أبو عمر
Exclamation [سؤال] كيفية تحديث بيانات جدول داخل قاعدة بيانات sql 2000 engabuhema 6 233 27-10-16, 11:28 AM
آخر رد: engabuhema
  شرح تحزيم قاعدة بيانات SQL Server 2000 ومحرك قواعد البيانات بوااسطة الـSetupFactory Ahmed_Mansoor 14 1,116 24-10-16, 02:07 PM
آخر رد: engabuhema

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم