mr.thrwat

السلام عليكم يا استاذ عبدالله هل وجدت حل للمشكلة ؟ ارجو الاهتمام بالرد بالله عليك عندى نفس المشكله و محتاج حل

السلام عليكم ارجو افادتى احتاج صيغة كود لتكرار عملية حفظ فى نفس الجدول بضغطة زر واحدة رجاء التعديل على الكود التالى : Dim strSQL1 As String strSQL1 = ("INSERT INTO opin ( [flatno] ) VALUES('" & Me.Controls("flatno") & "')") CurrentDb.Execute strSQL1, dbFailOnError DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70 Dim strSQL2 As String strSQL2 = ("INSERT INTO opin ( [flatno] ) VALUES('" & Me.Controls("flatno") & "')") CurrentDb.Execute strSQL2, dbFailOnError DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70 Dim strSQL3 As String strSQL3 = ("INSERT INTO opin ( [flatno] ) VALUES('" & Me.Controls("flatno") & "')") CurrentDb.Execute strSQL3, dbFailOnError DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70

الإخوة الكرم أرجو أن أجد لديكم ضالتى مطلوب اخذ نسخة احتياطية جديدة عند الفتح للنموذج بتاريخ اليوم و الحفاظ على حذف جميع النسخ الموجودة فى مجلد backup ماعدا آخر نسختين حسب أقدمية الإنشاء لتعمل على أكسس 2007 و إنشاء زر إستعادة نسخة بمربع حوار center.rar

هل ممكن كود لعمل زر يقوم بتصدير نسخة إحتياطية كل مدة أيام محددة ؟؟؟

اشكرك أخ Shivan Rekany على ردك جزيل الشكر و للتوضيح أكثر كنت أفكر فى عمل زر نسخ احتياطى لحماية قاعدة البيانات اذا اتلفت القاعدة الرئيسية و لكن تذكرت أمر امكانية جعل الجداول فى قاعدة و حفظها فى مكان ما على الهارد و ربطها بالقاعدة الرئيسية و كل الشكر و التقدير لك

سؤال لأهل الخبرة هل عمل قاعدتين مرتبطين واحدة بها الجداول و أخرى بها النماذج و التقارير الخ . يغنى عن النسخ الإحتياطى

السادة الاعضاء الأفاضل أرجو المساعدة فى عمل استعلام للموظفين مستحقى الترقيات طبقا لعدد الشهور أمام كل نوع مؤهل البرنامج الإدارى.rar

و عليكم السلام و رحمة الله و بركاتة .. كلمات الشكر لا توفيك أنا شاكر ليك فضلك انا استخدمت الكود كما ذكرت و بالفعل أوفى بالغرض .. شكرا ليك أخ صالح و ربنا يجعلة فى ميزان حسناتك

السادة الأعضاء الكرام عندى مشكلة فى عمل زر التعديل رجاء الأفادة برنامج تدريبى.rar

السادة الأعضاء الكرام عندما إستخدامت دالة dmax مع حقل رقمى فى الجدول تمت العملية بنجاح و عندما استخدمتها مع حقل نصى لم تعمل بعد رقم 100 فهل من حل لتعمل بشكل كامل و صحيح مع حقل نصى فى الجدول حيث حقل id هو حقل نصى Dim x As Integer x = DMax("id", "customers") Me.id = x

مظبوط كلام حضرتك و المطلوب هو وضع كود فى زر التعديل للتعديل على السجلات التى تعرض فى الحقول

الأخوة الأفاضل بعد البحث عثرت على كود للتعديل على السجلات و جربتة بدلالة حقل نصى و نجحت التجربة لكن المطلوب أن يكون التعديل بدلالة الرقم التلقائى و هو حاليا لا يعمل لذلك ارجو تصحيح كود زر التعديل ليعمل مع الحقل id فى الجدول برنامج تدريبى.rar

ألف شكر لسرعة استجابتك Shivan Rekany و المطلوب هو كود لبرمجة زر يقوم بتعديل البيانات المحفوظة فى الجدول من خلال نموذج حقولة غير منضمة و كل الشكر إهتمامك

السادة الأعضاء الكرام أرجو المساعدة فى كتابة كود لزر يقوم بحفظ التعديلات على السجلات مع العلم أننى قمت بكتابة كود زر الحفظ بهذا الشكل 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