figo82eg

أشكرك اخى الكريم ممكن تفسير Me.Combo28.Column(1) ماهو Column(1)

أشكرك اخى الكريم على المساعدة وجعله الله فى ميزان حسناتك ولكن هل استطيع طلب مساعدة أخر حيث اريد انشاء فولدرات بناء على اختيار من لستة متغيرة وليس ثابتة ومرفق مثال New Microsoft Office Access Application.zip

ارجو المساعدة فى حل هذه المشكلة حيث أريد إنشاء فولدرات بناء على حقول معينة فى نموذج أرشيف صادر ووارد ومرفق مثال New Microsoft Office Access Application (2).zip

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

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

ارجو المساعدة فى المثال الأتى حيث أريد غلق حقل فى نموذج بناء على بيانات يتم كتابتها فى حقل أخر بنفس النموذج ومرفق مثال للتوضيح New Microsoft Office Access Application.zip

لدى نموذج به خانة رقم وأريد عند ادخال الرقم مكرر تظهر رسالة بأن الرقم مكرر وإستخدم الكود التالى ولكن عند وضع القاعدة على سيرفر تكون قاعدة البيانات ثقيلة جدا فارجو المساعدة فى تعديل الكود Private Sub crn_BeforeUpdate(Cancel As Integer) WriteAuditUpdate txtTableName, Me.crn, "crn", Me.crn.OldValue, Me.crn.Value If Not IsNull(DLookup("[crn]", "BASIC_DATE", "[crn]= '" & Me![crn] & "'")) Then MsgBox "الرقم" & Me![crn] & " سبق إدخاله! يرجى إدخال رقم أخر.", vbOKOnly, "الرقم مستخدم" DoCmd.CancelEvent End If End Sub

هل يمكن ان تكون هذه الواجهات بصيغة ٢٠٠٣ لأن برنامجى مصمم بأكسس ٢٠٠٣

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

بارك الله فيكم أساتذتى الكرام @د.كاف يار@أبو إبراهيم الغامدي على تنوع الإجابات والحلول وهذا ما تعودنا عليه فى هذا المنتدى العظيم دائماً جزاكم الله عنا كل خير وجعله فى ميزان حسناتكم

مرفق مثال لما أريد New folder (2).rar

الملفات محفوظة داخل فولدر مع البرنامج اسمه كونتاكت كما هو موضح بالكود المرفق

ارجو المساعدة فى تنفيذ هذه الفكره من حيث التعديل على هذا الكود حيث لدى ملفات محفوظة بصيغة بى دي اف لمجموعة من العملاء وكل عميل ممكن ان يظهر له أكثر من ملف محفوظ بنفس الصيغة مثال الملفات المحفوظ لدى أسمه : حسام حسام ( 2 ) حسام ( 3 ) ما اريده هو عند الضغط على الحقل دبل كليك يفتح جميع ملفات حسام وليس ملف حسام فقط Private Sub CRN_DblClick(Cancel As Integer) File_Path = Application.CurrentProject.Path & "\CONTACT\" File_Name = Me.crn & ".pdf" Name_Path = File_Path & File_Name If Dir(Name_Path) <> "" Then Application.FollowHyperlink Name_Path Else MsgBox "المستندات غير محفوظة" End If End Sub

بارك الله فيك اخى الكريم هو المطلوب فعلا

ارجو المساعدة فى التعديل على الكود المرفق حيث اقوم بالضغط على حقل دبل كليك يظهر لدى الملف المحفوظ فى الفولدر المحدد بالكود فى نفس مسار البرنامج ( NEW FOLDER ) ولكن المشكلة أنى أريد عند الضغط دبل كليك يقوم بالبحث فى أكثر من فولدر وليكن أسمه فهل يوجد تعديل للكود ليبحث فى المسارين فى وقت واحد Private Sub CRN_DblClick(Cancel As Integer) File_Path = Application.CurrentProject.Path & "\CONTACT\" File_Path = Application.CurrentProject.Path & "\NEW FOLDER\" File_Name = Me.crn & ".pdf" Name_Path = File_Path & File_Name If Dir(Name_Path) <> "" Then Application.FollowHyperlink Name_Path Else MsgBox "المستندات غير محفوظة" End If End Sub

بارك الله فيك أخى الكريم هو المطلوب فعلاجزالك الله عنا خير إن شاء الله

الرقم المدخل ثابت حيث ان الحقل الرئيسى وهو حقل ١٦ رقم والحقل المراد التعديل اليه ثابت ايضا ١٣ رقم بمعنى الرقم الذى سيتم كتابته هو : ٠٤٠١٢٥٢٥٢٦٢٧٢٨٠٠ :سيتحول بمجرد الخروج من الحقل ليكتب فى الحقل المطلوب التحديث به الى ٠٤٠١٢٥٢٦٢٧٠٢٨

فعلا اخى الكريم الأكسس عملها لو حضرتك ضغط على الماكرو الموجود ستجد أنه قام بتشغيل 4 إستعلامات الإلحاق ونتج عنه المطلوب فعلا ولكن ما اريده هو تنفيذ الإستعلامات دون الحاجة الى الضغط على الماكرو بمجرد الإنتهاء من كتابة الكود المطاوب يتحول الى التعديل الذى اريده تم تحديث المطلوب ليكون واضح أكثر تعديل.mdb

ارجو المساعدة

ارجو المساعدة فى تنفيذ فكرتى حيث أريد تشغيل ماكروا تلقائى بعد الإنتقال من حقل بالنموذج الى حقل جديد بنفس النموذج دون التعديل على الحقل الأصلى ومرفق مثال لما اريد للمساعدة تعديل.mdb

هل يمكن المثال السابق بصيغة ٢٠٠٣

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

هو فعلاً ما اريده ولكن أسماء الملفات تظهر بإمتدادها فهل يوجد امكانية للتنفيذ دون ظهور امتداد الملفات الموجودة بالفولدر بمعنى إسم الملف فقط دون إمتداده

اشكرك اخى الكريم على اهتمامك وردك وارفق اليك ما اريده حيث ان مشكلة الملف السابق انه لابد ان يكون الجدول به ارقام الملفات سابقة والمشكلة لدى ان الفولدر بها الاف من ملف واريده سحب اسمائها تلقائى داخل الجدول emp5.rar

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