تقييم الموضوع :
  • 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 م ب / التحميلات : 12)
الرد }}}}
تم الشكر بواسطة:
#4
اهلا و سهلا
تم التعديل

.rar   App2.rar (الحجم : 1.35 م ب / التحميلات : 51)
الرد }}}}
#5
لو سمحتم عايز اعرف ازاى وانا بسجل فى قاعده البيانات و عملت add أزى لو البرنامج خرج قبل ما احفظ يمسح اخر سجل السجل
هى اجرائيه فى ان لود فورم بس انا مش عارفها
الرد }}}}
تم الشكر بواسطة:
#6
لو سمحت يا جماعه عايز اعرف ازاى لو عملت data1.recoudset.addnew
ومعملتش حفظ ازاى اخليه يعمل كنسل ,,,.. لأنه بيحفظه عند الخروج
الرد }}}}
تم الشكر بواسطة:
#7
هذا اكبر دليل على الخطأ الفادح الذي يعيب على شركة مايكروسوف
الربط بالادوات
طريقة معقدة . مقيدة . مجهدة للنفس للاسف
انا احزن لما اشوف حد لليوم يتبع طريقة الربط بالادوات
...
فرضا لو تركنا كود يحذف لك السجل الاخير في الحدث الذي ذكرته في المشاركة السابقة . الان كيف راح اعرف بهذه الحالة هل تم حذفه بسبب انقطاع التيار الكهربائي ام هل تم الغاء السجل فعلا من خلال الخروج من البرنامج
الرد }}}}
تم الشكر بواسطة: عبد العزيز البسكري , Ahmed_Mansoor
#8
طيب اعمل ايه امير بارك الله فيك
بس انا كنت قابلت كود مثل هاذا وكان فى unload_form1 بس مش فاكره خالص
ومش عارف اوصله تانى كان ليه علاقه بالموضوع دا data1.شئ لاست موف ..... مش فاكر صراحه
اعمل ايه
الرد }}}}
تم الشكر بواسطة:
#9
السلام عليكم
هذا مثال تطبيقي كما يجب ان يكون لفرضية الخروج وعدم حفظ السجل الاخير
هناك ملاحظة بالمرفق اقرأها جيداً قبل التنفيذ



.rar   Example.rar (الحجم : 16.82 ك ب / التحميلات : 9)
الرد }}}}
تم الشكر بواسطة: عبد العزيز البسكري , Ahmed_Mansoor


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [vb6.0] كود للإتصال بقاعدة البيانات أكسس محمية بكلمة المرور larbihamri 2 71 24-05-17, 04:54 PM
آخر رد: larbihamri
  [سؤال] كيفية اضافة استعلام وحفظه في قاعدة بيانات أبوسعود 4 101 17-05-17, 02:56 PM
آخر رد: أبوسعود
  [سؤال] معرفة اسماء الجداول الموجودة داخل قاعدة بيانات أبوسعود 5 187 15-05-17, 11:28 PM
آخر رد: Ahmed_Mansoor
  [سؤال] كود اضافة سجلات لجدول موجود في قاعدة بيانات باستخدام الاداة adox أبوسعود 2 82 04-05-17, 03:28 AM
آخر رد: أبوسعود
  ارجو المساعدة في اقرب وقت (حول ملأ الكمبو بوكس من جدول في قاعدة البيانات) larbihamri 6 183 01-05-17, 03:06 PM
آخر رد: mosamosa
  مشكلة في حفظ البيانات عن طريق الليست بوكس مصمم هاوي 3 85 28-04-17, 05:23 AM
آخر رد: Ahmed_Mansoor
  [vb6.0] نقل البيانات من الداتاقريد الى الاكسل larbihamri 18 478 16-04-17, 08:31 PM
آخر رد: larbihamri
  [vb6.0] طريقة ترقيم عمود في الداتا قريد و حل مشكلة الترقيم التلقائي في قاعدة البيانات larbihamri 9 235 16-04-17, 08:28 PM
آخر رد: larbihamri
  [vb6.0] ممكن شرح طريقة ربط في قاعدة بيانات واحدة بجدولين MSHFlexGrid2+MSHFlexGrid1 عبدالقادرعواد 3 110 11-04-17, 06:08 PM
آخر رد: sendbad100
  مشكلة في حفظ البيانات في الجدول مصمم هاوي 3 80 08-04-17, 07:34 AM
آخر رد: مصمم هاوي

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


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