رمهان

غير اعدادات جهازك للوقت الى شكل 24 ساعة بحيث لا يظهر حروف تدل على الصباح او المساء بالوقت وخصوصا عمود emp_time

عزيزي عمر لا يوجد بالمف السابق الحالة هذا مرفق وبكود بسيط يحذف السجلات لنفس الموظف خلال دقيقة ويبقي والاول يوجد query1 للتجميع و form1 للكود جرب وتقبل تحياتي Del_record.mdb

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

شكرا اخ عمر الان خلينا نفكر خارج الصندوق وبعيد عن عرض الدخول والخروج بصف واحد السؤال : 1. هل تريد حسبة الفرق بين الدخول والخروج ؟ ولو كذلك ستجمعهم وهذا هو ساعات العمل ؟ 2. ماهي الآلية لديك لاقتران الدخول والخروج لسجلين ؟ اي على اي اساس اعتبر ان السجل هذا هو خروج للدخول هذا ؟ تحياتي

تفضل وجزيت خيرا لتنبيه بتعقيب الاخ صاحب السؤال حيث لم ارى استفساره من قبل Me.rasael_custmer.SetFocus For i = 1 To 50 If IsNull(Screen.ActiveControl) Then x = MsgBox(Screen.ActiveControl.Controls(0).Caption, , Me.rasael_custmer!IDr): Exit For: Me.ÃãÑ196.SetFocus SendKeys "{tab}" DoEvents Next والعدد هو عدد خلايا النموذج الفرعي وعبارة عن عدد الحقول مضروب بعدد السجلات ولكن اختصرت العدد تحياتي

لم استطع قتح الملف

حاولت افتح الملف ولم اقدر ولا استطيع تحديث برنامج الوينرار لعدم الصلاحية اعتقد ان اساعدك بفكرة تحياتي

جميل استاذ ممكن نختصره كالتالي وداخل دالة لكي اناديها من اي مكان ()xc= Function xc() xc = CurrentDb.OpenRecordset("SELECT Count(*) FROM (SELECT DISTINCT tblcomIn.Datem FROM tblcomIn)")(0) End Function تحياتي

اوصل البيت وابشر تحياتي

1. تضع جملة الاستعلام مصدر لمربع قائمة وتاخذه من مربع القائمة مع عمل ريكويري للقائمة عند الحاجة 2. تحفظ الاستعلام و تستخدم دالة لوك اب 3. تحفظ الاستعلام التجميعي كما بمشاركتك وتستخدم دي كاونت 4. دالة بالكود هذا واعتقد انك ستعود الينا بفكرة جميلة تحياتي

لم افهم المطلوب تمام يا غالي هل تقصد كيف تحصل على الرقم ؟ حدد المكان ؟

اعتقد ابا خليل يحتاج الكود اعلاه المرور على السجلات بجملتي التحرك لاول السجلات ثم التحرك لاخر السجلات لبعطيك العدد الفعلي دمتم بخير

صحيح وبرافو معناته ليس اكبر عدد حضور لموظف هو الايام الفعلية !! جرب هذا استاذنا وشيخنا SELECT Count(*) from (SELECT DISTINCT tblcomIn.Datem FROM tblcomIn) تحياتي

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

اخي ساندنت بعد اطيب تحية ومشاركة معكم وبعد اذنكم هناك فكرة سهلة كاتالي: اعمل مربع نص في تذييل النموذج الفرعي sub وبه المعادلة التالية وسميه t1 = last([no]) في الحدث بعد التحديث يكون الشرط كالتالي if me.no = me.sub!t1 then ........ بالتوفيق

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

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

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

سألت عنك العافية ابا جودي موجودين واعتذر لانشغالنا قليلا ودمتم سالمين

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

الاخ سلمان كنت تعطينا الملف بالقطارة ..كنت اتمنى الملف كامل من البداية جرب الاستعلام التالي كمصدر للتقرير SELECT TB_conform.Date1, TB_conform.tem, TB_conform.ser FROM TB_conform WHERE ((([Date1] & " " & [tem]) Between CDate([Forms]![FM_report]![text1] & " " & [Forms]![FM_report]![Time1]) And CDate([Forms]![FM_report]![text2] & " " & [Forms]![FM_report]![Time2]))); بالتوفيق

بعد اذن الاساذ صالح اعتقد المشكلة تكمن في ان الجملة تاخذ قيمة الراتب حسب السحل الحالي وهو غالبا يكون الاول عند فتح النموذج هنا جرب الجملة التالية بديلا للجملة اعلاه sql_statment = "update Employees set salary = Salary +" & SalaryIncrement & " where Category = '" & Cat & "'" وهنا ملاجظة بان المشكلة ستضل قائمة بان الفئة هي نفسها فئة اول سجل لذلك يمكنك وضع قيمتها يدوي اسوة بقيمة الزيادة واخيرا للاستاذ صالح اعتقد ليس هناك فرق بين الجملتين في النتيجة ولكن قد يكون هناك فرق في السرعة والفرق الظاهر هو اختلاف المكتبة حيث الاولى مستخدمة كائنات الاكسس والاخرى كئنات dao تحياتي للجميع

جرب الاستعلام التالي وقم بتغيير تاريخ البدء ووقته وتاريخ الانتهاء ووقته وحسب مدة التقرير SELECT TB_1.Date1, TB_1.tem, [date1] & " " & [tem] AS Expr1 FROM TB_1 WHERE ((([date1] & " " & [tem]) Between #1/26/2017 15:0:0# And #1/27/2018 2:0:0#)); بالتوفيق

مشاركة مع الاستاذ جعفر وبعد اذنه نريد ان نعرف طريقتك في اضافة تاريخ حركة البيع ؟ هل مستخدم حقل واحد به التاريخ والوقت ؟ ام مستخدم حقلين واحد به التاريخ والاخر الوقت ؟ وكيفية ادراج القيم ؟ هل تستخدم دالة date() او now() وكقيم افتراضية ؟ ام ماهي طريقة ادخال تاريخ ووقت العملية ؟ بالتوفيق

تحياتي للغالين يمكن تجربة التالي وبمناسبة حضور اسمي بالمشاركة text1.visible=not isnull(text2) بالتوفيق