safaa salem5

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

متشكره لحضرتك بس لسه فيه اشياء بسيطه اول حاجه قيمة الدقايق اللى هنكتبها تفضل زى ماهى ماتقلش مع الوقت تانى حاجه لما اسيب قيمة الدقايق فاضيه تخرج رساله ادخل عدد الدقائق المطلوبه تالت حاجه فى -01 بيظهر ياريت حضرتك تمنع ظهوره ولما يخلص التايمر ويعد الوقت المطلوب تخرج رساله( انتهى العد لتحليل cross Matching) كما فى المثال والفيلد يتلون بلون احمر بعد انتهاء العد مش اثناء العد او اى لون مخالف اخيرا هبعت لحضرتك ملف صوت بصيغة wave test.rar

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

هتلاقى نفس الحقل موجود بنفس الاسم

عايزه لما اكتب رقم فى المربع الاحمر يبدأ يعد من الرقم لغاية مايوصل للصفر وبعدين يدينى alarm الرقم هيكون بالدقايق بمجرد الضغط على زرار start لو المربع فاضى يديى رساله برجاء اختيار عدد الدقايق ولو كومبوبكس الخاص بالتحاليل فاضى يدينى رساله برجاء اختيار التحليل المراد ظبط التايمر له الضغط على زار reset يصفر العداد stopwatch.accdb

من فضلك عايزه انقل ال tcode من الفورم اللى انا واقفه فيه للفورم الجديد

عندى كومبوبوكس وزرار هيفتح فورم عايزه الزرار يفتح فى حالة اختيار قيمه معينه من الكومبوبوكس ومايفتحش فى حالة اختيار قيمه اخرى ويدينى رساله قم بادخال قيمه صحيحه lab.rar

استاذ عمر هو كدا لو حد عنده الأوفيس عربى هيبقى فى مشكله ازاى احلها

تمام اشتغلت

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

عندى فورم اسمه reservation_frm فيه اتنين كومبوبوكس الاول اسمه account مصدره قيم ثابته فى row source وهى القيم التاليه "فردي";"تعاقد";"مجاني";"مختبر خارجى" والتانى اسمه contract مصدره هيكون متغير بناء على الكومبوبوكس الاول وعندي فيلد اسمه discount بالمختصر عايزه عند اختياركلمة(تعاقد) من الكومبوبكس الاول قيم الكومبوبوكس الثانى تأتى من جدول التعاقدات اللى اسمه contract_price_tbl contract_price_tbl code contract discount 1 نقابة الصياده 20 2 نقابة الاطباء 15 للاختيار منها وعند اختيار اى قيمه منها فى الحاله دى الخصم الموجود فى الفورم= الخصم فى الجدول discount=discount وبعدها يتم عدم تمكين فيلد الخصم فى الفورم لعدم التعديل عليه ---------------------------------------------------------------------------------------- فى الحاله التانيه عند اختياركلمة(مختبر خارجى) من الكومبوبوكس الاول مصدر بيانات الكومبوبوكس الثانى يأتى من جدول اخر اسمه out_tbl code out 1 معمل رويال 2 معمل العصافره ---------------------------------------------------------------------------------- وعند اختيار كلمة (مجانى) فى الحاله دى عايزه كلمة بدون تعاقد تظهر فى الكومبوبوكس الثانى 100= ويكون الخصم فى الفورم وبعدها يتم تمكين فيلد الخصم فى الفورم لاحتمالية التعديل عليه ------------------------------------------------------------------------------ (عند اختيار كلمة (فردى فى الحاله دى عايزه كلمة بدون تعاقد تظهر فى الكومبوبوكس الثانى 0= ويكون الخصم فى الفورم وبعدها يتم تمكين فيلد الخصم فى الفورم لاحتمالية التعديل عليه 2 combobox.rar

زبطت بس ولو عند حضرتك حل اخر ياريت تطرحه لينا

لمنعه ترك الحقل فارغ تبقى كدا صح If WordCount(fullName) < 1 Then MsgBox "برجاء كتابة الاسم.", vbExclamation, "تحذير" Cancel = True End

Private Sub pname_BeforeUpdate(Cancel As Integer) If DLookup("[full_name]", "[settings_general_tbl]", "-1") Then Dim fullName As String fullName = Nz(Me![pname].Value, "") ' فحص إذا كانت الكلمات أقل من ثلاثة If WordCount(fullName) < 3 Then MsgBox "برجاء كتابة الاسم كاملاً.", vbExclamation, "تحذير" Cancel = True End If Else End If End Sub عايزه بس امنع انه يترك حقل الاسم فارغ فى حالة لو سمحنا بكتابة جزأ من الاسم

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

الملف دا شغال كويس بس انا عايزه احطله الشروط قبل ماينفذ

بيدينى خطأ على كلمةwordcount لو ممكن تطبيقها عالملف مش مهم عندى اوى الاسماء المركبه

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

اعتقد ممكن تتعمل كدا DLookUp("[full_name]","[settings_general_tbl]") لو القيمه -1 يمنع الفكره ان عندى اعدادات كتيره مجمعاها مع بعض فى فورم واحد بالشكل دا

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

بص انا هشرح لحضرتك بتفاصيل اكتر عندى حقل اسمه pname فى فورم اسمه reservation_frm مصدره جدول اسمه reservation_tbl عايزه اول ما اكتب الاسم فى حقل pname يشوف القيمه اللى فى حقل زرار الاوبشن اللى اسمه full_name اللى موجود فى فورم اسمه settings_general_frm اللى مصدره جدول اسمه settings_general_tbl لو بتساوى-1 فى الحاله دى تخرج رساله برجاء كتابة الاسم ثلاثى ولو القيمه بتساوى صفر فى الحاله دى يسمح بكتابة اى مقطع من الاسم وعدم السماح له بتركه فارغا نفس الكلام بالنسبه للموبايل اتمنى اكون قدرت اوصلك طلبى وعاجزه عن الشكر

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

ماشى ماتزعلش انا والله حاطه ملف البرنامج مع الصور

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