تامر خليفة

مجهول جميل جدا جدا جدا مشكور اخي الفاضل

نسئل الله العظيم ان يشيفها من مرضها وان يجعله في ميزان حسناتها

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

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

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

دي فكرة مبدئية سريعة لطلبك اخي الفاضل ارجو ان اكون قد اصبت db1.rar

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

عفوا اخي الفاضل لاني لم اشرح الكود وجزي الله الاخ الذي شرح الكود خير الجزاء ملحوظة تامر وليس ثامر

اه طبعا ممكن إن شاء الله واليك الكود Private Sub Form_Activate() TEXT1.SetFocus End Sub حيث TEXT1 هو الحقل المراد تنشيطه مع بدأ تحميل النموذج

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

ارفق الملف وإن شاء الله أقولك علي الحل حسب الملف المرفق

عن طريق خاصية قناع الادخال - حدد نوع كلمة السر

يا رب يكون ده المطلوب db1.rar

بعد اذن اخونا الفاضل صاحب الرد انا عدلت عليه شويه يمكن يكون مفيد لأخونا صاحب السؤال mhmd.rar

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

الرجاء من جميع الاعضاء ابداء الرأي في الحماية وكيفية زيادة الحماية للمرفق _________________.rar

شكرا لتفاعلك واضح ان حضرتك لم تفهم سؤالي جيدا واسف لو كنت اسئلت صياغة السؤال سؤالي عن امكانية عمل كود يسئل عن اخر تاريخ فتح الملف TXT نفسه ولو كان اخر تاريخ اكبر من شهر يتم تجاهل مكانه او يتم عمل الجزء الثاني من الكود في الفورم وهو اغلاق الفورم ارجو ان اكون قد وضحت سؤالي وشكرا مرة اخري لتفاعلك

للرفع

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

اخي الفاضل الفكرة لن تتغير كثيرا لو كنت تقصد عدم اتاحة التعديل علي النموذج وهي If ss.Value = True Then GuestD_äãæÐÌ_ÝÑÚí.Enabled = False sno.Enabled = False NAGU.Enabled = False NORO.Enabled = False EMNA.Enabled = False Else GuestD_äãæÐÌ_ÝÑÚí.Enabled = True sno.Enabled = True NAGU.Enabled = True NORO.Enabled = True EMNA.Enabled = True End If وضعها في حدث فورم لود و التغير لكل مكان انا جربتها وبفضل الله البرنامج يعمل بصورة لا بأس بها في انتظار تجربتك

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

للرفع

المثال المرفق لم يتم الغاء الشيفت ولذلك يمكن ان يفتح معك بكل سهولة لو ضغط شيفت عند الفتح والتغير عليه كما تشاء

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

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