ابو جودي

كيف هذا هل تظهر اى رسائل تفيد بوجود خلل ما ؟ انتظر ردكم استاذ @saleh204

اتفضل يا استاذ @الشربيني123 555(3).accdb

طيب بس الاول كده تمام باقى العدد بس يعنى

شووف المرفق ده افتح النموذج frmVacation 555(2).accdb

شوف كده طيب الاول انا غيرت العلاقة فى الاستعلام شوف العلاقة كيف اصبحت وشوف التقرير مصدر بياناته الاستعلام مش الجدول الاستعلام باسم اجازات استعلام 555(1).accdb

هو ايه اللى مش مظبطه بس فهمنى

طبعا تقدر تعمل نموذج وتغير المعيار فى الاستعلام بما يتناسب مع النموذج وتقدر تبنى التقرير على هذا الاستعلام

اتفضل افتح الاستعلام اللى باسم اجازات استعلام 0147 (2).accdb

انا اسف ليك افعل ما تشاء كيفما شئت

اتفضل عدلت لك حبة حجات كده للافضل db4_6.mdb

لا فى شئ غريب هو ده صح فى الكود If case_cod = 7 Then db.Execute "insert into key (setno,secr1,case_cod) values (" & x1 & "," & y & "," & x & ")" khaled = "تريكو" Else If case_cod = 7 Then db.Execute "insert into key (setno,secr1,case_cod) values (" & x1 & "," & y & "," & x & ")" khaled = "نسيج" case_cod = 7 مرتين

انا مش قادر اقهم

اتفضل db4_5.mdb

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

Public Function numbr(myData) myData = Replace(myData, "1", "يوم") myData = Replace(myData, "2", "يومان") myData = Replace(myData, "3", "ثلاثة أيام") myData = Replace(myData, "4", "أربعة أيام") myData = Replace(myData, "5", "خمسة أيام") myData = Replace(myData, "6", "ستة أيام") myData = Replace(myData, "7", "سبعة أيام") myData = Replace(myData, "8", "ثمانية أيام") myData = Replace(myData, "9", "تسع أيام") myData = Replace(myData, "9", "عشرة أيام") numbr = myData End Function

اتفضل 25.accdb

انهو مربع نص عاوز تغير قيمته

انا قولت يسأل سؤال فى سؤال مش كل شوية اسأل سؤال ومادام لدينا ما نسأل عنه اسأل مليون مرة حقك لكن حق المنتدى تحافظ على نظامه أخي الفاضل تقول وبقتح موضوع في موضوع المفروض انتهي - إرسال بلا دليل أديني مثال علي صحة ما تقول الدليل موضوعك هذا عنوانهترشيح طريقة صلاحيات مستخدمين قوية بخلاف طريقة برنامج Users maker وأحتاج لطريقة صلاحيات مستخدمين قوية وبسيطة في نفس الوقت وانا ساعدتك رشحت لك السهل والمرن والبسيط زى ما طلبت لحد هنا تمام جدا بعد كده 1- كيف يتم تشفير الباسوورد في جدول حفظ اليوزر نيم والباسوورد في العمل المرفق 2- هل يمكن إضافة طريقة حماية هذا الموضوع علي هذا العمل مخالفتان

هات مرفق

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

اذا وقت الدفع صل على النبى صل الله عليه وسلم يا هذا

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

لا الحل فى الموديول تجده تحت العنوان ' الحالات الشاذة وبما انك فهمت الفكرة انا دمجت الاستعلامين وخلتهم واحد EngArb (5).accdb