نجوم المشاركات

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

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

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

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

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

:::اهلا اخي رمهان .... نعم من حقك تقول هكذا .. لكن الموضوع ببساطة هو مقارنة قيمة الحقل result مع ما يحتويه الحقل nv من صيغة وهي اما (اكير من او اصغر من او بين) ليملا الحقل case بما يناسب حالة المقارنة ...... وعذرا منك اخي .

وفقك الله وشكرا لمشاركتك النافعة و اختصار الكود

توهتنا اخي محمد اول مشاركة pos اقل من العدد واخر مشاركة تقول pos دائما اكبر من وظهرت بحاجة جديده في اخر مشاركة وهي ال Equ لو تشرح الموضوع من اساسه وفكرته ؟ والاستاذ شبفان به البركه مع كل التقدير

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

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

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

وعليكم السلام أخي ابوجاسم ، ماشاءالله عليك انت في مشاركتك الـ 204 . لقد فتحت 4 مواضيع بمسميات مختلفة لنفس السؤال !!! لماذا ؟ انت تعرف انك تستطيع ان "تعدل" الموضوع (بما فيها اسم الموضوع ومكوناته) ، بعد وضعك الموضوع ، وقبل ان يضع احد رد عليك. وهذا الجزء من المنتدى ، منتدى الاكسس موجود لكي نتبادل الخبرات ، ونساعد بعض ، اما ان يساعدك احد على الخاص ، فالرجاء وضع مثل هذا الطلب في إعلانات شخصية للاعضاء بمقابل مادي بالاضافة الى انه عندك موضوع مفتوح نشط هنا: يُقفل. جعفر

أخى الكريم اليكم الملف بالمرفقات اطلع عليه جيدا وجرب كيفما تشاء نتيجة نصف العام _1.rar

أخي ابو البراء ... بعد السلام اذا كان النص 17 نأخذ 5 5 6 اذا كان النص 18 نأخذ 6 6 6 اذا كان النص 19 نأخذ 6 6 7 و هكذا نقسم طول النص على 3 (عدد الكومبو) باستعمال (int)نأخذ اول حصتين للأول والثاني والباقي للثالث هذا ما يريد صاحب السؤال ولا ادري ما الغاية

مازال لدي سؤال هل يوجد pos 5 - 10 ؟ واذا وجد كيف ستكون النتيجة Neg ؟ ام ان pos و Neg فقط اكبر من او اصغر من رقم ولا تاتي بين رقمين ( مجال ) تحياتي

السلام عليكم لم افهم الاستفسار في البدء لعدم وجود مرفق ارفقت لكم هذا وبه المطلوب تقريبا وبدون اكواد او عملية معالجة لخاصية السماح بالاضافة . جرب اولا كمستخدم وبدون معرفة الطريقه ! وبه ايضا اختصار لفكرة معالجة خاصية السماح بالاضافة بالكود وهي طبعا فكرتك وتم تعطيل الكود لتجربة الفكره اعلاه بالتوفيق myway1.rar

السلام عليكم الحمدلله في الكثير من الاحيان ، يحتاج صاحب السؤال الى الامساك بطرف الخيط ، ويُكمل المشوار ، وهذا ما حصل هنا انا توقفت لثلاثة اسباب: 1. وجود خبير محترف ومتخصص ، الاستاذ رمهان ، وفي انتظار مرفق فيه جميع ما توصل اليه ، 2. كنت على ثقة ان أخي أوس (وكم مرة ناديتك أنس وانت ساكت عني ، شكرا) سيستفيد من عمل الاستاذ رمهان وعملي وسيخطو للخطوة التالية ، 3. وكان يجب ان ابدأ من المرفق الاصل من اول وجديد ، للوصول الى مجموعة الشروط التي اعطانا إياها اخي أوس ، فلم تكن الفكرة في البداية تشتمل على كل هذه الشروط (حسب فهمي حينها) جعفر

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

عفوا ما عندي اي كتاب لكن في الاسفل بها روابط ممكن تستفيد منها https://support.office.com/ar-sa/article/الخاصية-تنسيق-نوع-البيانات-تاريخ-وقت-3251a423-3dd7-446e-be65-c7293eddbb43 وهنا ايضا https://support.office.com/ar-sa/article/تخصيص-تنسيقات-البيانات-في-Access-e48f2312-67f0-4921-aca0-15d36b7f9c3b

تم التعديل كما تريد User_division advanced.rar

في الاستعلام ومصدر المربعات نصية نستخدم فاصلة منقوطة ( ; ) وفي محرر الفيجوال نستخدم الفاصلة عادية ( , )

::: تمام استاذ شيفان ولكن اعتقد عليك تغيير الفاصلة , الى فاصلة منقوطة ; ..... تحياتي

استخدم هذا DCount("OrderID", "tblorders", "[OrderDate] =#" & Format(Me.OrderDate.Value, "mm/dd/yyyy") & "#")

اخواني الاعزاء لقد توصلت الى حل كما في المرفق باستخدام كود الاستاذ جعفر مع بعض التعديلات.. حاول تغيير اسم قاعدة البيانات الصحيحة باخرى خاطئة وانظر للنتيجة او حاول ان تربط البرنامج بقاعدة خاطئة وانظر النتيجة الفكرة اني جعلت البرنامج لايرتبط بأي قاعدة بيانات لاتحتوي على جدول اسمه tblMonths بامكانك تغيير اسم الجدول الى اي جدول تريد تحياتي test.zip

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

افتح module5 وفي اعلى الكود في اسفل الاسم الفونيكشن اكتب On Error Resume Next اي راح يصير هكذ Function DeleteAllFormsAndReportsss() On Error Resume Next لكن هناك ملاحظة : النموذج اللي بواسطتها تعمل العملية ما يحذف نفسه تحياتي

جرب هذا الملف عندما تضفط على Run يظهر لك الفورم User_division.rar

هذا كود سيقوم باخبارك هل الربط تمام ام لا If CurrentDb.OpenRecordset("SELECT MSysObjects.Name, MSysObjects.Type FROM MSysObjects AS MSysObjects_1 RIGHT JOIN [" & DLookup("DBPathANDName", "BackDBs", "found=true") & ";pwd=" & DLookup("mypass", "BackDBs", "found=true") & "].MSysObjects ON MSysObjects_1.ForeignName = MSysObjects.Name WHERE (((MSysObjects.Name) Not Like '*msys*') AND ((MSysObjects_1.ForeignName) Is Null) AND ((MSysObjects.Type)=1))").RecordCount <> 0 Then MsgBox ("الربط غير سليم") الصقه في اي حدث يناسبك . مثلا عند التحميل للنموذج الرئيسي. والانتباه الى وجود البيانات التالية بالجدول BackDBs 1. وجود مسار للقاعدة الخلفية ووضع علاة صح ان المسار صحيح 2. هناك كلمة مرور للقاعدة الخلفية والتي مسارها اعلاه وبعدين ننتقل خطوة خطوة لماتريد بافكار جديده تحياتي

حياكم الله استاذ صالح هذا تعديل بسيط مقترح على مثال الاستاذ ابو خليل Private Sub Form_Timer() DoCmd.GoToRecord , , acGoTo, Int((Me.RecordsetClone.RecordCount - 1 + 1) * Rnd + 1) End Sub حيث اصبح التنقل عشوائي بين 1 وعدد سجلات النموذج تحياتي

وعليكم السلام مع تعديل أخي صالح ، استعمل الكود في الحدث "قبل التحديث" جعفر

استعمل الكود في حذث قبل التحديث و أكتب السطر الأول بهذا الشكل If Me.number_expenditure <= 0 Then

السلام عليكم ورحمة الله تم التعديل على الأكواد حسب المطلوب... بالنسبة لبطء كود الراسبين فهذا راجع للبيانات الكثيرة التي يستدعيها بسبب شرط أقل من 65% فهو يعتمد قيم 0 (الفراغات) لذا تم لإضافة شرط آخر للكود وهو أن تكون العلامات أكبر تماما من الصفر (استثناء قيم الصفر -الفراغات-)... أرجو أن يفي هذا التعديل ما كنت تنتظره... بن علية جلب الاسماء.rar

بالضبط ، يعني مثلا الى مجلد Employee_Pictures ، والذي موجود في مجلد قاعدة البيانات الخلفية ، كما في برنامج شئون الموظفين: Me.Pic.Picture = BE_Path & "\" & "Employee_Pictures\" & Me.Full_Name & ".jpg" او كما في برنامج المخازن ، حسب السنة ، واسم المستودع ، ثم ادخال او صرف ، ثم رقم الوصل Me.Scan.Picture = BE_Path & "\" & Me.Year & "\" & Me.Store_No & "\" & In_Type & "\" & Me.Reciept_No & ".jpg" ونعرف مكان وجود قاعدة البيانات ، سواء الخلفية او اذا لم تكن مقسمة ، من هذا الرابط: جعفر

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

السلام عليكم ورحمة الله جرب المرفق (بالمعادلات -أعمدة مساعدة- والأكواد)... أرجو أن يفي الغرض المطلوب... بن علية bill_sort.rar

جرب ها الملف جلب الاسماء بدرجاتهم salim.rar

شكرا استاذ مجدى شكرا على الشرح الجميل استاذ مجدى

السلام عليكم و رحمة الله تعالى و بركاته. أستأذنك أستاذ القدير جعفر في إضافة تعديل بسيط على الكود الذي قمت بتقديمة. الكود الذي كتبته أستاذي يقوم بتحديد الخانة الغير محددة و نزع التحديد عن الخانة محددة لقد أضفت تعديل بسيط ليقوم الكود بتحديد كامل الخانات أو إزالة التحديد من جميع الخانات كما طلب السائل. Dim f As String Dim rst As DAO.Recordset Set rst = Me.RecordsetClone rst.MoveLast: rst.MoveFirst RC = rst.RecordCount f = rst!done For i = 1 To RC If f = "true" Then rst.Edit rst!done = False rst.Update Else rst.Edit rst!done = True rst.Update End If rst.MoveNext Next i rst.Close: Set rst = Nothing Selection.rar

رسم بيانى فى الفورم الدرس الثانى عشر حمل الملف اضافة نطاق الى فورم بنفس التنسيقات.rar

وعليكم السلام وحياك الله بين اخوانك القرعة.rar