jjafferr

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

2. لا ، وانما ما صار شيء ، والحمدلله 3. تفضل ، وبدون الجدول اللي فيه سجلات سابقة عشوائية جعفر ChangeAndGetScreenResolution.zip

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

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

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

عفوا ما لاحظت المطلوب اليك المطلوب الآن: تغيير اسم الحقل الى اسم مفهوم . إضافة الحقل الآخر للمعيار . حدث النقر على رقم الغرف اصبح: Private Sub Rooms_Click() Select Case Rooms.Value Case 1 Room_Number = 1: Room_Check = -1 Case 2 Room_Number = 2: Room_Check = -1 Case 3 Room_Number = 3: Room_Check = -1 Case 4 Room_Number = 4: Room_Check = -1 Case 5 Room_Number = "": Room_Check = "" End Select Me.sfrm_Room_No_Available.Requery . ومصدر بيانات النموذج الفرعي اصبح: . واكتب لك سطري المعيار ، مع الشرح وذلك لأهميته: check: IIf([Forms]![frm_Rooms_Available]![Room_Check]<>-1,[Check],[Forms]![frm_Rooms_Available]![Room_Check]) اذا مافي علامة صح على الحقل [Forms]![frm_Rooms_Available]![Room_Check] (يعني الحقل لا يساوي -1) اذن اعطنا جميع سجلات الحقل [check] وإلا ، فاستخدم قيمة الحقل الموجودة في النموذج [Forms]![frm_Rooms_Available]![Room_Check] ------------------------------------------ Room_No: IIf(Len([Forms]![frm_Rooms_Available]![Room_Number] & "")=0,[Room_No],[Forms]![frm_Rooms_Available]![Room_Number]) اذا مافي بيانات في الحقل Len([Forms]![frm_Rooms_Available]![Room_Number] & "")= اذن اعطنا جميع سجلات الحقل [Room_No] وإلا ، فاستخدم قيمة الحقل الموجودة في النموذج [Forms]![frm_Rooms_Available]![Room_Number] . وللأسف الشديد ، فأنا ارى الكثير من المبرمجين لا يلتفتون لهذه الاسطر ، ويستخدمون Like بدلا عنها جعفر 621.Test.accdb.zip

وعليكم السلام حياالله أخوي بدر معيار الصح في حقل نعم/لا ، هو: -1 ومعيار غير الصح في حقل نعم/لا ، هو: <> -1 وفي معيار غير الصح في حقل نعم/لا ، تستخدم: 0 (صفر) ، لان الحقل يمكن ان يكون صفر او لا شيء. جعفر

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

شكرا أخي شفان على الهدية حاولت اغير دقة الشاشة الى دقة اخرى ، او حتى اختار من قائمة السرد ، ولكن لم يفلح الامر وكذلك ، ياريت يكون فيه قائمة بالدقة المسموح بها في كمبيوتري ، بدل القائمة الافتراضية جعفر

حياك الله حسب علمي لا يمكن هذا ، لهذا السبب هو مشفّر. جعفر

جرب تغيير كلمة tif إلى Pdf

وعليكم السلام طريقتين يجون على بالي: 1. نسخ السجل بالكامل ، عمل سجل جديد ، لصق بيانات السجل ، ثم حذف/تصفية الحقول التي لا تريدها: DoCmd.RunCommand acCmdSelectRecord DoCmd.RunCommand acCmdCopy DoCmd.GoToRecord , , acNewRec DoCmd.RunCommand acCmdPaste me.Field5=0 me.Field6="" 2. تنسخ قيمة كل حقل في متغير في الكود ، عمل سجل جديد ، لصق هذه المتغيرات الى حقولها: a1=me.field1 a5=me.field5 a6=me.filed6 DoCmd.GoToRecord , , acNewRec me.field1=a1 me.field5=a5 me.filed6=a6 جعفر

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

حياالله أخوي رمهان نعم هذا اللي فهمته ، ولكن الدبل كليك على السجل في النموذج الفرعي ، وانا عملته على الحقل ID: جعفر

السلام عليكم اعتذر عن مشاركتي السابقة ، ففيها خطأ ، وتم اصلاحه في الرابط: جعفر وحياالله الشباب جعفر

السلام عليكم ابا جودي انا اعتذر منك ، فالكود الذي اعطيتك اياه ، خلق خطأ آخر: If Len(strFileNames & "") = 0 والحل في هذا الكود ان شاء الله (السطر الاول من الكود ادناه) ، وبقية الكود موجود عندك اصلا: strFileNames = "" strFileNames = apiBrowseFiles("Select a File, OR Multiple Files", sFolder, , strFilter) ' user didn't select any file, s/he proceed cancel If UBound(strFileNames) = 0 Then 'No Path, Exit Sub End If جعفر

هلا ومرحبا بأخوي حربي الله يسلمك ويعافيك ان شاء الله جعفر

وعليكم السلام هذا ايميل بصيغة "smime.p7m" مشفّر ، ويحتاج مفتاح لفك التشفير ، وهذا المفتاح يكون فقط على الكمبيوتر الذي عليه برنامج الايميل جعفر

هلا والله

عفوا أخي أوس انا لا احبذ On Error Resume Next ، لانه لا يخبرنا عن الاخطاء التي تحدث في الكود ، واستعمالي لها يكون في نطاق ضيق الطريقة الصحيحة للتعامل مع هذه المشكله هي: جعفر

السلام عليكم انا اضيف لك سبب ، بالاضافة الى سبب أخوي أبو إبراهيم: برنامج مسقط التقارير يُعتبر برنامج قائم بحد ذاته ، و إحمل برامجك داخل قاعدة بياناتك والذي كذلك يُعتبر برنامج قائم بحد ذاته ، اي يمكن استعمالهم بدون عملية الدمج (طبعا برنامج مسقط التقارير يحتاج الي تعديل ليعمل بمفرده (والنسخة التالية ستكون كذلك ان شاء الله) ، ولكن البرنامج الآخر فيمكن ان يعمل بطريقة مستقله) ، انت لست بحاجة الى نقل الكائنات الى برنامجك ، فالبرنامج يستطيع ان يقوم بالعمل وهو برنامج مستقل ، بمجرد ان تناديه برمجيا ، ولكن انظر المشكلة التي صادفة omarahmed1424 لما اراد دمج البرنامج في برنامجه: ولاحظ جوابي عليه: جعفر

1. هذا غير صحيح ابا جودي ، ولكن الكود يقوم بعمله "مجلدا داخل مجلدا داخل مجلد": يعني مثل ما قلت: جعفر

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

همممم هذا علم وتخصص كذلك كلام سليم 100% ، شكرا على الملاحظة أخوي رمهان جعفر

تم عمل اللازم وسيتم حذف الايميل بعد دقائق ، حتى لا يستغله القراصنة جعفر