أخواني أعضاء المنتدى الرائع
قمت بعمل قاعدة بيانات خاصة بمهام التدريب والعمل.
لكن مأريده هو عند أدخال مهمة عمل أو تدريب جديدة أريد عند وضع الرقم الوظيفي للموظف يقوم النموذج تلقائياً بإظهار أسم الموظف ومسمى الوظيفة والدائرة التابع له الموظف وانا أقوم بأدخال المعلومات الاخرى بخصوص هذه المهمة أو تدريب
فهل من كود معين أو طريقة معينة تفيدوني به أو مثال
جزاكم الله ألف خير
بارك الله في من يعلم ويتعلم
أخي الكريم
أرفق مثال ليتم التعديل عليه إن شاء الله .
بالتوفيق،،،
مرفق أخي مثال به تصور مبدئي عن المطلوب كما فهمت
والقاعدة بها ثلاثة جداول منهم أثنان اساسيان (الموظفين - المهام) وجدول للمتغيرات (التدريب)
وتم تصميم نموذج كما اردت لإدخال البيانات باقل مجهود
تحياتي
اشكرك أخي excellent على الرد
ولكن ما طلبته يختلف عن المثال المرفق منكم بأنه ليس مربع سرد وانما مجرد انا اضع في رقم الوظيفي وأقوم بعمل enter سوف يخرج المعلومات الخاصة بالموظف في نفس النموذج وليس نموذج فرعي أو تختار الرقم الوظيفي وانما تلقائيا دون اختيار مجرد كتابة الرقم الوظيفي تظهر معلوماته تلقائياً
أـمنى من أحد المساعدة وشكراً
عزيزى الامر بسيط جدا
ابحث فى المنتدى عن الداله dlookup وستجد ما يسرك باذن الله
بارك الله فيك أخي كارم
هل تشفي القلب بمثال
اتفضل
هذا مثال كنت اتعلم عليه بلغة الاستعلامات SQL على الرابط التالى لغة الإستفسارات البنيوية SQL
بالتوفيق
طالب علم مبتدىء كتب:
اتفضل
هذا مثال كنت اتعلم عليه بلغة الاستعلامات SQL على الرابط التالى لغة الإستفسارات البنيوية SQL
بالتوفيق
أخي اشكرك على المشاركة لكن؟؟
هل بالامكان استخدام نفس الطريقة على الاكسس
محمد الجوهر كتب:أخي اشكرك على المشاركة لكن؟؟
هل بالامكان استخدام نفس الطريقة على الاكسس
اخى الكريم
يبدو من سؤالك انك لم تطلع على المرفقات
المرفق هو قاعدة بيانات اكسيس والشرح على الرابط بالاعلى مع المرفقات
تمنياتى لك وللجميع بالتوفيق
كارم محمود بدوى كتب:عزيزى اسف على التاخير لكنى كنت مشغول جدا
تفضل ان شاء الله تجد ماتريد
شكراً للجميع
وشكراً على استجابتكم
وجمعنا الله معكم في جنات النعيم
أخي طالب علم (لقد قمت بالاطلاع على الملف مسبقاً لكن طريقة سؤالي لم تكن واضحة لك وأعتذر لك لعدم الايضاح بارك الله لك فيما أعطاك ووهبك الله نصيباً لك ولأهلك من قيام الليل بإذن الله أمييين امييين)
تم ايجاد الحل
وهو في الكود هذا
Private Sub BadgeNumber_AfterUpdate()
Dim rs As Object
Set rs = Me.Recordset.Clone
rs.FindFirst "[badgeNumber] = " & Str(Nz(Me![badgeNumber], 0))
If Not rs.EOF Then Me.Bookmark = rs.Bookmark
تم تعديل هذه المشاركة بواسطة محمد الجوهر في 11 فبراير 2012 في 08:04
محمد الجوهر كتب:شكراً للجميع
وشكراً على استجابتكم
وجمعنا الله معكم في جنات النعيم
أخي طالب علم (لقد قمت بالاطلاع على الملف مسبقاً لكن طريقة سؤالي لم تكن واضحة لك وأعتذر لك لعدم الايضاح بارك الله لك فيما أعطاك ووهبك الله نصيباً لك ولأهلك من قيام الليل بإذن الله أمييين امييين)
تم ايجاد الحل
وهو في الكود هذا
Private Sub BadgeNumber_AfterUpdate()
Dim rs As Object
Set rs = Me.Recordset.Clone
rs.FindFirst "[badgeNumber] = " & Str(Nz(Me![badgeNumber], 0))
If Not rs.EOF Then Me.Bookmark = rs.Bookmark
هل من مساعدة الكود الموجود مثل عملية البحث حيث لا يمكن استخدامه في حين انشأت سجل جديد ووضعت الرقم الوظيفي فأن المعلومات ستظر سجل قديم ولا يمكن إنشاء جديد وتعبئة معلومات جديدة وأنما سوف يكتب على القديم
هل من حل ؟؟؟؟؟
اخى الكريم بارك الله فيك
هذا الكود يستخدم لعملية البحث ولكنك تريد اضافة بيانات هذا مافهمته منك
فقد ارسلت اليك مرفق به جدولين الجدول الاول اسمه personal ويحتوى على المعلومات للموظفين
والجدول الاخر اسمه data وهو ماستقوم انت بتعبئته عند ادخال رقم الموظف حيث سياتى بالبيانات من جدول personal
هذه هى الطريقه المتبعه فى مثل هذه الحالات
ارجو ان اكون فهمت ما تريد واجبت عليه
المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية
جارٍ التحقق من المتواجدين…
