Amr Ashraf

وعليكم السلام ورحمة الله وبركاته .. ما هو معيارك لتحديد أخر رتبه هل هو Date In ام Date Out وماذا اذا كان حقل التاريخ فارغ ؟ وكيف يتم الالحاق وهل هو الحاق لمرة واحدة عند الحصول على الرتبه ؟ ولماذا يتم الالحاق من الاساس هل عمل استعلام يقوم بربط الشخص بآخر رتبة حصل عليها غير كافى بالنسبة لعملك ؟ اجب على الاسئلة السابقة تسهل الامر على من يجيبك . بالتوفيق

حقل فى الجدول به رقم العطل

تفضل المثال عملت جدولين واحد للماكينات والثانى للاعطال , ثم عملت 4 استعلامات لاستخلاص ترتيب الاعطال , فى الاستعلام الاخير QryResult مربوط بال4 استعلامات المساعدين و ستجد به النتيجة التى اقصدها . يمكن الاستغناء عن الاستعلامات باستخدام دالة IIF مثلا كالتالى : IIF([StoppageSerial]=1,[Reason]) ستقوم بعرض سبب العطل ان كان السيريال 1 فى الجدول .. فهمت الفكرة ؟ بالتوفيق . Downtime - Amr.accdb

سأعمل لك مثال بسيط لتوضيح الفكرة

هذه الطريقة قابلة للتطبيق ويمكنك مشاهدة مثال لها فى الموضوع التالى : اذا اردت حل بدون اكواد يمكنك ترقيم التوقفات فى جدول التوقفات وعمل استعلام به عدد من الاعمدة مثلا توقف1,توقف2,توقف3 وهكذا وتعمل استعلام يجلب التوقف بناء على رقمه فى العمود المناسب بحيث التوقف الاول سيظهر فى العمود توقف1 وهكذا فهمت الفكرة ؟ لكن يعيبها فى حالة عدم وجود توقفات للماكينة سيكون العمود فارغ او يكتب فيه بدون توقف مثلا .. فهمت الفكرة ؟ فى الاستعلامات لا اظن ولكن فى النماذج اعتقد يمكن بكود ما جعل كل عطل فى سطر داخل حقل نصى طويل مثلاً وعامة الفكرة غير عملية حتى اذا تم تطبيقها . بالتوفيق .

هبقى اجرب وفى حالة وجود ملاحظات سأبديها لك .. سلمت يداك

جعله الله فى ميزان حسناتك، عمل مهم

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

السلام عليكم .. شيخنا الجليل @ابوخليل بعد الكثير من البحث وزد عليه الكثير من البحث وجدت الحل لسؤالك ولكن للأسف لم اتمكن من انهاؤه لنقص فى مكتبة ما لا استطيع ايجادها وفكرت فى مشاركة ما توصلت اليه عسى ان يستطيع احد الاخوة اكمال ما بدأته . الحل هو كما قال أستاذنا ابو ابراهيم الغامدى ولكن لتطبيقه مطلوب الكثير من العمل والكثير من الاكواد بعد البحث توصلت اليها وهى فى المثال المرفق , بعد الاكواد ينبغى عمل مشروع على هذا الرابط console.developers.google.com/ وتفعيل خدمات Drive API ثم توليد Client ID و Client Secret وهما متغيران لازمان لاستكمال الاتصال وذلك بالاضافة الى اسم البريد Gmail و الباسوورد لخاص به. وبعد كل ذلك ستأخذ المعلومات التالية كما اشرت .. مثلا كالتالى : Client ID 534536397580-mi202o94563a4hp4u5d7pilgij83einr.apps.googleusercontent.com Client Secret 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 وبوجود الاكواد مع هذه البيانات يفترض انك جاهز للاتصال بجووجل درايف بدون فولدر مزامنة وبدون اى شئ آخر ولكن النتيجة كانت كالتالى : هذا هو شكل نموذج الاعدادات التى تدخل بياناتك فيه ثم تضغط على Get Token للحصول على توكين فريد مثل الكوكيز فى التصفح مثلا , المفترض فى حالة نجاح الاتصال تظهر ملفاتك هنا وتقوم بالتعديل عليها كما تريد ولكن ظهرت المشكلة التالية : مصدرها الكود التالى وهو فى الغالب نقص مكتبة خاصة بالاتصال 0Auth , والتى حاولت الوصول الى اى شئ خاص بها وبحثت فى مواقع المكتبات حتى انى نزلت مكتبة باسم google.apis.drive.v3.1.55.0 وذلك لاضافتها لحل المشكلة ولكن لم يقبل البرنامج اضافتها . المثال فى المرفق عسى ان يستطيع احد الاساتذة تشغيله او على الاقل يكون حجر الاساس ليبنى عليه استاذ ابو ابراهيم فكرته او يساعده اختصارا للجهد . المعلومات السابقة غير موجودة بمكان واحد على الاطلاق ولكنها نتاج بحث كثير ومناقشات مع العديد من الاجانب والذين لم يستطع احد منهم اكتشاف المكتبة الناقصة او طريقة الحصول عليها .. كنت اتمنى استكمال الفكرة ولكن هذا ما وصلت اليه .. بالتوفيق استاذنا democAuth.mdb

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

شرفنى مرورك استاذ موسى

ممكن تستخدم التالى : Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer) Select Case KeyCode Case 110 ' Press n For new record Docmd.GoToRecord,,acNewRec End Select End Sub عند الضغط على حرف n سيأخذك لسجل جديد , ممكن تغير الحرف ابعتلى انتا عاوز اى زر بالظبط وانا اظبطلك الكود الطريقة غير مألوفة لدى , ممكن مثال يا هندسة ؟ 😄

يتم استيرادها من الملفات الموجودة مسبقاً اختصارا للوقت والجهد , ولكن قد تحتاج لبعض التهيئة والترتيب لاستيرادها للجدول الجديد. لن تحتاجى لقاعدة جديدة لهذا الطلب يمكن عمل التالى : اضافة جدول جديد باسم TblRequests مثلا ويكون به الحقول التالية (كود الموظف - رقم الطلب او الاستمارة - تاريخ تقديمه - ملاحظات ) نموذج لتعبئة حقول الطلب بالشكل الذى ترينه مناسباً. يتم عمل التقييم المطلوب بناء على البيانات الاخرى الموجودة فى القاعدة مثل ايام الغياب - تقييم شهرى مثلا لو هناك تقييم وهكذا . الفكرة كلها سيتم ادخال جميع البيانات اللازمة فى القاعدة الجديدة . قد تحتاجيه اذا كان هناك تقييم على الاجازات والغيابات وتأخيرات الحضور الخ ... طبعاً هذا ليس مجال عملى وانت الاكثر دراية بما ستحتاجيه فى المستقبل . بالتوفيق

شرفنى مرورك اخى الكريم

لا داعى للاعتذار اختى الفاضلة كلنا هنا نتعلم ونساعد بعضنا ,, بخصوص طلبك يمكننى اقتراح التالى وذلك لتأسيس القاعدة التى تريدينها : بالنسبة للجداول (يفضل تسمية الكائنات باللغة الانجليزية لتسهيل العمل فى القاعدة) : الجدول الاول : وهو جدول الموظفين ومعه ما يتعلق بهم من بيانات وليكن اسمه TblEmployees يحتوى على الحقول التالية (كود الموظف - اسم الموظف - السجل المدني - تاريخ الميلاد - مكان الميلاد - رقم الجوال - المؤهل العلمي - التخصص - جهة العمل - مقر العمل -القسم /الشعبة - تاريخ التعين -المرتبة الحالية - تاريخ التعين على المرتبة الحالية - المسمى الوظيفي -العمل الفعلي - هل مكلف من ادارة اخرى ؟ نعم / لا - الادارة المكلف منها ) وذلك طبقاً لبياناتك المذكورة وزيادة عليها عمل كود للموظف وجعله مفتاح اساسى لعدم التكرار , اذا لم ترتاحى لدمجهم فى جدول واحد فلتقسميهم الى جدولين كما تحبين ولكنى لا ارى دافع يجعلنا نقسمهم الى جدولين حتى الآن . الجدول الثانى : جدول المؤثرات حضور و انصراف واجازات وغياب الخ .. يحتوى على الحقول (كود الموظف - التاريخ - ساعة الحضور - ساعة الانصراف - نوع الاجازة (فى حالة عدم الحضور) - ملاحظات) يتم ربط هذا الجدول بجدول الموظفين عن طريق كود الموظف والعلاقة One To Many او واحد الى متعدد بالعربى . هذه هى البداية والباقى يأتى تباعاً طبقا لاحتياجك .. واقترح عليكى البحث فى المنتدى بكلمة شئون موظفين او حضور وانصراف موظفين وستجدين الكثير من الافكار . بالتوفيق.

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

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

استاذنا @ابوخليل اعذرنى ولكن اريد مناقشة الموضوع اكثر عسى ان ينتج فكرة جيدة .. طلبك كان تنزيل Download ملف معين من سحابة خاصة الى سحابة اخرى وليكن جووجل درايف بدون تدخل من المستخدم وبدون جهاز كمبيوتر وسيط أليس كذلك ؟ - اذا اردت العملية بدون وسيط وبدون تدخل منك انصحك بتجربة الموقع الذى اشرت اليه سابقاً قد يغير رأيك . اذا تنازلت وجعلت جهازك وسيط للعملية ستحتاج للقيام بأكثر من خطوة وهى ( تنزيل الملف Download - رفعه الى السحابة المطلوبة دروب بوكس او جووجل درايف أيا كان ) خطوة التنزيل Download : طالما الملف موجود على سيرفر يبقى FTP متاح اليس كذلك ؟ من الممكن الاستفادة من ملف .bat فيه سطر واحد لتنزيل الملف واعتقد الامر wget هو المستخدم فى هذه الحالة مثل WGET ftp://ftp.mydomain.com/path/file.ext فى حالة عدم طلب مصادقة من السيرفر .. اما فى حالة المصادقة يمكن استخدام الامر التالى : WGET ftp://user:password@ftp.mydomain.com/path/file.ext ونقوم باستخدام جدولة الويندوز لتشغيل الملف .bat .. يبقى نظريا قمنا بتنزيل الملف المطلوب الخطوة التالية هى استخدام جدولة ويندوز مرة اخرى لنسخ الملف من مسار التنزيل الى فولدر المزامنة الخاص بالسحابة وبهذا لم يقم المستخدم بأى خطوات ولكن هناك كمبيوتر وسيط للقيام بالعملية . اذا لم يكن المطلوب اتمنى توضيح المطلوب اكثر وذلك لأننا نستمتع بمجرد المناقشة معك فى اى موضوع شيخنا الجليل .

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

السلام عليكم .. استاذنا الفاضل @jjafferr موضوع هام جدا وكنت قد فتحت موضوعا لأستفسر عن طريقة عمل مثل هذه التقارير والرسومات البيانية و Dashboard فى هذا الموضوع وللأسف لم يتصدى احد للاجابة عن السؤال فقمت بتأجيل الفكرة لوقت آخر .. نتمنى استكمال الموضوع وسأقوم بتجربة المرفقات .. جزاكم الله خير على طرح الموضوع

السلام عليكم .. استاذنا الفاضل ابو خليل .. مررت بخدمة مشابهة واستخدمتها بنفسى عن طريق هذا الموقع https://www.multcloud.com/ الموقع يقوم بمزامنة كل حساباتك فى اغلب المواقع السحابية ودمجها على حسابك ويمكن تشبيهه بMy Computer وبه مجموعة من الدرايفرات .. وفى النسخة المدفوعة من الحساب يمكنه عمل نسخ بأوقات معينة من سحابة الى سحابة دون تدخل منك ودون الدخول الى الموقع حتى .. وذلك على حد تذكرى للموضوع .. عسى ان يكون نافعاً لك .

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

جارى التجربة وفى حالة نجاحها لى عودة

انا اعطيتك الحل بالفعل اخى الكريم.. عليك فقط بالتجربة

😅 اوك .. انظر لهذا الكود فى حدث On Time Private Sub Form_Timer() Dim x, x1, dx As Integer x = DCount("*", "جدول2") Debug.Print x If Time = TimeValue("14:22:00") Then DoCmd.SetWarnings False DoCmd.OpenQuery "الحاق_من_ج1_الى_ج2" DoCmd.SetWarnings True x1 = DCount("*", "جدول2") Debug.Print x1 dx = x1 - x Debug.Print dx If dx >= 0 Then MsgBox ("تم اضافة عدد " & dx & " سجل ") End If End Sub اذا اتى الوقت المكتوب فى الشرط سيتم تشغيل استعلام الالحاق وظهور رسالة تبين عدد السجلات التى تم الحاقها وبهذه الطريقة ستعرف اذا نجحت العملية ام لا (هذه الفكرة التى اتتنى بخصوص طلبك اكيد فيه طريقة اخرى اذا لم يعجبك الحل ) ملاحظة : طبعا الكود لازم يتم وضعه فى نموذج مفتوح دائما وليكن شاشتك الرئيسية .. مرفق القاعدة .. بالتوفيق 1053855661_AppendOneTime-Amrv2.0.accdb