sandanet

طبعا ممكن كالتالي: Dim strComputer As String Dim XobjWMI As Object Dim XFolders As Object Dim fs As Object Dim objFolder As Object Dim myfile As String strComputer = "." Set XobjWMI = GetObject("winmgmts:" & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2") Set XFolders = XobjWMI.ExecQuery("select * from Win32_Directory where Name Like '%:\\%'") For Each objFolder In XFolders Set fs = CreateObject("Scripting.FileSystemObject") If fs.FileExists(objFolder.Name & "\test.mdb") = True Then myfile = objFolder.Name & "\test.mdb" Exit For End If Next الكود السابق يستخدم للعثور على مسار ملف ما مثلا (test.mdb) على الكمبيوتر باستخدام Windows Management Instrumentation (WMI) و FileSystemObject. بامكانك عمل فورم فيه خانة بحث ووضع الكود السابق في حدث بعد التحديث واستبدل الاسم test.mdb باسم مربع البحث مثلا me.search لكي يتم اخذ اسم الملف المراد البحث عنه من خانة البحث.

كيف يتم استخدام الملف فهو غير معروف الصيغة

انت من اي دولة؟

أخي العزيز لايمكن اعطائك نصيحة في غير محلها مالم تحدد مجال اهتماماتك فلكل لغة برمجة مجال معين مخصصه له

الملف السابق هو ملف تنفيذي يلغي رسائل الأمان الخاصة بالاكسس لكن لا أعلم ما اذا كان فعال مع الاصدارات الحديثة ام لا لكنه فعال مع الاصدارات 2007 و 2010

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

اخي العزيز باختصار ان كنت لاتجد فرقاً يستحق ذكره فهذا لايعني ان لايوجد فرق بل قد تكون تجهله .. اما بالنسبة لنقل الموضوع الى العام فهو لابد ان يتم لان الموضوع لايحتوي الا على نقاش وجدل عقيم. وفي الاخير اتمنى ان يحترم الجميع قوانين المنتدى ومشرفيه في اتخاذهم للقرارات فمن دونهم يصبح المنتدى فوضى كما اتمنى ان لا تحاول فرض رأيك على الأغلبية التي ترى عكس ماتفضلت .. وبإمكانك طرح الموضوع على القسم العام والنظر الى آراء الجمهور هناك فبالتأكد سيتفاعل معه اعضاء من أقسام أخرى وقد تجد الكثير من المؤيدين لرأيك. تحياتي

اخي الكريم اولاً موضوعك هذا لاينتمي الى قسم الاكسس فقط بل هو عام وينطبق على جميع الاقسام لذلك لابد من ان ينقل الى القسم العام ثانياً ان كنت تحتج على احد قوانين المنتدى فهذا لا يعني انه يجب ان يتغير فهنالك الاف غيرك موافقين عليه بل ويرونه هو الحل الصائب والأمثل ولو انه تم اخذ رغبات كل عضو بما يشتهي لفسدت المنتديات ثالثاً اقفال الموضوع لايعد جحود بحق صاحبها وانما لكون ان الموضوع اصبح قديما جداً ولا حاجة لاستمرار النقاش فيه ..بل قد تجد مواضيع مشابهة له بتاريخ احدث وبتقنيات متطورة اكثر .. ولا ارى اي مشكلة في ان تفتح موضوع جديد يشير الى موضوع قديم ان كنت تود الاستمرار في موضوع ما.. على العموم الجحود وطمس الجهود يكون حاصل عند حذف موضوع قيم من المنتدى وهذا لن تجده هنا. رابعاً بالنسبة لي كعضو في هذا المنتدى منذ مدة طويلة فاني دائماً ما أرى تنبيه للعضو قبل إقفال اي موضوع مخالف أو قديم ولم اجد عكس ذلك ابداً وهذا يدل على إلتزام المشرفين على تطبيق النظام بحذافيره .. كما ان ترك الموضوع مفتوح والاكتفاء بحذف المشاركات الجديدة لا اجد من وراءه منفعة تذكر فترك الموضوع مفتوح يعني موافقة ضمنية باستمرار قبول التعليقات والمناقشات عليه وهذا بالطبع هو عكس الغالية من وراء حذف المشاركات الجديدة فيه. بالنسبة للشكر والثناء فيكفي انك تستطيع استعمال ازرار الشكر والتقدير اسفل كل مشاركة وهي بالتأكيد ترفع من تقييم صاحب الموضوع اكثر من ترك تعليق اما ابداء ملاحظات جوهرية على موضوع قديم جدا له 10 سنين او اكثر فهو غير مجدي وان كان صحيح فيكفي ان تعرف ان التقنيات المستعملة قد اصبحت قديمة ولابد من مواكبة التطور ولو رأيت انك بحاجة الى استيضاح أمر ما أو هنالك أمر هام جداً فبإمكانك مراسلة صاحب الموضوع على الخاص أو مراسلة احد المشرفين بهذا الخصوص .. فنحن كأعضاء لانرغب برؤية مواضيع قديمة جدا تعود الى واجهة المواضيع بسبب تعليق ما لايغني ولايسمن من جوع. اتمنى ان تكون وجهة نظري واضحة لك .. تحياتي

تفضل .. الرقم 1 اجعله 0 فقط

تفضل .. لكن اظن ان الرقم 11.3333 يجبر الى 11 لانه أقل من 11.5 اما الرقم الاعلى من 11.5 فيجبر الى 12 وهكذا sandanet1.mdb

اخي انصحك بتغيير عنوان الموضوع فورا لانه مخالف لقوانين المنتدى وسيتم إغلاق موضوعك ولن تستفيد شيء .. كما انصحك بوضع مرفق للعمل عليه فالصورة لاتفي بالغرض تحياتي

السلام عليكم ورحمة الله وبركاته تحية طيبة لأساتذتي واخوتي الأفاضل من خلال بحثي عن طريقة ما لاستخراج النماذج والتقارير من ملف mde وجدت هذا البرنامج وهو مفتوح المصدر واعتقد انه يحتاج الى بعض التعديلات لكي يعمل بالشكل الصحيح... ارفقه لكم للتجربة ارجو ممن لديه طريقة او برنامج آخر لاستخراج النماذج والتقارير من ملف mde ان لايبخل علينا به تحياتي mdex.zip

تفضل C.accdb

متابع بصمت 🤐

تفضل أخي الكريم تجريبي.accdb