سهمُ

الأخوة الأفاضل السلام عليكم ورحمة الله وبركاته واجهتنى مشكلة فى استخدام كود فتح الملف عن طريق نافذة فتح الملف والمذكور فى هذا المنتدى فى مشاركة سابقة لأبى هاجر وهى عدم امكانية فتح ملف يحتوى على مسافة أو يوجد داخل مجلد يحتوى على مسافة فمثلاً إذا كان الملف abc.m…

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

الأخوة الأفاضل السلام عليكم ورحمة الله وبركاته وكل عام وأنتم بخير(f)(f)(f) لدى نموذج رئيسى منبثق وعند استخدام أى من أزرار الأوامر الموجودة به يقوم بإخفاءه هذا النموذج وإظهار النموذج أو التقرير المطلوب فتحه وعند إغلاق الجديد يقوم بإظهار النموذج الرئيسى مرة أخرى…

هذا هو المثال الأخ اماراتى سأحاول البحث check.zip

الأخ الفاضل أبو وليد آسف للتأخير فى الرد -قم بعمل جدول من حقل واحد وهو رقم التسلسل للأقراص الصلبة المطلوب تشغيل البرنامج عليها - بعدها قم بعمل استعلام من هذا الجدول وضع فى الشرط ما يلى formes![formname].textboxname حيث formname هو اسم النموذج الرئيسى المراد سم…

الأخ الفاضل على لقد توصلت بالفعل للطريقة وهى: - عمل استعلام لجدول ارقام التسلسل لأقراص الأجهزة المراد حمايتها مع وضع شرط مطابقة مع رقم تسلسل القرص الصلب بعد تشغيل النموذج الرئيسى if Dlookup("[Serial]", "Serial", not null) = h.serialnumber then .... Else ....

الأخوة الأفاضل(f) السلام عليكم ورحمة الله السؤال ربما يكون بسيط وقد حاولت البحث عن الجواب داخل المنتدى ولم أجده والموضوع هو أنى أريد حماية قاعدة البيانات عن طريق السيريال للقرص الصلب المركب فيه البرنامج ( والفكرة ذكرها بعض الأخوة فى هذا المنتدى) فأريد أن أضع أ…

السلام عليكم ورحمة الله (f) تحياتى للأخوة الأفاضل مشرفو و رواد هذا المنتدى لا شك أنى استفدت كثيرا من مشاركات الجميع وخاصة أبو هاجر لذا أرشحه كأفضل عضو لهذا الشهر

السلام عليكم أبو هاجر جزاك الله خير:)(f) بالفعل لقد سألت هذا السؤال منذ عدة أيام ولم أجد رداً له

الأخ العزيز أبو هاجر قمت بتحميل الملف ووضعته فى نفس المجلد وقمت باختيار قاعدتى بيانات متماثلتين فظهر هذا رسالة الخطأ object required فى الكود التالى Dim MAAR As String Set AbA = CurrentDb For Each tbl In AbA.TableDefs If tbl.Name Like "MSys*" Then Else DoCmd.D…

الأخوة أبو هاجر و محمد طاهر قمت بتحميل الملف الجديد وسأحاول تجربته :) كانت هناك تساؤلات بالنسبة للملف الأول سأرجها حتى تجربة الملف الجديد تحياتى (gift)

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

أبو هاجر(f)(f)(f) أشكرك على الملف وسأحاول تجربته غداً إن شاء الله

وهذا الكود نص أوتوماتيك ولكنه أفضل من السابق :D Private Sub Import_Click() On Error GoTo Err_Import_Click Dim ofn As OPENFILENAME ofn.lStructSize = Len(ofn) ofn.lpstrFilter = "Mdb Files (*.mdb)" + Chr$(0) + "*.mdb" + Chr$(0) _ + "Mde Files (*.mde)" + Chr$(0) +…

هذا هو الكود والذى يقوم باستيراد الجدول11 ثم إلحاقه بالجدول1 ثم حذف الجدول11 والذى سيتكرر بعدد جداول البيانات يبقى موضوع الآلية:) وسأحاول فيه أيضا من أمثلة الموقى Private Sub Import_Click() On Error GoTo Err_Import_Click DoCmd.TransferDatabase acImport, "Micro…

ربما تفيد هذه الطريقة: أولا استيراد الجداول باستخدام الكود DoCmd.TransferDatabase acImport, "Microsoft Access", _ "C:PAPA318777.mdb", acTable, "table1", "table11" ثانيا استخدام كود الأخ محمد طاهر للإلحاق ثالثا مسح الجدول table11 مع وضع كود لقراءة اسم الملف الم…

أخى الفاضل(f) أشكرك كثيراً على هذا الكود وقد استعملت الكود الثانى بنجاح ولكن :( لنفس قاعدة البيانات . فهل يمكن تعديل الكود لإلحاق البيانات من جدول-1 الموجود فى قاعدة بيانات أخرى إلى جدول-1 الموجود فى قاعدة البيانات الحالية وبالنسبة لربط قاعدتى البيانات ماذا يف…

أخى الفاضل المطلوب فقط دمج جدولين فى قاعدتى بيانات مختلفتين فى البيانات ومتطابقتين فى التصميم لتكون النتيجة جدول فى إحداهما به البيانات الأصلية (مثلاً البيانات من أ-001 وحتى أ-120) بالإضافة إلى البيانات من الجدول الثانى (مثلاً من ب-001 وحتى ب-150 )

الأخ محمد طاهر الأمثلة لا تحتوى على المطلوب فهى تحتوى على اضافة بيانات جديدة غير مرتبطة إلى الجدول المحدد فى قاعدة البيانات الحالية :( أما المطلوب فهو دمج بيانات جدول (أو جداول) متماثلة فى التصميم من قاعدة بيانات أخرى إلى الحالية (أو العكس)

أبوهاجر - محمد طاهر أشكركم على سرعة الرد قمت بتحميل المرفقات وسأقوم بدراستها :)