jjafferr

ليش كل هذا العمل ، كل اللي عليك عمله هو انك تغير هذه الاعدادات: ولما تستخدم طريقة اخوي ابومحمد ، ففي الواقع اسهل لك ان تغير اعدادات النموذج والسلام 🙂 انا اعطيتك الامر ، ويجب ان تدُخل الارقام لكي يعمل الامر ، وهذا مثال من برامجي (لا عليك من كل الكود ، فقط انظر للسطرين الاخيرين) ، والافضل لك ان تبحث قليلا في مساعد الاكسس حتى تعرف الارقام التي يجب استعمالها ، والارقام هي بالـ Twips ، فاذا نظام الكمبيوتر عندك بالسنتيمتر ، تضرب الرقم في 567 ، واذا النظام بالبوصة فتضربه في 1440 : Right = المسافة من طرف شاشة الاكسس ، من اليسار ، Down =المسافة من طرف شاشة الاكسس ، من فوق ، Width = عرض النموذج ، Height = ارتفاع النموذج 'get the Form size H = Me.WindowHeight W = Me.WindowWidth '0 = metric t = 567 ' Open the Form DoCmd.OpenForm "frm_Items_DS", acFormDS Forms!frm_Items_DS.SetFocus DoCmd.GoToRecord , , acNewRec DoCmd.GoToControl "Receipt_Date" 'select the Form DoCmd.SelectObject acForm, "frm_Items_DS", False DoCmd.Restore 'DoCmd.MoveSize right, Down, Width, Height 'DoCmd.MoveSize (t * 0.1), (t * 0.1), 18000, 13500 DoCmd.MoveSize 1, 1, W - (W * 0.02), H - (H * 0.05) جعفر

ما رحنا بعيد ، انا كذلك 🙂 شكرا لك 🙂 مع اني كنت افكر اعمل لي قاعدة بيانات ، ومنها ابحث 😁 جعفر

هذه الطريقة لجعل النظام يعمل على النواتين: جعفر

ما ادري اذا كان هذا سؤالك : نص x رقم y DoCmd.OpenForm "FreaderL", , , "[x]='" & Cstr([y]) & "'" x رقم y رقم ولكن في حقل نص DoCmd.OpenForm "FreaderL", , , "[x]=" & Val([y]) x رقم طويل y رقم ولكن في حقل نص DoCmd.OpenForm "FreaderL", , , "[x]=" & Clng([y]) . اسألك على سالفة الرجوع الى مواضيع سابقة ، كيف توصل لها ؟ جعفر

لا ما نسيت ، ولكني صرت متعود على ان IntelliSense يدلعني وامشي على خطواته 🙂

هذه السالفة ولا حتى تيجي على بالي 😁 الى هنا والكل كان يعرف ، بس انت افشيت السر واشرت بالـ emoji على اصحابنا 😁 جعفر

يا سلام عليّ ، جاوبت في الماضي على سؤال المستقبل 😁 يالله بسرعة اعمل بخور وابخّر عمري قبل ما تجيني عين 🙂 جعفر

فكرة جميلة 🙂 جعفر

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

وعليكم السلام 🙂 اسهل لك ان تطبع على طابعة بـ 16 لون 🙂 او انك تعمل على حدث On Print كود ، تخبره اسم الحقل ولون الخلفية الذي تريد تغييره ، ثم تعطيه لون ابيض ، ونعم ، لجميع الحقول 🙂 جعفر

وعليكم السلام 🙂 هذا من: ، وعليك ان تكمل الباقي : . جعفر

وعليكم السلام 🙂 الامر هو docmd.MoveSize Right, Down, Width, Height جعفر

وعليكم السلام 🙂 هذه امكانيات الاكسس ، في آخر نقطة للنماذج تجد الجواب مواصفات Access - Access (microsoft.com) جعفر

من تجربتي ، يجب ان يكون لهذا القرض رقم ايضا ، فقد يأخذ قرض للمواد الكهربائية ووو مثل عند اخونا @كريمو2 ، وحتى قروض النقد ، فإذا استوفى قيمة القرض ، قد يأخذ قرض آخر في الشهر التالي !! جعفر

وعليكم السلام 🙂 اهلا وسهلا بك في المنتدى 🙂 للإستفادة القصوى من المنتدى ، رجاء قراءة قوانين المنتدى : https://www.officena.net/Tips/Questions.htm المنتدى مليء بمواضيع الحماية ، فقط قم بالبحث. يُغلق جعفر

نعم اعرف ، وقد اخبرتك بهذا مسبقا ، فقط قم بعمل Compile حتى ترى الخطأ ، ولما تصلحه سترى الخطأ الذي بعده ، وهكذا !! وهي ليست اخطاء ، ولكن لأنك مكرر التصريح بهذه المتغيرات مرتين ، في الوحدتين النمطيتين ( basBrowsefiles ) ( Module11 ) !! وبسبب ان عندي عيد اليوم (كلّ يومٍ لا يُعصى الله فيه فهو عيد) ، بعطيك فرصة لليل ، وبعدها بغوص في برنامجك واشوف الحل ، ان شاء الله 🙂 جعفر

السلام عليكم 🙂 اخي الفاضل ، رجاء قراءة قوانين المنتدى ، وفي المرات القادمة ، بوضع عنوان صحيح للموضوع ، يدل على مضمون الموضوع 🙂 هذا الكود لا يحفظ قيم ، وانما يُحدّث قيم : وليس لسجل واحد ، وانما لجميع قيم (سجلات) الحقل st_no في الجدول ENTER_SAFF . جعفر

تقدر ان توقف هذا السطر ، بوضع العلامة ' في اول اسطر ، لأنك اصلا ما تستعمل هذه المكتبة 🙂 ولكن ، ستحصل على اخطاء اخرى من البرنامج ، بسبب تكرارك للوحديتين النمطيتين ، لهذا السبب يجب عليك حذف احدهما ، ولكن بعد نقل بقية الدوال اليها 🙂 جعفر

كان المفروض اقول : . المهم في هذه الخطوة هي فهمك للبرنامج ، و رؤيتك له كبرنامج واحد يحتوي على بيانات جميع المواقع ، وانك تستطيع تمييز بيانات كل موقع في كل جدول ، . 1. نعم قد تحتاج لهذا ، ولكن كل هذا يعتمد على بيانات كل جدول (رجاء قرءة ملاحظتي اعلاه) ، 2. اذا كان نوع حقل تسلسل البيانات "تسلسل تلقائي" ، فيجب عليك ان تعمل حقل جديد من نوع رقم ، ثم تنقل بيانات الحقل السابق الى الحقل الجديد ، واذا كان الحقل القديم "لا يقبل التكرار" فيجب تغييره ليقبل التكرار ، وهكذا ، 3. هناك عدة طرق ، ولكن خلينا بعيد عن التقنية ، فالامر يحتاج الى تدقيق مع كوب قهوة ، لذا : ضبّط جدول واحد في قاعدة بيانات واحدة ، القاعدة رقم 1 ، ثم اعمل ربط لقاعدة البيانات رقم 2 ، واعمل ربط لهذا الجدول من قاعدة البيانات رقم 2 ، وسيعطي اكسس الجدول المربوط ، نفس اسم الجدول القديم متبوعا بالرقم 1 (مثلا tbl_Names1) ، فيكون عندك في قاعدة البيانات رقم 1 ، الجدول المُعدل ، وربط بجدول من قاعدة البيانات 2 ، اعمل استعلام إلحاق ، لتلحق بيانات جدول قاعدة البيانات 2 ، في قاعدة البيانات 1 . السبب في استعمال هذه الطريقة ، لأنك معتاد على هذا النوع من الربط والاستعلام 🙂 جعفر

في الكود الذي خلف زر "حفظ" ، انت قلت له بأن يحفظ الملف بإسم StrName : جعفر

تفضل 🙂 بس انت المكتبة في وحدتين نمطيتين ، ليش ؟ يحتاج ان تنظف الكود من احدهما ، وتشير الى الثانية في كل البرنامج 🙂 جعفر ‏‏‏‏StuData4.zip

وعليكم السلام 🙂 يمكنك استيراد جميع الكائنات الى قاعدة بيانات واحدة ، ولكن اذا كانت حقول الجداول متشابهة ، ولكن بيانات كل قاعدة بيانات تختلف عن الاخرى ، فالطريقة الصحيحة هي عمل حقل جديد باسم "الموقع" (جميع مسميات كائنات قاعدة البيانات يجب ان تكون بالانجليزية ، حتى يسهل عليك كتابة المعادلات والكودد) ، فتعبئ هذا الحقل لكل قاعدة بيانات (حتى تستطيع ان تميز بيانات قاعدة بيانات عن اخرى) ، ثم تستورد جميع الجداول المتشابهة الى جدول واحد ، ويكون عندك نموذج الرئيسي لا يتم غلقة ، وفيه تختار "الموقع" ، وفي الاستعلامات ، اضف لها حقل "الموقع" ، ثم في المعيار اشر الى اختيارك من النموذج الرئيسي. جعفر

وعليكم السلام 🙂 هذا معناه ان مناداة المكتبة الـ 32بت تحتاج الى تعديل حتى تعمل على الاكسس 64بت الذي منصّب على جهازك الذي تستعمله الآن ، المثال الاخير في هذا الموضوع فيه طلبك: اجعل برنامجك يعمل على النواتين 32بت و 64بت - قسم الأكسيس Access - أوفيسنا (officena.net) جعفر

اخي الفاضل : الطريقة الصحيحة للحصول على رقم جديد للفاتورة ، هي عن طريق استعمال حقل رقم ، ثم في النموذج تزيد هذا الرقم ، لماذا ؟ هل ستحتاج الى ان يبدأ هذا الرقم من جديد في كل سنة ، او تجعل كل فرع من فروع الشركة يكون له التسلسل الخاص به ، او .... لذا حقل "ترقيم تلقائي" هو الحقل الخطأ لإستعماله في حالتك !! ابحث في المنتدى ، فهذا من المواضيع الكثيرة التداول ، واليك مثال : ترقيم تلقائي يتجدد كل سنة - قسم الأكسيس Access - أوفيسنا (officena.net) جعفر

الاختلاف يكون بسبب تنسيق نوع الحقل ، او استعمال اوامر تقريب الرقم مثل Round او Int او Abs او ... سواء في الاكسس او الاكسل 🙂 جعفر