شايب

تمييز الاعداد من 3 الى 10 يكون جمع مجرور بالاضافة ويخالف العدد المعدود في التذكير والتانيث خمسة ريالات الريال مذكر فتكتب خمسة كما اشار الاستاذ منتصر خمس ليرات ليرة مؤنتة تأنيث لفضي فيكتب العدد خمس الاعداد 1 و 2 يوافق العدد المعدود تذكيرا وتانيثا ويسبق المعدود العدد رجل واحد سيارة واحدة العدد 2 يعرب اعراب المثنى فيرفع بالالف وينصب ويجر بالياء العدد 11 و 12 يطابق العدد المعدود وتمييزهما مفرد منصوب العدد 11 يبنى على فتح الجزاين و12 يعرب اعراب المثنى الاعداد 13 - 19 يخالف الجزء الأول من العدد المعدود والجزء الثاني يطابقه في التذكير والتانيث والتميز مفرد منصوب والعدد مبني على فتح الجزاين حضر خمسة عشر طالبا نجحت ثلاث عشرة طالبة الفاض العقود تعرب اعراب جمع المذكر فترفع بالواو وتنصب وتجر بالياء وتمييزها مفرد منصوب ولا تتاثر بالتأنيث والتذكير قرأتُ عشرينَ كتاباً شاهدت عشرين طالبا مررت بعشرين طالبا الاعداد 100 و 1000 و الخ تمييزها مفرد مجرور بالاضافة لماذا هذه المشاركة ربما ينتفع بها احدهم املاه اخونا الشايب

السلام عليكم بداية التصميم الاخير رائع جدا والبرنامج فكرته ايضا جميلة ندخل في الموضوع بعد تردد في وضع المشاركة قررت بعد التوكل على الله ان اضع هذا الرد تأسيا بقول المولى عز وجل على لسان سيدنا شعيب عليه السلام "إِنْ أُرِيدُ إِلَّا الْإِصْلَاحَ مَا اسْتَطَعْتُ ۚ وَمَا تَوْفِيقِي إِلَّا بِاللَّهِ" ومشاركتي تقتصر على نظام تسجيل الدخول حيث يمكن تجاوز كلمة المرور من خلال الرموز حيث ان 'x'='x' دائما true وبالتالي لا نحتاج الى معرفة كلمة المرور سبق ان اشار الاخ شايب الى ثغرات الرموز وتحدث عن رمز واحد ولم يستكمل بقية الرموز استغلال رسائل الخطأ غير المعالجة ونتعمد الحصول على رسالة ننفذ منها الى محرر الاكواد وتعطيل جزئية التحقق ويمكن معالجة ذلك باستخدام رسائل معالجة الأخطاء وكذلك عند تحويل القاعد الى accde فلن نتمكن من الاختراق تجاوز شاشة تسجيل الدخول والقفز للشاشة الرئيسية من خلال ملف دفعي ويمكن علاجها بعدة طرق من ايسرها استخدام متغير عام يستمد قيمتها بعد تسجيل الدخول الناجح اخيرا يمكن لمن يملك الصلاحية حذف المشاركة فهذا افضل من التقليل من جهود الاخرين او استنقاص افكارهم او الدخول في النوايا املاه اخونا الشايب

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

قي الأمثال الشعبية مثل دارج " المعنى في بطن الشاعر" قال المتنبي أنامُ مِلْءَ جُفُوني عَنْ شَوَارِدِهَا ... وَيَسْهَرُ الخَلْقُ جَرَّاهَا وَيَخْتَصِمُ لذا فان تعليقي يقتصر على عيبين من عيوب الشعر اختلال الوزن العروضي الاقواء وهو ان تختلف حركة الاعراب لاحد الابيات عن البقية وقد يُخطِئُ الرَّأْيَ امرؤٌ وهْو حازِمٌ ... كما اختلَّ في وزنِ القَريضِ عَبيدُ الحمد لله اخي محمد نور الموقغ بعودتكم 🌹 الشايب

كانت المشكلة في وضع قيمة افتراضية في النموذج لبعض الحقول المحسوبة في الاستعلام =0 فقط ازلت القيمة وانتهت المشكلة طبعا ازلت الكل ولكن كان يكفي فقط ازالة القيمة الافتراضية للحقول المحسوبة الشايب

مع ان االاخ شايب يفضل العمليات الحسابية في النموذج للحقول المحسوبة ولكن كما تريد ما يحتاج تعدل الاستعلام جرب المرفق الشايب test(1).accdb

الاخ شايب ينصح بالغاء العمليات الحسابية من الاستعلام ونقلها للنموذج وسوف تختفي الرسالة الشايب

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

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

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

لان هذا الي انا فهمته وقد اشرن الى ذلك الشايب

انا عملتها وفقا للمثال في النموذج وبالنسبة لي لا افضل استخدام اي من دوال المجال في الاستعلام لانها تجعل الاستعلام بطيء التنفيذ اذا كان عدد السجلات كبير ويمكن الاستغناء عنها باستخدام صلة بين الجدولين في الاستعلام هذا حسب فهمي للامر اما بالنسبة لاستخدامها في الاستعلام فان الطريقة الاسهل من تحويل الامر الى دالة عن طريق جمع الحقلين مع بعضهما والمعيارين ايضا مع بعض ليكون الامر Dim i i = DLookup("[date2]", "[tbl2]", "[date2]& [user_id]=#" & Me.text1 & "# &'" & Me.text2 & "'") MsgBox i او استخدام تعديل الاستاذ ابو احمد فهو الافضل الشايب

ماشاء الله يا ابا احمد فكرتي دائما عندما يكون هناك اكثر من معيار يكون سطر لكل معيار اسهل في المراجعة Dim i As Variant Dim strWhere As String strWhere = "[date2] = " & Format(Me.text1, "\#mm/dd/yyyy\#") strWhere = strWhere & " and [usr_id]='" & [text2] & "'" i = DLookup("[date2]", "[tbl2]", strWhere) MsgBox i الشايب

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

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

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

في المعايير النصية لبعض الاستعلامات نستخدم WHERE U_UserName = '" & strUser & "' AND U_Password = '" & strPass & "'") وكذلك الحال في دوال تجميع المجال "[U_FullName]='" & [tx3] & "'") ايضا عندما نضع معيار نصي لفتح فورم من خلال فورم اخر DoCmd.OpenForm "frm2", , , "[U_UserName]='" & [tx2] & "'" وكذلك الحال عند الفلترة بمعيار نصي DoCmd.ApplyFilter , "[U_UserName]='" & [tx9] & "'" وحيث ان الحقول النصية تقبل كتابة أي احرف أو أرقام أو رموز خاصة وبالتي يمكن توظيفها بطريقة معينة لتنفيذ اجراء غير شرعي الحقيقة التي يعلمها اي شخص لديه خبرة في الحماية أن الرموز الخاصة ورسائل الخطأ غير المعالجة تمثل الطريق الأسهل للاختراق في الحالة الاولى معيار نصي في استعلام يمكن تسجيل دخول غير شرعي بكافة صلاحيات مستخدم رقم 1 ويمكن تنفيذ استعلام حذف او الحاق او او ... الخ في حالة رقم 2 مع دوال تجميع المجال يمكن تنفيذ الدالة دون معرفة المعيار وتعود باول او اخر او اكبر سجل وفقا لنوع الدالة في الحالة الثالثة نحتاج أحيانا لفتح فورم وإحضار بيانات محددة للعرض و يمكن من خلال توظيف الرمز فتح الفور مع اول سجل او كافة السجلات ويمكن استعراضها والتنقل بينها هنا لا داعي لمعرفة المعيار فقط رموز ونجوم يتم كتابتها بطريقة معينة وكذلك في الحالة الرابعة الفلترة يمكن فلترة كافة البيانات والتنقل بدون الحاجة لمعرفة المعيار والسؤال هل هذا هو الرمز الوحيد الذي يمكن استغلاله (') الاجابة لا ولكن ركزنا عليه لكونه الأكثر استخدام في قاعدة البيانات اخيرا هل يمكن انهاء المشكلة وخصوصا ان الرمز مطلوب للمعايير النصية نعم يمكن بتتبع المدخلات للحقول النصية المرتبطة باجراء ومن اسهل الطرق استخدام دالة Replace strPass = Replace(Me.U_Password, "'", "_") ايضا استخدام رسائل معالجة الاخطاء وتحديد الاجراء عند حدوث خطأ ونكتفي بهذا القدر عن الرمز (') وقد نتحدث غن رمز اخر لايقل خطورة والله الموفق الشايب

حسن في كل عين من تود الحقيقة من تجربة لانظمة التشغيل من dos 3 الى ويندوز 11 اقول لا يوجد نظام تشغيل من مايكروسوفت يمكن مقارنته بويندوز 11 وخصوص الاصدار 24H2 والحديث عن المزايا يستغرق الكثير من الوقت وعليه اكتفي ببعض المزايا دون الدخول في التفاصيل الامان المحسن ولا يقتصر على مراقبة السلوك المشبوه لبعض التطبيقات وانما يتطلب توفر امكانية التمهيد الامن وكذلك tpm2 وهي معيار امان لتخزين مفاتيح التشفير والشهادات بشكل آمن ويوفر التحقق من سلامة النظام الأساسي قبل الاقلاع دعم افضل للذكاء الصناعي تكامل تام من اجهزة الهاتف تلقي مكالمات وارسال واستقبال الرسائل ونقل الملفات واستعراضها بدون برامج اضافيه يقدم افضل تجربة لمحبي الالعاب ادارة افضل للذاكرة ويقدم كذلك تحسين على نظام الذاكرة الظاهرية وخصوصا عند استخدام اقراص m.2 من الجيل الرابع او الخامس لوحة الاشعارات والتنبيهات افضل و من خلال مكان واحد ويمكن التحكم فيها وتحديد الاشعارات المرغوب بها وايقاف اي تطبيق لا ترغب في تمكين اشعاراته ويمكن تخصيص وقت لعدم الازعاج لوحة المفاتيح المدمجة يمكن تكبيرها وتعديلها وفقا لاحتياجك وهي مفيدة لمن لايملك لوحة مفاتيح تحويل اي صورة الى نص بدون الحاجة الى برامج وتعمل بشكل ممتاز مع اللغة العربية ادارة المهام افضل ويمكن البحث عن اي تطبيق بدون الحاجة لاستعراض كافة التطبيقات يمكن تفعيل Sudo وهي ميزة تسمح للادمن بالحصول على امتيازات وتحكم اكبر في النظام و هذه الميزة يعرفها كل من لدية خبرة بانظمة التشغيل المستندة على منصة Linux مثل اوبنتو وديبيات وفيدورا ومينت وغيرها من هذه التوزيعات مستكشف الملفات افضل ويمكن فتح عدة تبويبات والتنقل بينهم بكل سهولة توجد العديد من التحسينات مثل الوضع المحمي للطباعة ميزة مفيدة للشركات وبيئات تعدد المستخدمين وكذلك ميزة عدم التشتيت من خلال التحكم في الاشعارات والتنبيهات وغيرها من مميزات ولكني اكتفي بما سبق و للحصول على افضل تجربة تجنب استخدام نسخ معدلة وان يكون جهازك يحقق متطلبات تشغيل ويندوز 11 وعدم استخدام نسخ تسمح بتجاوز متطلبات التشغيل باستخدام برنامج Rufus او اي برنامج مشابه تسمح بتجاوز هذه المتطلبات والنصيحة الذهبية عدم استخدام الكراك او الكيجن والحرص على تحديث النظام . اخيرا بعض المستخدمين لا يستطيع التاقلم مع الواجهة الجديدة وهذه ليست مشكلة في النظام. الشايب

مبروك استاذ @Foksh خطوة موفقة الموقع يحتاج فعلا الى تجديد الدماء و اختيار عقليات واعية تجدد في طريقة الادارة والاشراف مع تمنياتي لك بالتوفيق تحياتي

الف مبروك استاذ @Ahmos الامر ليس مستغرب بل اني سبق ان اشرت وتوقعت ذلك في مداخلة مع احدهم منذ عام تحياتي

ايضا من الافكار اذا رغبنا في عدم تغيير طريقة الاخ حسين وحيث يشير الى عدم الرغبة في استخدام الماوس والكتابة مباشرة هنا يمكن برمجة احد مفاتيح الكيبورد لنقل الركيز للنموذج If KeyCode = vbKeyF4 Then Forms!list.SetFocus End If مع ان الحل المقدم منكم افضل تحياتي

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

في حلكم استخدمتم OpenArgs لتمرير اسم التقرير في امر فتح نموذج ليست ومن ثم يمرر الاسم لفتح التقرير واعتقد انه يمكن الوصول للنتيجة بدونها مع اني لاحظت انه باستخدام طريقتكم بتمرير اسم التقرير فتح التقرير يكون اسرع بفارق بسيط وربما اكون واهم تحياتي Database1101.accdb

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

في العادة الحد الافصى لطول لكيبل الشبكة من نوع cat6 و cat7 و cat8 بحدود 100 متر بشرط ان يكون الكيبل من نوعية جيدة ومعزول بشكل صحيح والفرق بينهم يكون في سرعة النقل وعرض النطاق وكلما زاد طول الكيبل تقل السرعة ويزداد التشويش وفقد البيانات فمثلا كات6 يمكن الحصول على السرعة القصوى اذا كان الكيبل اقل من 55 متر وكات 7 في حدود 30 متر فقط اما الكات 8 فالحد الاقصى للحصول على سرعة نقل كاملة يتطلب ان يكون طول الكيبل لا يزيد عن 100 متر لذا عند زيادة المسافة عن 40 متر يتطلب استخدام سويتشات من نوعية تدعم السرعة المناسبة لنوع الكيبل ويستثنى الكات8 حيث يمكن وضع سوتشات كل 90 متر في جميع الاحول لمسافة 1000 متر او اكثر يكون استخدام هذا النوع من الكيابل والسويتشات امر غير مجدي واعتقد ان الخيار الامثل استخدام كيابل الفايبر حينها لن يكون هناك فقد للبيانات والاهم لن يكون هناك اختناق او عنق زجاجة يمكن للكيبل الفايبر الاحادية نقل بيانات لمسافة 100 كيلو متر او اكثر عند بناء الشبكة نهتم بسعة النطاق اكثر من الاهتمام بالسرعة سعة النطاق لكيبل cat8 وهو افضل كيبل من سلسلة كات فقط 2000 ميجا هيرتز بينما في الفايبر تكون سعة النطاق ما بين 40 الى 100 جيجا في الثانية انا هنا اتحدث الكيابل احادي الوضع والله الموفق