رمهان

سؤال رائع اخي عصام وفكرة رائعة ابا خليل هنا يظهر استفسار : ماهو السيناريو المتبع في بيئة تعدد المستخدمين : هل بوضع القاعدة على مجلد مشاركة على السيرفر ام تقسيم القاعدة الى جداول على السيرفر وواجهات على اجهزة المستخدمين ؟ بالتوفيق

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

الفقرة 2) : لاحظ الحدث بعد التحديدث للعنصر صلة القرابة وكاتالي : Private Sub RelShips_ID_AfterUpdate() If RelShips_ID.ListIndex = 0 Then Me.STUFa_Name = Right(Me.Parent!STU_Name, Len(Me.Parent!STU_Name) - InStr(1, Me.Parent!STU_Name, " ")) Else Me.STUFa_Name = "" End If Me.STUFa_Name.Enabled = (Me.RelShips_ID.ListIndex <> 0) End Sub وهناك حدث للنموذج وعند الحدث الحالي وكاتالي : Private Sub Form_Current() Me.STUFa_Name.Enabled = (Me.RelShips_ID.ListIndex <> 0) End Sub وذلك لضمان الحماية عند التقل بين السجلات بالتوفيق

ساذكر لك طريقة سهلة : اذهب لخصائص مربع التحرير والسرد ومن تبويب بيانات وعند الخاصية "نموذج تحرير عناصرالقائمة" اختر النموذج school واعرض النموذج وافتح الكمبو بكس ستجد ايقونة في اخر القائمة لفتح النموذج وعند العودة ستجد البيانات الجديدة !! وهنا لا داعي لزر الامر اضافة بالتوفيق ونتابع الفقرة 2)

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

اهلا بك اخينا كوماندير مالفائدة من ما طلبت ؟ حيث لم تظهر لي ونريد ان نستفيد ! بوجهة نظري انه العكس : عندما تنتقل بين السجلات سيظهر العملاء في القائمة وحسب التاريخ وبالنقر على العميل في القائمة يظهر العميل في النموذج ! هذا ولك ماطلبت باذن الله لاحقا وبعد معرفة الفائدة ولكن بتظليل العنصر وليس بتغيير تنسيقه ؟ لانه هناك تحدي في تنسيق عنصر القائمة في الاكسس فما بالك في احد صفوف القائمة !!!! تحياتي

مشاركة مع اخي سلمان مشكورا يمكن استبدال سطر الاستاذ سلمان بالتالي Forms![الأقسام]![عنصر_تحكم_علامة_جدولة1].Value = 2 وحسب تسلسل الصفحة في علامة الجدولة وبغض النظر عن الاسم ! وهناك طريقة فكرة اخرى تم تطبيقها على المرفق ! حيث : 1. تم وضع قيم لخاصية tag او علامة بالعربي لازرار الامر 2. تم وضع حدث عند التحميل للنموذج ومعرفة القيمة الممررة بالتوفيق مثال عن المكتبة.rar

وكل عام وانتم بخير

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

خليك ضاغط على الشفت اثناء الفتح سيتم فتح القاعدة ! كما تم حذف النموذج لعدم الحاجة ! ExchangeDb.rar

هدية جميلة من انسان جميل ! تحياتي ابا احمد

اتوقع ان مكان الموضوع هو اعلانات الاعضاء والله اعلم !

ماهو محتوى الرساله ! الحل موجود بالاستعلام !

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

معناته ليس هناك داعي لوجود حقل بالجدول بل يمكن ان يكون محسوب ! تفضلو المرفق والاستعلام رمهان ExchangeDb.rar

اهاه !! ممكن مش موجودة في 2003 ! مش فاكر والله يادكتور !

سؤال سريع : لو تم حذف احد السجلات .. هل سيتم الاحتفاظ بالتكويد السابق ام سيتم اعادة التكويد ؟؟

هل اللغة عندك عربي ام انجليش ؟ وماهو اصدار الاوفيس لديك ؟ تاكد ان الخصائص هي للتقرير وليس للتفصيل او لاي عنصر اخر ! ومن نافذة الخصائص ومن تبويب حدث - عند مفتاح للاسفل - مفتاح المعاينة بالتوفيق

جرب تعديل الكود الى Set rs = CurrentDb.OpenRecordset("SELECT DISTINCT data.pname, data.ID FROM data INNER JOIN test ON data.ID = test.id WHERE test.test='" & fld & "' and pdate between #" & Forms!main!FROM & "# and #" & Forms!main!TO & "#"): rs.MoveFirst بالتوفيق

اهلا بك ابو زياد هل ممكن ارفاق ملفك الاكسس للتطبيق عليه ؟ بالتوفيق

بعد اذن الاستاذ مارد اعجبني السؤال فتطفلت والسؤال الان اخ مسن : ماهي الاختلافات التي في بالك ؟ مثلا : لون خلفية النموذج - ام ظهور عناصر واختفاء الاخرى - وحبذا وضع مثال كسيناريو : مثلا تقول لدي شاشة الموظفين اذا دخل المستخدم مارد يظهر كذا وكذا وبالشكل كذا واذا دخل المستخدم رمهان يظهر كذا وكذا وبالشكل كذا .. الخ تحياتي

بارك الله فيك اخ عيسى ولك اجمل التحايا !

مشكور على تجاوبك وستجد ماتريد ان شاء الله

عزيزي 1. اذهب الى خصائص مربع النص sum ومن نافذة بيانات ومن خاصية مصدر عنصر التحكم >> اختر tot 2. من خصائص النموذج ومن نافذة حدث قبل التحديث ضع الكود التالي : sum = a + b + c سيصبح شكل الكود كاملا : Private Sub Form_BeforeUpdate(Cancel As Integer) sum = a + b + c End Sub مع التنبيه على : 1. تسمية العنصر sum مخالف فهو كلمة محجوزة ولاسم دالة ! 2. ليس حبذا وضع الحقل المحسوب في الجداول وانما في الاستعلامات والنماذج والتقارير بالتوفيق

انظريادكتور مشاركة الاخ شادي وبالتحديد رقم 6 فهي لما طلبت ! بالتوفيق