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

مطلوب كود لزر تعديل السجلات المحفوظة

بدأه mr.thrwat في 23 ديسمبر 2016 · 1 رد · 751 مشاهدة · في قواعد بيانات Microsoft Access
كودتعديلسجلاتزر
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

السادة الأعضاء الكرام أرجو المساعدة فى كتابة كود لزر يقوم بحفظ التعديلات على السجلات مع العلم أننى قمت بكتابة كود زر الحفظ بهذا الشكل 

Dim strSQL1 As String
strSQL1 = ("INSERT INTO Employees ( [picfile], [id]) VALUES('" & Me.Controls("ImagePath") & "','" & Me.Controls("id") & "'")
CurrentDb.Execute strSQL1, dbFailOnError
DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70

 

#2

الاستعلام الاجرائي الذي أشرت إليه يستخدم لإلحاق البيانات..

عدل الصيغة إلى استعلام التحديث كما يلي  

Dim strSQL1 As String
strSQL1 = "UPDATE Employees SET [picfile]='" & Me.ImagePath & "', id=" & Me.id & " WHERE id=" & ME.id
CurrentDb.Execute strSQL1, dbFailOnError

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