adnan gharbi

السلام عليكم
كل عام وأنتم بخير أعاده الله عليكم باليمن والخير والبركة

أرجو المساعدة من الأخوة الأفاضل
لدي قاعدة بيانات من ثلاثة جداول: جدول (EmpsTable ) لتخزين أسماء الموظفين، جدول (SitesTable) لتخزين أسماء الموقع، وجدول (TransTable) لتسجيل بيانات انتقال الموظفين بين المواقع الثلاثة
المطلوب عمل استعلام لإظهار اسماء الموظفين وأسماء المواقع التي تم انتقالهم اليها (اسماء المواقع وليس أرقام المواقع)
مع ربط العلاقة المناسبة بين الجداول الثلاثة
مع الشكر والتقدير للجميع 

EmpsDB.accdb

30 دقائق مضت, Eng.Qassim said:

لم اضع معيار التاريخ حتى ترى كل اعمال الصيانة واخر تاريخ للصيانة

 

machinesDB.rar 31.85 kB · 2 downloads

شكرا لك استاذ قاسم بارك الله فيك 

6 دقائق مضت, Eng.Qassim said:

وعليكم السلام ..احذف الحقل الاول من FixDate فهذا يعيد اليك جميع التواريخ

وابقي على الثاني الذي يحمل معيار Max

شكرا لك لكن ليس هذا المطلوب اخي.

المطلوب اظهار جميع اعمال الصيانة التي تمت على هذه السيارة لهذا اليوم (أو لأي تاريخ) مع اظهار آخر عملية صيانة تمت عليها (لنفس نوع الصيانة).
مثلا السيارة المرقمة A-01 تم اليوم تسجيل الصيانة B_23 اريد اظهار آخر مرة تم تسجيل هذه الصيانة عليها
لغرض المقارنة ومعرفة كم يوم مضى منذ آخر صيانة من نفس النوع

السلام عليكم

في قاعدة البيانات المرفقة توجد ثلاث جداول الأول لأرقام المركبات والثاني لأنواع الصيانة والثالث لعمليات تسجيل الصيانة.

الرجاء من الاخوة الأفاضل المساعدة في تصميم استعلام لإظهار ارقام المركبات والصيانات التي تمت عليها (لتاريخ معين) مع إظهار آخر مرة تم تسجيل هذا النوع من الصيانة لكل مركبة

مع التقدير للجميع

machinesDB.accdb

2 ساعات مضت, Moosak said:

وعليكم السلام ورحمة الله وبركاته أخي عدنان 🙂 

تفضل .. ( أضفت عمود الوظيفة للقائمة المنسدلة ثم جعلت مصدر مربع النص هو العمود الثاني للقائمة المنسدلة)

 

test (5).accdb 448 kB · 3 downloads

جزاك الله خيرا استاذي الفاضل، هو هذا المطلوب بالضبط

السلام عليكم ورحمة الله

طلب بسيط من اعضاء المنتدى الكرام 

وهو كما في الملف المرفق اريد عندما اختار اسم الموظف أن يظهر عنوانه الوظيفي في التيكست بوكس الخاص بالعنوان الوظيفي وكذلك الحال مع العمر يظهر في التيسكت بوكس الخاص بالعمر

مع الشكر والتقدير للجميع مقدما

test.accdb

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

تحديد الفئة العمرية صحيح يحدد يدوي لكن لا أقصد في لحظة تسجيل بيانات التحليل

وانما اقصد تحدد سلفا في جدول في قاعدة البيانات علشان لما المستخدم يدخل رقم المريض ويحدد التحليل راح البرنامج يطلع  النسبة الطبييعة الصحيحة لهذا التحليل ولهذا المريض تلقائيا بدون تدخل المستخدم ولذلك انا اريد عمل ذلك في قاعدة البيانات سلفا.

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

وعليكم السلام ورحمة الله

1- متروك لتحديد المستخدم يدوي اخي الكريم

2- المقصود ان القيمة الطبيعية للتحليل تعتمد على الفئة العمرية للمريض والفئة العمرية للمريض غير ثابتة لكل التحاليل فمثلا هناك تحليل يعتبر ان المريض بعمر 10 سنوات طفل لكن تحليل آخر يعتبر ان المريض بعمر 10 سنوات بالغ.  

شكرا لك اخي الكريم

بالنسبة لعمل حقل check box هو يعتبر حل لكن حضرتك عارف التحاليل كثيرة ومتشعبة وليس شرطا ان كل التحاليل تتفق في تحديد عمر معين للطفل او للبالغ لذلك اتصور ان الموضوع يحتاج تصميم معين لقاعدة البيانات بحيث يصبح للمستخدم الحرية في تحديد التحاليل وقيمها الطبيعية استنادا الى الفئة العمرية مع اعتبار ان الفئة العمرية تختلف بين تحليل وآخر.

اما موضوع النموذج اخي الكريم فهو يكون مرتبط بجدول وهذا الجدول غير موجود لذلك لم اقم بإضافة نموذج للتصميم لكن ارفقت صورة معبرة نوعا ما عن المطلوب

مع تحياتي

السلام عليكم

لدي قاعدة بيانات لمختبر تحليلات مرضية فيها حاليا ثلاث جداول

جدول المرضى وجدول الفئات العمرية وجدول التحاليل

الداتا بيز في الملف المضغوط وتوجد صورة توضيحية للمشكلة التي اعاني منها في تصميم هذه الداتا بيز

لكل تحليل قيمة طبيعية لكل فئة عمرية فمثلا التحليل رقم 1 تكون قيمته الطبيعية مثلا (10 - 20) في حال كان المريض ذكر طفل وتكون أكثر او اقل في حال كان المريض ذكر بالغ. المشكلة هي ان مفهوم او مصطلح ذكر طفل او ذكر بالغ او انثى طفل او انثى بالغة ليس مشروطا بالعمر فقط لأن بعض التحاليل تعتبر أن المريض الذي عمره 10 سنوات هو بالغ بينما تحاليل اخرى تعتبر ان المريض الذي عمره عشر سنوات هو لا يزال طفل وطبعا كما قلت أن القيم الطبيعية للاختبار تختلف باختلاف الفئة العمرية للمريض.

ارجو من أساتذتنا الكرام في الموقع فضلا وليس أمرا مساعدتي في إعداد قاعدة البيانات لتحقيق المطلوب وأنا اعلم ان قاعدة البيانات ربما يجب اضافة حقول أو جداول جديدة للربط ولذلك تركتها بصيغتها البسيطة بدون اضافات لكي يكون لهم الحرية المطلقة في اجراء التعديلات المطلوبة

مع شكري وتقديري للجميع

Lab_DB.rar

السلام عليكم جميعا

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

مع الشكر مقدما للجميع

تم ايجاد الحل 

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

السلام عليكم 

لدي جولين الأول جدول الموظفين والثاني جدول مرفقات الموظفين وبينهما علاقة واحد الى متعدد عن طريق حقل كود الموظف

اريد عمل استعلام يظهر كود الموظف، اسم الموظف، عنوان الموظف و (عدد المرفقات الخاصة بهذا الموظف)

استخدمت دالة Count لكن دائما تظهر أخطاء

مع تحياتي للجميع 

28 دقائق مضت, ابو جودي said:

بسيطة للقاعدة الخلفية

=DLookUp("Database","MSysObjects","Type=6 ")

 

أحسنت اخي الكريم ابو جودي طريقة مختصرة ومفيدة

منذ ساعه, Moosak said:

وعليكم السلام ورحمة الله وبركاته .. 🙂 

ضع هذا الكود في موديول :

Public Function BECurrentPath()

    On Error GoTo ErrHandler

    Dim FullLinkedPath As String
    Dim LinkedDBPath As String

    FullLinkedPath = Nz(DFirst("database", "msysobjects", "[Database]<> '""'"), "")
    LinkedDBPath = Left(FullLinkedPath, InStrRev(FullLinkedPath, "\") - 1)

   If FullLinkedPath <> "" Then
    
    BECurrentPath = LinkedDBPath & "\"
    
    Else
    
    BECurrentPath = CurrentProject.Path & "\"
    
    End If

ErrHandler:
    If Err.Number = 0 Then Exit Function Else
    MsgBox "Error Number : " & Err.Number & " :::: " & Err.Description

End Function

ثم أكتب في مصدر بيانات مربع النص :

=BECurrentPath()

 

شكرا لك اخي الكريم هو الكود شغال تمام لكن لا يظهر اسم قاعدة البيانات يظهر المسار فقط فإن أمكن إظهار الاسم ايضا لو تكرمت

12 دقائق مضت, ابو جودي said:

طيب ممكن سؤال اخى الحبيب واستاذى الجليل باش مهندس @Moosak 

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

=[CurrentProject].[Path]

 

هذا الكود يظهر اسم الفرونت اند وليس الباك اند اخي 

السلام عليكم 

كيف يمكن إظهار مسار قاعدة البيانات في تيكست بوكس؟

بمعنى أنا عندي تطبيق متصل بقاعدة بيانات مايكروسوفت أكسس وأريد إظهار مسار قاعدة البيانات في الشاشة الرئيسية للتطبيق، كيف يمكن ذلك؟

مع الشكر 

السلام عليكم

عندي نموذج فرعي مبني على استعلام (من عدة جداول) تظهر فيه عدة سجلات وفيه عمود يتم كتابة القيم فيه يدويا وأريد بعد اكتمال تسجيل القيم أن يتم إدخال جميع البيانات في هذه الجداول دفعة واحدة.

هل توجد طريقة عملية يدلني عليها أحد الأخوة ؟

مع شكري وتقديري للجميع

52 minutes ago, jjafferr said:

كان المفروض اقول :

.

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

 

.

1. نعم قد تحتاج لهذا ، ولكن كل هذا يعتمد على بيانات كل جدول (رجاء قرءة ملاحظتي اعلاه) ،

2. اذا كان نوع حقل تسلسل البيانات "تسلسل تلقائي" ، فيجب عليك ان تعمل حقل جديد من نوع رقم ، ثم تنقل بيانات الحقل السابق الى الحقل الجديد ، واذا كان الحقل القديم "لا يقبل التكرار" فيجب تغييره ليقبل التكرار ، وهكذا ،

3. هناك عدة طرق ، ولكن خلينا بعيد عن التقنية ، فالامر يحتاج الى تدقيق مع كوب قهوة ، لذا :

1. ضبّط جدول واحد في قاعدة بيانات واحدة ، القاعدة رقم 1 ،
2. ثم اعمل ربط لقاعدة البيانات رقم 2 ، واعمل ربط لهذا الجدول من قاعدة البيانات رقم 2 ، وسيعطي اكسس الجدول المربوط ، نفس اسم الجدول القديم متبوعا بالرقم 1 (مثلا tbl_Names1) ،
3. فيكون عندك في قاعدة البيانات رقم 1 ، الجدول المُعدل ، وربط بجدول من قاعدة البيانات 2 ،
4. اعمل استعلام إلحاق ، لتلحق بيانات جدول قاعدة البيانات 2 ، في قاعدة البيانات 1 .

السبب في استعمال هذه الطريقة ، لأنك معتاد على هذا النوع من الربط والاستعلام 🙂

 

جعفر

شكرا جزيلا لك اخي الكريم

1 hour ago, jjafferr said:

وعليكم السلام 🙂

 

يمكنك استيراد جميع الكائنات الى قاعدة بيانات واحدة ، 

ولكن اذا كانت حقول الجداول متشابهة ، ولكن بيانات كل قاعدة بيانات تختلف عن الاخرى ، فالطريقة الصحيحة هي عمل حقل جديد باسم "الموقع" (جميع مسميات كائنات قاعدة البيانات يجب ان تكون بالانجليزية ، حتى يسهل عليك كتابة المعادلات والكودد) ، فتعبئ هذا الحقل لكل قاعدة بيانات (حتى تستطيع ان تميز بيانات قاعدة بيانات عن اخرى) ، ثم تستورد جميع الجداول المتشابهة الى جدول واحد ،

ويكون عندك نموذج الرئيسي لا يتم غلقة ، وفيه تختار "الموقع" ،

وفي الاستعلامات ، اضف لها حقل "الموقع" ، ثم في المعيار اشر الى اختيارك من النموذج الرئيسي.

 

جعفر

شكرا لك استاذ جعفر ..هل تقصد عمل حقل جديد باسم الموقع في كل جدول أم في جدول معين علما ان بعض الجداول فيها تسلسل للبيانات يعني كل جدول معين في قاعدة البياانات رقم 1 مثلا فيه تسلسل للبيانات من 1 الى كذا رقم ونفس الشيء في الجدول المماثل له في قاعدة البيانات رقم 2 فهل سيتم حذف التسلسلات المتشابهة في حال استيراد البيانات؟؟ وسؤال آخر ما هو الكود المناسب لعمل استيراد من عدة قواعد بيانات في قاعدة بيانات واحدة؟

السلام عليكم

كيف يمكن دمج بيانات من عدة قواعد بيانات في قاعدة بيانات موحدة؟

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

مع التقدير للجميع

السلام عليكم

لدي برنامج بالفيجوال بيسك دوت نت وقاعدة بيانات سيكوال سيرفر 

البرنامج يقوم بتخزين ملفات الصور وملفات بي دي اف في قاعدة البيانات وعند تشغيل الفورم تظهر أسماء الصور والملفات في داتا قرد فيو

المطلوب أريد أن تعرض الداتا قرد فيو أسماء ملفات البي دي إف فقط وتتجاهل ملفات الصور

مع التحية

جزاك الله خير هو هذا المطلوب

السلام عليكم

ماسبب ظهور هذه الرسالة كلما افتح قاعدة البيانات هذه

السلام عليكم ورحمة الله

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

Me.FixReportBindingSource.Filter = " FixDate >= '" & dtFrom.Value & "' and FixDate <= '" & dtTo.Value & "'"

11 hours ago, أحمد الفلاحجى said:

اهلا بك اخى ومرحب بعودتك للمشاركه معنا

وخفف عن نفسك وانسى الماضى واستغفر لنفسك ولهم ولا تنسانا بارك الله فيك

وكلنا اخوه فالله قبل كل شىء تجمعنا هنا من اجل هدف واحد وهو ان نتعلم ونستفيد ونفيد اخواننا فى الله بما من الله علينا من فضله وعلمه

بارك الله فيك ومرحبا بعودتك مره اخرى اخى 💐 وتقبل الله منكم صالح الاعمال

ونعود للمشاركه مع اخى @فايز.. و سؤال الاخ @adnan gharbi

انظر المرفق ووافنا بالنتيجه

بالتوفيق

الاستعلام المطلوب.accdb 912 kB · 14 downloads

نعم اخي العزيز @احمد الفلاحجي تم المطلوب بالتمام والكمال والاستعلام اشتغل حتى في الفيجوال بيسك

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

والشكر موصول للأخ @فايز..على جهوده الكبيرة واهتمامه باجابة الاستفسار

ولجميع الاخوة المشاركين

مع خالص تقديري وامتناني