كل الانشطه

توفر مناهج البحث العلمي pdf للباحثين إطارًا معرفيًا لفهم الأساليب المنهجية المختلفة، بينما تساعد خدمة إعداد منهجية البحث العلمي على تنظيم الدراسة وصياغة منهجية دقيقة ومتوافقة مع المعايير الأكاديمية، وتقدم شركة سندك للاستشارات الأكاديمية والترجمة دعمًا متخصصًا لإعداد البحوث العلمية باحترافية عالية، كما تتناول الدراسات رسائل ماجستير عن المنهج التكاملي في البحث العلمي مع توضيح ما الخطوات المتبعة في تخطيط وتنفيذ المنهج التكاملي؟، إلى جانب توفير مراجع علمية مثل المدخل التكاملي PDF لفهم آليات تطبيق هذا المنهج بشكل منهجي وفعّال. https://www.sanadkk.com/blog/post/1642/%D8%B1%D8%B3%D8%A7%D8%A6%D9%84-%D9%85%D8%A7%D8%AC%D8%B3%D8%AA%D9%8A%D8%B1-%D8%B9%D9%86-%D8%A7%D9%84%D9%85%D9%86%D9%87%D8%AC-%D8%A7%D9%84%D8%AA%D9%83%D8%A7%D9%85%D9%84%D9%8A.html

توفر مناهج البحث العلمي pdf للباحثين مرجعًا شاملًا لفهم أساليب البحث المختلفة، بينما تساهم خدمة إعداد منهجية البحث العلمي في تنظيم الدراسة وصياغة منهجية دقيقة وفق المعايير الأكاديمية، وتقدم شركة سندك للاستشارات الأكاديمية والترجمة دعمًا متخصصًا لإعداد البحوث العلمية بشكل احترافي، كما تتناول الدراسات المنهجية ما الفرق بين المنهج الوصفي والتاريخي؟ مع توضيح ما هي عيوب ومميزات المنهج الوصفي؟، إلى جانب توفير مراجع تحليلية مثل الفرق بين المنهج الوصفي والتاريخي PDF لفهم الفروق المنهجية بينهما واختيار المنهج الأنسب لطبيعة الدراسة. https://www.sanadkk.com/blog/post/1643/%D9%85%D8%A7-%D8%A7%D9%84%D9%81%D8%B1%D9%82-%D8%A8%D9%8A%D9%86-%D8%A7%D9%84%D9%85%D9%86%D9%87%D8%AC-%D8%A7%D9%84%D9%88%D8%B5%D9%81%D9%8A-%D9%88%D8%A7%D9%84%D8%AA%D8%A7%D8%B1%D9%8A%D8%AE%D9%8A.html

تُعد مناهج البحث العلمي pdf من المراجع الأساسية التي تساعد الباحث على فهم الأساليب المنهجية المختلفة، في حين تسهم خدمة إعداد منهجية البحث العلمي في تنظيم الدراسة وصياغة منهجية دقيقة ومتوافقة مع المعايير الأكاديمية، وتقدم شركة سندك للاستشارات الأكاديمية والترجمة دعمًا متخصصًا لإعداد البحوث العلمية باحترافية عالية، كما تتناول الدراسات مناهج الاستدلال المنطقي في البحث العلمي مع توضيح ما المقصود بالاستدلال المنطقي؟ وشرح خطوات الاستدلال الاستنباطي بوصفه أحد الأساليب الأساسية في بناء النتائج العلمية وصياغة الاستنتاجات المنهجية. https://www.sanadkk.com/blog/post/1725/%D9%85%D9%86%D8%A7%D9%87%D8%AC-%D8%A7%D9%84%D8%A7%D8%B3%D8%AA%D8%AF%D9%84%D8%A7%D9%84-%D8%A7%D9%84%D9%85%D9%86%D8%B7%D9%82%D9%8A.html

بحسب الصورة والذي فهمته منها أنه يجب أن يكون عندك 4 قواطر 1 بترول 2 بترول 1 ديزل 2 ديزل ويجب أن يكون القراءة الحالية لأي يوم تساوي السابقة لليوم الذي بعده لا يكون هناك فرق في العدادات والصورة تظهر مشكلة فرق في القاطرة 2 بترول دعني أشرح لك ( وأنت بالتأكيد فاهم شغلك تمام ولكن لازم نفهم نحن شغلك علشان نساعدك في حل المشكلة حسب الصورة تابع معي سلوك القاطرة (مثلا) 1 بترول في يوم 1/10/2025 السابق 500 والحالي 1500 القاطرة قبل تحركها كانت 500 وبعد ما وصلت 1500 (تمام) في يوم 4/10/2025 السابق 1500 والحالي 2800 ( تمام) القاطرة قبل تحركها كانت 1500 وبعد ما وصلت 2800 (تمام) لا حظ الأن أن الرقم 1500 كان الحالي في 1/10 وأصبح السابق في 4/10 والى الآن كل شيء معقول , ولكن ولكن ! =========== عند تطبيق نفس المنطق السابق على القاطرة 2 بترول يظهر خطأ في يوم 1/10/2025 السابق 250 والحالي 2500 القاطرة قبل تحركها كانت 250 وبعد ما وصلت 2500(تمام) في يوم 4/10/2025 السابق 2800 والحالي 5600( خطأ ) القاطرة قبل تحركها كانت 2800 وبعد ما وصلت 5600 (خطأ ) لا حظ الأن أن الرقم 2500 كان الحالي في 1/10 ولم يصبح السابق في 4/10 بل أصبح 2800 وهذا يدل على وجود فارق 300 (هنا المشكلة) تقبل تحياتي

توفر مناهج البحث العلمي pdf للباحثين الأساس النظري لفهم أساليب البحث المختلفة، بينما تساهم خدمة إعداد منهجية البحث العلمي في تنظيم الدراسة وصياغة منهجية دقيقة وفق المعايير الأكاديمية، وتقدم شركة سندك للاستشارات الأكاديمية والترجمة دعمًا متخصصًا لإعداد البحوث العلمية باحترافية عالية، كما تتناول الدراسات المنهجية التصاميم التجريبية في البحث العلمي مع توضيح خطوات البحث التجريبي؟ وأسس تطبيقه، إلى جانب توفير مراجع مثل البحوث التجريبية PDF لدعم الباحث في إعداد دراسة تجريبية دقيقة وموثوقة. https://www.sanadkk.com/blog/post/1731/%D8%A7%D9%84%D8%AA%D8%B5%D8%A7%D9%85%D9%8A%D9%85-%D8%A7%D9%84%D8%AA%D8%AC%D8%B1%D9%8A%D8%A8%D9%8A%D8%A9-%D9%81%D9%8A-%D8%A7%D9%84%D8%A8%D8%AD%D8%AB-%D8%A7%D9%84%D8%B9%D9%84%D9%85%D9%8A.html

توفر مناهج البحث العلمي pdf للباحثين قاعدة معرفية أساسية لفهم الأساليب العلمية المختلفة، بينما تساهم خدمة إعداد منهجية البحث العلمي في تنظيم الدراسة وصياغة منهجية دقيقة ومتوافقة مع المعايير الأكاديمية، وتقدم شركة سندك للاستشارات الأكاديمية والترجمة دعمًا متخصصًا لإعداد البحوث العلمية بشكل احترافي، كما تساعد مصادر مثل ملخص حول مناهج البحث العلمي ومقدمة في مناهج البحث العلمي pdf الباحث على تكوين تصور شامل عن المناهج المتاحة، مع الإجابة عن تساؤل كيف أختار منهجية البحث؟ بما يدعم اختيار المنهج الأنسب لطبيعة الدراسة وأهدافها. https://www.sanadkk.com/blog/post/1812/%D9%85%D9%84%D8%AE%D8%B5-%D8%AD%D9%88%D9%84-%D9%85%D9%86%D8%A7%D9%87%D8%AC-%D8%A7%D9%84%D8%A8%D8%AD%D8%AB-%D8%A7%D9%84%D8%B9%D9%84%D9%85%D9%8A.html

تُعد مناهج البحث العلمي pdf من المراجع الأساسية التي يعتمد عليها الباحث لفهم الأساليب العلمية المختلفة، في حين تسهم خدمة إعداد منهجية البحث العلمي في تنظيم الدراسة وصياغة منهجية دقيقة وفق المعايير الأكاديمية، وتقدم شركة سندك للاستشارات الأكاديمية والترجمة دعمًا متخصصًا لإعداد البحوث العلمية باحترافية عالية، كما تتوافر مصادر بصيغ متعددة مثل منهجية البحث العلمي doc ومناهج البحث العلمي doc لتسهيل الوصول إلى المحتوى العلمي، مع إبراز أهمية مناهج البحث العلمي في توجيه البحث وضمان دقة نتائجه وموثوقيتها. https://www.sanadkk.com/blog/post/1813/%D9%85%D9%86%D8%A7%D9%87%D8%AC-%D8%A7%D9%84%D8%A8%D8%AD%D8%AB-%D8%A7%D9%84%D8%B9%D9%84%D9%85%D9%8A-doc.html

توفر مناهج البحث العلمي pdf للباحثين مرجعًا أساسيًا لفهم الأساليب المنهجية المختلفة، بينما تساعد خدمة إعداد منهجية البحث العلمي على صياغة منهجية دقيقة ومتوافقة مع المعايير الأكاديمية، وتقدم شركة سندك للاستشارات الأكاديمية والترجمة دعمًا متخصصًا لإعداد البحوث العلمية بشكل احترافي، كما تتناول الدراسات المنهجية أخطاء صياغة الفروض في البحث العلمي لتجنب الخلل المنهجي، مع توضيح أهداف دراسة الحالة وأهمية توظيفها، إلى جانب توفير مراجع مثل أدوات دراسة الحالة pdf لدعم الباحث في جمع البيانات وتحليلها بدقة. https://www.sanadkk.com/blog/post/1865/%D8%A3%D8%AE%D8%B7%D8%A7%D8%A1-%D8%B5%D9%8A%D8%A7%D8%BA%D8%A9-%D8%A7%D9%84%D9%81%D8%B1%D9%88%D8%B6.html

توفر مناهج البحث العلمي pdf للباحثين أساسًا معرفيًا لفهم أساليب البحث المختلفة، بينما تساعد خدمة إعداد منهجية البحث العلمي على تنظيم الدراسة وصياغة منهجية دقيقة ومتوافقة مع المعايير الأكاديمية، وتقدم شركة سندك للاستشارات الأكاديمية والترجمة دعمًا متخصصًا لإعداد البحوث العلمية بشكل احترافي، وتشمل الموارد المنهجية أيضًا مراجع مثل أدوات المنهج التاريخي pdf التي توضح الآليات المستخدمة في تحليل المصادر التاريخية، مع الإجابة عن تساؤل ما خطوات البحث التاريخي؟ لتقديم تصور شامل لمراحل البحث التاريخي وأسس تطبيقه العلمي. https://www.sanadkk.com/blog/post/1868/%D8%A3%D8%AF%D9%88%D8%A7%D8%AA-%D8%A7%D9%84%D8%A8%D8%AD%D8%AB-%D8%A7%D9%84%D8%AA%D8%A7%D8%B1%D9%8A%D8%AE%D9%8A.html

يقدم المنهج الاجتماعي pdf | سندك مرجعًا علميًا يساعد الباحثين على فهم نشأة وتطور المنهج الاجتماعي ودوره في دراسة الظواهر الاجتماعية. كما يتناول شرح أنواع مناهج البحث العلمي في العلوم الاجتماعية مع توضيح أسس اختيار المنهج المناسب لطبيعة الدراسة، وتُعد مصادر مثل مناهج البحث العلمي pdf أدوات أساسية لدعم الباحث بالمعلومات المنهجية الدقيقة، وتساهم خدمة إعداد منهجية البحث العلمي في تنظيم الدراسة وصياغة منهجية واضحة، بينما توفر شركة سندك للاستشارات الأكاديمية والترجمة دعمًا احترافيًا متكاملًا لإعداد البحوث العلمية وفق المعايير الأكاديمية المعتمدة. https://www.sanadkk.com/blog/post/2136/%D8%A7%D9%84%D9%85%D9%86%D9%87%D8%AC-%D8%A7%D9%84%D8%A7%D8%AC%D8%AA%D9%85%D8%A7%D8%B9%D9%8A.html

وعليكم السلام ورحمة الله وبركاته بالمتاسبة زرت بلدي الثاني الجزائر سنة 2014 ومكثث بها شهرا بين اكثر من مدينة حقيقة شعب طيب كريم ذو عشرة اغلب ناسهم على القطرة حفظكم الله وحفظ بلادكم تفاديا لما حدث في احد مواضعيك السابقة بحصوص امتداد الملف اذكرك مرة احرى بأن مصنف (ملف) به كود الاستيراد عليه يجب ان يكون امتداده XLSB او XLSM ولا تقم بتغييره الى XLSX كما انوه انه يجب وصع بعض البيانات في الملف اربع صفوف مثلا وذلك لسبب في حال وجود تواريح او معادلات او غيرها مثلا فيتم اعتبارها وادراجها بالكود الكود حاليا عند التقر على الزر يقوم بفتح واجهة اختيار ملف من اي مكان في جهازك وليس ضروريا ان يكوتا في نفس المجلد حيث يقوم الكود بمسح البيانات القديمة والصاق الجديدة اليك الملف متمنيا ان تجد فيه طليك ملف.xlsb تحياتي

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

وعليكم السلام -تفضل http://www.myprogrammes.50webs.com/

مرحبا أخي أبو عيد المطلوب - سلمك الله والقارئين - كما في الصورة الموضحة ... عندما أبحث من تاريخ 1-10 حتى تاريخ 30-10 أريد أن يأتي بالقراءة السابقة وهي 500 والقراءة الحالية وهي 2800 وليس قراءة نفس التاريخ 1-10 الحالية وهي 1500 وكذلك الديزل نفس الشيء أريده يأتي بآخر قراءة وهي 10000 وليس 8000 لأن تاريخ البحث إلى 30-10

حياك الله اخي الغالي @Foksh يبدو ان WinGet غير مثبته على الوندور قمت بتطبيق الخطوات اللتي ذكرت وظهر لي هذه الاخطاء كماهو موضح بالصوره

استاذ @بلال اليامين كل مرفقاتك لديا تعمل وهي كثيرة .................. أي مرفق منهم هذا ارسله .................

استاذ @AMINYOUSIF اليك الاستعلام بعد تعديل الجدولان . حسب مافهمت . ووافني بالرد . AMINYOUSIF.rar

وعليكم السلام ورحمة الله وبركاته أخي الفاضل .. سؤالي الأول لك ، هل نسخة الويندوز سيرفر مثبت عليها WinGet = مدير حزم ويندوز ؟؟؟ إن كان نعم فيمكنك تثبيت تطبيق واتس اب لسطح المكتب من خلال الملف ( ExE ) المرفق . وإذا لم يكن لديك هذه الحزمة .. فقم بالتالي ( ما لم يكن هناك تحديثات قد فاتتني ) :- افتح PowerShell كمسؤول . انسخ السطرين التاليين ( كل سطر بشكل منفصل ) واضغط انتر بعد كل سطر .. Invoke-WebRequest -Uri https://github.com -OutFile Microsoft.UI.Xaml.appx Add-AppxPackage -Path .\Microsoft.UI.Xaml.appx حيث ان تثبيته يتطلب مكتبات معينة ليعمل بشكل صحيح وهي مكتبة Microsoft.UI.Xaml ( الإصدار 2.8 متوافق مع سيرفر 2022 ) الآن الصق السطر التالي أيضاً واضغط انتر :- Invoke-WebRequest -Uri https://github.com -OutFile WinGet.msixbundle ثم وأخيراً نقوم بتثبيت الحزمة المطلوبة ولتثبيت WinGet من خلال السطر التالي :- Add-AppxPackage -Path .\WinGet.msixbundle بعد انتهاء الأوامر ، أغلق نافذة PowerShell وافتحها مرة أخرى كمسؤول أيضاً ، ثم اكتب الأمر التالي للتأكد من عمل الأداة :- winget --version وهنا سيكون ظاهراً لك إصدار الأداة التي تم تثبيتها ( لا مانع من تزويدنا بصورة ) ، وهو دلالة على نجاح العملية وللعلم بأنه لن يتم تحديث WinGet تلقائياً عبر المتجر في إصدار السيرفر 2022 ، لذا ستحتاج لتكرار الخطوات عند الرغبة في التحديث لإصدار أحدث WhatsApp Installer.zip

وعليكم السلام ورحمة الله وبركاته .. بدايةً لي تعليق بسيط تكرر في الكثير من مشاركات الأخوة الأعضاء الذين يستخدمون اللغة العربية في المسميات . لكن استخدامك للمد في أسماء الحقول هذا قطعاً غير صحيح ويسبب لك الكثير من المشاكل في استعلامات اكسيس . فمثلاً الحقل الخصــــــــــــــوم أو الحقل الاصـــــــول ، هل هي منطقية بنظرك ؟؟؟؟ أضف إلى ذلك بنية الجداول نفسها غير سوية وغير سليمة !!! أيضاً يجب أن يكون هناك حقل مشترك بين الجدولين مثل ID أو رقم الصف لتتم عملية الربط بشكل صحيح . لذا قم بإنشاء حقل ترقيم تلقائي أو مفتاح أساسي في كل جدول وربطهما عليه . لذا نرجو منك تصويب الأوضاع في الجدولين كي تجد من يحاول المساعدة ..

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

الى اصحاب العلم و المعرفة المرفق عبارة عن 2 استعلام ( اصول و خصوم ) تم جمعهما فى قائمة راسية بطريقة نقل جملة sql من كل استعلام و الربط بينهما ب union all (لغير المحترفين امثالى ) وللاحتياج الى قائمة افقية:- حاولت اطبق نفس الطريقة باستخدام full outer jion بكل شروطها بالاضافة لشرط ; ان كل رقم صف فى جدول الاصول يربط مع رقم صف الخصوم كشرط ربط وهمى ;1=1 no واحد اشكركم b_sheet.rar

السلام عليكم السبب هو وجود مسافات قبل الارقام وهذا يحدث عادة عند نسح ارقام ناتجة عن معادلات الحل كل القيم تتحول إلى نصوص (CStr) وتُزال الفراغات (Trim) وهذا يضمن التطابق حتى لو كانت القيم أرقام أو نصوص أو ناتجة عن معادلات. اليك الكود المعدل Sub تحويل_اللجان_الى_اسماء_Turbo() Dim ws As Worksheet: Set ws = ActiveSheet Dim r As Long, c As Long Dim lastRowMain As Long, lastRowSearch As Long Dim رقم_اللجنة As String, اسم_اللجنة As String, اسم_المراقب As String Dim فارق_الاعمدة As Long: فارق_الاعمدة = 12 Dim cell As Range lastRowSearch = ws.Cells(ws.Rows.Count, "N").End(xlUp).Row ws.Range("P3:X" & lastRowSearch).ClearContents lastRowMain = ws.Cells(ws.Rows.Count, "B").End(xlUp).Row lastRowSearch = ws.Cells(ws.Rows.Count, "N").End(xlUp).Row For r = 3 To lastRowMain اسم_المراقب = Trim(CStr(ws.Cells(r, "B").Value)) For c = 4 To 12 رقم_اللجنة = Trim(CStr(ws.Cells(r, c).Value)) If رقم_اللجنة <> "" Then For Each cell In ws.Range("C3:C" & lastRowMain) If Trim(CStr(cell.Value)) = رقم_اللجنة Then اسم_اللجنة = Trim(CStr(ws.Cells(cell.Row, "B").Value)) Dim صف_المراقب As Range For Each صف_المراقب In ws.Range("N3:N" & lastRowSearch) If Trim(CStr(صف_المراقب.Value)) = اسم_المراقب Then ws.Cells(صف_المراقب.Row, c + فارق_الاعمدة).Value = اسم_اللجنة Exit For End If Next صف_المراقب Exit For End If Next cell End If Next c Next r End Sub

السلام عليكم ورحمة الله وبركاته حصلت معي مشكله عويصه ماعرف احلها عندي عميل يعمل على سيرفر خاص VPS والسيرفر مثبت عليه Windows Server 2022 حاولت اثبت برنامج WhatsAppDesktop وتبين لي ان الوندوز سيرفر لايدعم متجر تطبيقات مايكروسوف حاول كذا محاوله لكن للاسف ماقدرت اثبت تطبيق الوتس والان لابد من استخدام الوتس داخل المتصفح لعل نقدر نرسل عن طريقه الرساله والمرفقات هل بالامكان تعديل المثال في مشاركة الاخ الفاضل @Foksh ليتم الارسال عن طريق المتصفح وليس التطبيق ارجوا المساعده ياخوان وماهو الحل المناسب الحقيقه ويندوز سيرفر هذا ورطنا ماتوقعت يحدث معي هذا الشي ولاني عارف كيف احل المشكله هذي والمشكله ملزم بعمل برنامج الاكسس على ويندور سيرفر WhatsApp Sender WF.accdb

عند نقل جدول1 الذي به هذه الارقام الى جدول 2 لا يتم تحويلها الى اسماء في الجدول 3 ماالسبب ؟؟؟ معلومه هذة الارقام تم نسخها من معادلات من جدول اخر... وعند كتابة ارقام في الجدول 2 يدوي ينفذ الامر .... ولا ادري ما السبب؟؟؟؟؟؟؟؟ تحويل اللجان الى أسماء _ ا.xlsm

مكتبة كافة الادوات المساعدة والمميزة والكواد والمشاريع 2026-2027 Ms_hanan : https://sites.google.com/view/mas-projectss/home لضم بعض الاعمال وتنزيل المباشر من غير اذونات الكل مفتوح المصدر ******************************************************************************************************** توسيــــع واستكمال 1- اضافة فحص وتسجيل الجهاز عند الاقلاع بمفتاح الترخيص سهل وسريع : Private Sub Chack_Pc_Sruial() '==========( Chack Into PC = PC K If IsNull(DLookup("[CPU_Na]", "[PC_X_PC]")) Then Call Error_Chack_Pc_Sruial: Exit Sub If IsNull(DLookup("[CPU_ma]", "[PC_X_PC]")) Then Call Error_Chack_Pc_Sruial: Exit Sub If IsNull(DLookup("[CPU_se]", "[PC_X_PC]")) Then Call Error_Chack_Pc_Sruial: Exit Sub If IsNull(DLookup("[Motherboard_se]", "[PC_X_PC]")) Then Call Error_Chack_Pc_Sruial: Exit Sub If IsNull(DLookup("[Motherboard_ma]", "[PC_X_PC]")) Then Call Error_Chack_Pc_Sruial: Exit Sub If IsNull(DLookup("[Motherboard_mo]", "[PC_X_PC]")) Then Call Error_Chack_Pc_Sruial: Exit Sub If IsNull(DLookup("[Motherboard_Bi]", "[PC_X_PC]")) Then Call Error_Chack_Pc_Sruial: Exit Sub If IsNull(DLookup("[HDD_se]", "[PC_X_PC]")) Then Call Error_Chack_Pc_Sruial: Exit Sub If IsNull(DLookup("[HDD_na]", "[PC_X_PC]")) Then Call Error_Chack_Pc_Sruial: Exit Sub If IsNull(DLookup("[HDD_mo]", "[PC_X_PC]")) Then Call Error_Chack_Pc_Sruial: Exit Sub If DLookup("[CPU_Na]", "[PC_X_PC]", "[CPU_Na]=" & "'" & Me.txt1 & "'") = Me.txt1 Then Else: Call Error_Chack_Pc_Sruial: Exit Sub If DLookup("[CPU_ma]", "[PC_X_PC]", "[CPU_ma]=" & "'" & Me.txt2 & "'") = Me.txt2 Then Else: Call Error_Chack_Pc_Sruial: Exit Sub If DLookup("[CPU_se]", "[PC_X_PC]", "[CPU_se]=" & "'" & Me.txt3 & "'") = Me.txt3 Then Else: Call Error_Chack_Pc_Sruial: Exit Sub If DLookup("[Motherboard_se]", "[PC_X_PC]", "[Motherboard_se]=" & "'" & Me.txt4 & "'") = Me.txt4 Then Else: Call Error_Chack_Pc_Sruial: Exit Sub If DLookup("[Motherboard_ma]", "[PC_X_PC]", "[Motherboard_ma]=" & "'" & Me.txt5 & "'") = Me.txt5 Then Else: Call Error_Chack_Pc_Sruial: Exit Sub If DLookup("[Motherboard_mo]", "[PC_X_PC]", "[Motherboard_mo]=" & "'" & Me.Txt6 & "'") = Me.Txt6 Then Else: Call Error_Chack_Pc_Sruial: Exit Sub If DLookup("[Motherboard_Bi]", "[PC_X_PC]", "[Motherboard_Bi]=" & "'" & Me.Txt7 & "'") = Me.Txt7 Then Else: Call Error_Chack_Pc_Sruial: Exit Sub If DLookup("[HDD_se]", "[PC_X_PC]", "[HDD_se]=" & "'" & Me.Txt8 & "'") = Me.Txt8 Then Else: Call Error_Chack_Pc_Sruial: Exit Sub If DLookup("[HDD_na]", "[PC_X_PC]", "[HDD_na]=" & "'" & Me.Txt9 & "'") = Me.Txt9 Then Else: Call Error_Chack_Pc_Sruial: Exit Sub If DLookup("[HDD_mo]", "[PC_X_PC]", "[HDD_mo]=" & "'" & Me.Txt10 & "'") = Me.Txt10 Then Else: Call Error_Chack_Pc_Sruial: Exit Sub If Me.f_1.Visible = False Then Me.f_1.Visible = True If Me.f_3.Visible = False Then Me.f_3.Visible = True If Me.f_4.Visible = False Then Me.f_4.Visible = True If Me.f_2.Visible = True Then Me.f_2.Visible = False Me.f_3.BackColor = rgb(34, 177, 76) Me.f_1.Caption = "الجهاز مرخيص ومفعل بجهة مالك مشــــــروع .. جاري التهيئة وضبط التصال الآلي " End Sub 2- اخذ النسخالاحتياطية مباشر لقاعدة المشروع وقاعدة الادخال كل بنافذة الادخال عند قائم الاعدادت والضبط 3- تحسين في نافذة الادخال بعامود التحرك مع مؤشر التحديد + اضافة 37 قائمة ادخال 😇 Private Sub CmdFirstRecord_Click() On Error Resume Next If Me.Add_New_Mony_0.Form.Recordset.RecordCount > 0 Then Me.Add_New_Mony_0.Form.Recordset.MoveFirst Form_Add_New_Mony_0.IDD = Form_Add_New_Mony_0.ID End If End Sub Private Sub CmdLastRecord_Click() On Error Resume Next If Me.Add_New_Mony_0.Form.Recordset.RecordCount > 0 Then Me.Add_New_Mony_0.Form.Recordset.MovePrevious Form_Add_New_Mony_0.IDD = Form_Add_New_Mony_0.ID End If End Sub Private Sub CmdNextRecord_Click() On Error Resume Next If Me.Add_New_Mony_0.Form.Recordset.RecordCount > 0 Then Me.Add_New_Mony_0.Form.Recordset.MoveNext Form_Add_New_Mony_0.IDD = Form_Add_New_Mony_0.ID End If End Sub Private Sub CmdPreviousRecord_Click() On Error Resume Next '================(last ?! If Me.Add_New_Mony_0.Form.Recordset.RecordCount > 0 Then Me.Add_New_Mony_0.Form.Recordset.MoveLast Form_Add_New_Mony_0.IDD = Form_Add_New_Mony_0.ID End If End Sub - لان البعض حتى الان يستخدمون في نماذج المستمر للتنقل DoCmd.GoToRecord , "", acFirst ؟ ما خذين العامود السجلات بطول النافذه ويتسخدم الكود لنموذج منفرد 😇 4- استكمال وتصحيح اعدادة النسخ الاحتياطية ويحتاج الى تعديل :::: تابعو الفيديو للتوضيح اكثر مشاهدة ممتعة تحميل المباشر من غير اذونات https://drive.google.com/file/d/1SpayGLtFKnKVoW-p0b5doZQ8zSL0R7cv/view?usp=drive_link