jjafferr

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

وبسبب طريقة صلاحيات المستخدمين التي استخدمتها في برنامجك ، هي حماية عن طريق النماذج ، يمكنك ان تجعل الزر رقم 1 غير مفعّل ، هكذا جعفر

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

السلام عليكم اخي محمود اذا كنت تريد ان تعمل البرنامج بمقابل مادي وبطريقة مباشرة مع احد الاعضاء ، فيمكنك ان تضع طلبك مع الايميل الخاص بك في المنتدى في قسم "اعلانات شخصية للاعضاء: https://www.officena.net/ib/forum/157-إعلانات-شخصية-للاعضاء/ واما هنا في قسم الاكسس ، فرجاء وضع اسئلتك التي تريد الاعضاء ان تجيب عليها ، وتساعدك في حل مشكلتك او اعطائك نصيحة في جزء ما ، وبما ان القصد من هذا القسم هو استفادة الجميع منه ، فقد تم حذف ايميلك الشخصي من الموضوع. جعفر

تم إضافة ميزة في الموضوع اعلاة ، وهي التي تحتاج لها في برنامجك جعفر

السلام عليكم تم تعديل الملف المرفق ، وإضافة ميزة اخرى لإستعمال البرنامج شكرا على حُسن تعبيركم جعفر

السلام عليكم اخوي ابو ياسين هل هذا الذي تريده ، ولكن طبعا بتغيير بسيط حتى يلائم برنامجك: جعفر

السلام عليكم ورحمة الله وبركاته استقطعت هذا الجزء من احد برامجي عندما يكون عندك صور/صورة بأحجام مختلفة ، وتريد ان تُكبر الصورة حتى تراها بالحجم الاصلي الكبير ، ولكن داخل برنامج الاكسس ودون الاستعانه ببرنامج خارجي: 1. افتح/تصفح المجلد الذي تريد رؤية صوره ، 2. سترى اسماء الصور في القائمة ، وعند النقر على الاسم ، سترى صورته ، 3. في اي مكان في الصورة ، يمكنك النقر مرتين ، وستكبر الصورة ، وكلما تنقر مرتين يزداد حجمها ، الى ان ترجع الى حجمها الذي يملئ الشاشة ، 4و5. وتستطيع رؤية بقية/تفاصيل الصورة بسحبها لأعلى/اسفل او يمين/يسار: الملف اسمه: Browse_images.mdb.zip تعديل رقم 1: شكرا لأخي ابو خليل على تنبيهي بوجدود خطأ مطبعي في الملف المرفق سابقا ، تم تعديل الملف وتم إضافة الملف التالي: Browse_ONE_image.mdb.zip بعض الاوقات نريد ان نفتح صورة موجود مساره في قاعدة البيانات (يعني فتح صورة معينة): . فيكون كود فتح الصورة: DoCmd.OpenForm "frm_Open_jpg" Forms!frm_Open_jpg!sfrm_Open_jpg!Image1.Picture = Me.image_Name وهذه النتيجة ، والتي يمكننا النقر عليها لتكبيرها . جعفر Browse_images.mdb.zip Browse_ONE_image.mdb.zip

وعيدكم مبارك وايامكم سعيدة ان شاء الله جعفر

افضل طريقة هي عمل خلفية عن طريق احد برامج الرسومات او البوربوينت ، وتضع هذه الصورة كخلفية ، وباللون الذي تشاء ، هكذا: جعفر 906.BtmSheak.accdb.zip

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

وعليكم السلام أخي وليد ، وكما لاحظت ، عندما تعطي التفاصيل كاملة ، ففرصة الحصول على الاجابة تكون اسرع قدم لك اخي علاء احد طرق الجمع في الاستعلام ، وهنا اقدم لك طريقة اخرى ، عن طريق النموذج ، والكود يمكن استعماله لأغراض اخرى لفحص الكائنات في النموذج: Private Sub cmd_Count_Click() Dim ctl As Control 'نبدأ بتصفير خانة المجموع Me.[عدد الزيارات الشهرية] = 0 'عمل حلقة لقراءة جميع كائنات النموذج For Each ctl In Me.Controls 'هل الكائن هو حقل اختيار If ctl.ControlType = acCheckBox Then 'هل الحقل به علامة صح If ctl.Value = -1 Then 'اجمع القيم Me.[عدد الزيارات الشهرية] = Me.[عدد الزيارات الشهرية] + 1 End If 'ctl.Value End If 'ctl.ControlType Next End Sub جعفر 905.Database1.accdb.zip

الله يحفظك ان شاء الله اخوي حربي اخي صالح ، هكذا عمل عندي الكود

في الواقع انا لم اكن اعرف هذا الامر ولم استعمله سابقا ، وبحثت عنه البارحة ، وارفقته لك ، وقبل هذا ، جربته على الصفحة التي ارسلتها لي ، وعمل كما يجب!! جعفر

وعليكم السلام الرابط لا يعمل !! جعفر

وعليكم السلام واهلا وسهلا بك في المنتدى ، رجاء تعطي توضيح ومثال لطلبك ، وباريت على ملف اكسس او اكسل او صورة مثلا ، حتى يفهمه الجميع ويبادر بالمساعدة جعفر

وعليكم السلام اخوي ابو ياسين اعطني شرح للمطلوب لوسمحت ، وبالتفصيل ، علشان نفهمه ونحاول نعطيك جواب ان شاء الله جعفر

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

تفضل Web.Document.All("iap").focus جعفر

حياك الله اخوتي ابو خليل ، حلبي ، ابو ياسين ، ابو زاهر و وائل جعفر

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

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

شو اسم المديرية؟ الرقم الذي ارفقته لا يوجد في القائمة!! جعفر

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

لا يعمل الرابط ، Request Rejected !! اذا ما اشتغل الرابط ، اعمل نسخة من Page Source ثم احفظها في ملف txt وارفقه هنا. جعفر