wael_rafat

اضم صوتي الى استاذنا ومعلمنا القدير ابو خليل خاصية هامة جدااااا ، وخصوصا هذه الايام ومع التطور الحالي باللاتصالات ....

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

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

نعم لاحظت ذلك

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

السلام عليكم ورحمة الله وبركاته استاذنا الفاضل @jjafferr سامحني الكود شغال زى الفل على طابعة الA4 ، ولكن للاسف بعد التجربة على طابعة الفواتير للاسف لم يعمل ويعطيني نسخة واحدة فقط بمعني DoCmd.PrintOut acPrintAll, , , , 3 يعطي نسخة واحدة فقط والله حاولت كتير استاذنا الكريم قبل هذه المشاركة وايضا باعدادات الطابعة كثيرا دون جدوى وسوف يتضح معك الامر لو قمت بالتجربة على طابعة الاوفيس Send To OneNote 2013 عموما استاذي لدي فكرة او حيلة .. لو حاولنا ان نقوم بتكرار الكود DoCmd.PrintOut acPrintAll, , , , 3 سوف تنجح الفكرة .... ولكني فشلت فى الوصول لهذه الحيلة كل شكري واحترامي استاذنا الساحر

حبيبي استاذنا بارك الله فيك وجزاك الله كل خير كل التقدير والاحترام

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

بعتذر اخي الكريم دعني اطلع علي المرفق اولا ...

السلام عليكم بالاضافة الى توجيه استاذنا الغالي رمهاان بارك الله فيه وبتوجيهاته ورؤيته . اخي غريب انا للاسف لم اطلع علي المرفق لكوني اشارك من الموبايل ومن كلامك فهمت ان الامر عبارة عن تكويد وتنظيم الاصناف في البداية بمعنى * مجموعة اللحوم كودها 1 وتضم 1001 دجاح 1002 لحم 1003 سمك * مجموعة المشروبات والعصائر كودها 2 وتضم 2001 مياه 2002 عصير مانجو 2003 عصير فراولة وهكذا ...... هل لاحظت ان كود الصنف مرتبط بكود المجموعة .. وعلية يوجد ربط بين كل مجموعة واصنافها ومن ثم عند الضغط علي مجموعة اللحوم سوف تظهر اصناف اللحوم فقط وعند الضغط علي مجموعة المشروبات سوف تظهر اصناف المشروبات فقط ...... الخ اتمني يكون كلامي واضح ووصلت الرسالة.. بالتوفيق

يا سلام بارك الله فيكم جميعا وزادكم الله من فضلة وعلمه استاذنا القدير @jjafferr تسلم ايدك تماااااام استاذي الحبيب @Shivan Rekany تسلم ايدك تمااااااااااااااام اخي الكريم @أمير2008 بارك الله فيك ولكن مثل ما قال استاذنا جعفر يجب ان تبدأ بـ rs.movelast قبل rs.MoveFirst وإلا فلن تحصل على جميع السجلات كل الشكر والتقدير وبارك الله قيكم جميعا وجزاكم الله عنا خير الجزاء ،،،

استاذنا الغالي للاسف ما ضبط سامحني 1 - الصورة الاولي 2- عند تغيير التاريخ باول سجل من 8 / 5 / 2017 الي 9 / 5 / 2017 سامحني استاذنا وبارك الله فيك

استاذنا الغالي بارك الله فيك على سرعة المشاركة للاسف ما ضبط ....؟؟

السلام عليكم ورحمة الله وبركاته ،،، السادة الافاضل اعضاء ومشرفي منتدانا المحترم ، طلبي هو تحديث مربعات الcheckbox عند فتح النموذج fstart والخاصة بالتواريخ الاقل من تاريخ اليوم بمعني عند فتح النموذج ال fstar يقوم بالتشييك على الجدول tbtable ويقوم بتحديث مربعات الcheckbod والتي يكون عندها التاريخ اقل من تاريخ اليوم مرفق صورة توضيحية وقد حاولت فى الكود التالي ولكن لم يضبط معي Set Rs = CurrentDb.OpenRecordset("tbTable", dbOpenDynaset) If Rs.Fields("check") = False Then Rs.MoveLast: Rs.MoveFirst Do While Rs.Fields("dateend") < Date Rs.Fields("check") = True Rs.Edit Rs.Update Rs.MoveNext Loop End If dateend.rar كل الشكر والتقدير احبائي الكرام

بارك الله فيكم وزادكم الله من فضلة وعلمة كل التقدير والاحترام استاذنا القدير الساحر @جعفر استاذنا الحبيب @Shivan Rekany

حبيبي استاذنا تسلم ايدك تمااااام زي الفل كل تقديري واحترامي حبيبنا

السلام عليكم ورحمة الله وبركاته ،، السادة الافاضل اعضاء ومشرفي منتدانا الجميل استفساري عن فصل جزء من جملة نصية لدي كود لعمل تجميع لعنوان العميل وهو [address].Value = "Area:" & "{" & Me.area & "}" & " - " & "Block:" & "{" & Me.block & "}" & " - " & "Street:" & "{" & Me.street & "}" & " - " & "Jaddah:" & "{" & Me.jaddah & "}" & " - " & "building:" & "{" & Me.building & "}" & " - " & "floor:" & "{" & Me.floor & "}" & " - " & "flat:" & "{" & Me.flat & "}" بمعنى ان المستخدم يقوم بادخال العنوان جزء جزء وهذا الكود اعلاه يقوم بتجميعة بالخلية . وهذا هو الشكل النهائي بعد التجميع Area:{ََQarain} - Block:{3} - Street:{12} - Jaddah:{} - building:{20} - floor:{} - flat المطلوب هو فصل المكان فقط لحالة وهو Qarain مرفق صورة توضيحية مع البرنامج Split text.rar كل الشكر والتقدير ،،،

هلا بيك استاذنا الغالي صاحب اللمسات المستقبلية بصراحة مطلوب جدا هالنوعيات من اللمسات المستقبلية التي تتماشى مع التطور الحالي .... ربط اجهزة الاندرويد مع البرامج ( ارسال واستقبال من والي الكاميرا - ارسال واستقبال واتس اب - ارسال واستقبال مكالمات ... ) معاك خطوة بخطوة يا ساحر

تم استاذنا

ايوة صح دا كلام كبير اوي camera from android mobile بصراحة مواضيع هامة جدا مع التطور الموجود في الوقت الحالي

يا سلام عليك استاذنا جزئية هامة جدا في الوقت الحالي

تمام الحمد لله

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

طبعا مليوووون تم استاذنا القدير

السلام عليكم استاذنا الساحر @جعفر تم التجربة بنجاح والحمد لله تسلم ايدك حبيبنــا Dim stLinkCriteria As String stLinkCriteria = "[orderno] =" & Me![orderno] DoCmd.OpenReport "Rreceipt", acViewPreview, , stLinkCriteria, acHidden DoCmd.PrintOut acPrintAll, , , , 3 DoCmd.close acReport, "Rreceipt", acSaveNo كل التقدير والاحترام ،،،