jjafferr

السلام عليكم أخي كرار اعمل كل ما قلته عن العلاقات في الاستعلام ، وستكون سهل التعامل معها ان شاء الله للعلم ، انا لم انزل المرفق فلا اعرف مافيه جعفر

أخوي ابو خليل رحم الله والديك دنيا وآخرة ، كنت اريد ابحث عنها جعفر وتمت التجربة بنجاح وان شاء الله استخدم هذه الطريقة في مرفق الرابط: http://www.officena.net/ib/topic/67205-هل-من-حل-شافى-لمشكلة-اختلاف-اعدادات-اللغة-بالويندز-على-الأجهزة-المختلفة/?do=findComment&comment=437551 وبهذه الطريقة يتكامل الموضوع اكثر جعفر

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

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

وعليكم السلام ابش رايك في Enhanced Msgbox (هو اصلا نموذج ، ولكن معمول خصيصا لعمل Msgbox ) ، وجاهز للتحميل المجاني هذه بعض الاشكال والالوان التي تستطيع ان تعملها ، وطبعا اللغة كذلك . وفي نسخته العاشرة هذا رابط الموقع ، وجميل النظر الى ملاحظات القرّاء: http://blog.nkadesign.com/2008/ms-access-enhanced-message-box-replacement/ ولتحميل البرنامج: http://blog.nkadesign.com/wp-content/uploads/2008/05/EnhancedMsgBoxv1.10.zip جعفر

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

السلام عليكم انت لم تقل بانك تريد تحديث حقل في جدول آخر هناك طريقتين على بالي: 1. في النموذج الفرعي Al_Mawad ، غير قيمة الحقل Total بدل =[Adad_S]-[Al_adad] الى =nz([Adad_S],0)-nz([Al_adad],0) على حدث "بعد التحديث" للحقل Adad_S والحقل Al_adad ، اكتب هذا الكود: docmd.runcommand accmdsaverecord docmd.openquery "Q1" وبهذه الطريقة لن تحتاج لزر التحديث ، حيث سيتم تحديث الباقي تلقائيا ، كلما تم تغيير الرصيد او العدد في النموذج 2. وهي كود لزر التحديث ، ولكني لا احبذه ، فقد ينسى المستخدم استعمال هذا الزر ، وتصير الكارثة كما اننا نستطيع ان نجعل هذا الكود على حدث "اغلاق النموذج" ، وسيتم تلقائيا ، ولكنه سيعمل مشكلة اذا استخدمت قاعدة البيانات في شبكة ، وكان هناك اكثر من شخص يستخدمون البرنامج يعني بالعربي ، ما بيفيدك هالكود جعفر

ارفق النموذج والاستعلام والجدول (وبهم بيانات) ، فانا اعتقد بأن الموضوع ابسط بكثير من هذه العملية ، ويمكن تبسيطه جعفر

السلام عليكم لماذا لا تضع قائمة باسماء الطابعات في النموذج ، ويجب عليه اختيار الطابعه قبل الطباعة؟ هذا الرابط به عدة مرفقات وروابط اخرى ، وفيها الطريقة: http://www.officena.net/ib/topic/49802-اختيار-اسم-الطابعة-عند-طباعة-تقرير/ جعفر

عفوا أخي ، اختلط عليّ الامر هناك طريقتين: 1. Msgbox ، حيث ان الرسالة لما تظهر ، فانها توقف الكود ، فاستعملها هكذا: . . 2. Timer ، هذا الكود يجعل الكود يتأخر الوقت المطلوب: . . ولكن السؤال هو: لما هذه العملية؟ لماذا لا تضع قائمة باسماء الطابعات على النموذج ، ويجب عليه اختيار الطابعه قبل الطباعة؟ هذا الرابط به عدة مرفقات وروابط اخرى ، وفيها الطريقة: http://www.officena.net/ib/topic/49802-اختيار-اسم-الطابعة-عند-طباعة-تقرير/ جعفر

السلام عليكم في الجدول TBL2 عندك نسختين من كل حقل ، مثلا Type (النوع) و Type1 (النوع) ؟ فايهم تستعمل للحساب؟ جعفر

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

ولكن جعفر

ما فرقت العملية ، الطريقة نفسها اللي ذكرتها جعفر

وعليكم السلام في VBA ابحث عن Msgbox ، وفيه مثال تأخير بالثواني اللي تريد فإعمل الكود قبل إعطاء امر فتح التقرير جعفر

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

وعليكم السلام انا لم استخدم AutoKeys Macro من قبل ، فلا تلومني اذا لم استطع مساعدتك علشان البحث يتم ، يجب ان تكون احد الحقول مختارة Setfocus ، واللي لاحظته ان الماكرو عندك يستعمل الامر الذهاب الى [Screen].[PreviousControl].[Name] ، واللي المفروض ان يؤدي نفس الغرض ، ولكن ، يجب عليك التأكد ان الحقل الذي تكون عليه قبل عملية البحث هو حقل "نص" وليس اي كائن آخر في النموذج مثل زر الامر مثلا جعفر

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

وعليكم السلام اعمل حقل في الجدول بإسم Bal ، اذا كان برنامجك على الاكسس 2007 فما فوق ، ففي الجدول حقل من نوع "حقل محسوب" ، تجعل فيه المعادلة التي تريد للحقل Bal ، وهو يحسبها تلقائيا اما الطريقة الاخرى ، ففي النموذج ، وعلى حدث "بعد التحديث" للحقل العدد المطلوب بيعة ، اعمل المعادلة: me.Bal= me.الرصيد - me.العدد والقيمة تلقائيا ستدخل النموذج والجدول جعفر

وعليكم السلام أختي هكذا عمل الكود : اذا كان حقل عدد الاصناف نص ، فالمعادلة هي كما ذكرتي: =DCount("[رقم الفاتورة]";"الفاتورة";"[نوع الفاتورة] = 'شراء' And [عدد الأصناف]='" & [عدد الأصناف] & "'") بينما اذا كان حقل عدد الاصناف رقم ، فالمعادلة ستصبح =DCount("[رقم الفاتورة]";"الفاتورة";"[نوع الفاتورة] = 'شراء' And [عدد الأصناف]=" & [عدد الأصناف]) جعفر

وعليكم السلام هناك 3 طرق للتعرف على الحقل الذي قيمته Null (لا قيمة ، او قيمة غير معروفة) ، سنعمل على هذا جدول ، ولاحظ السجلات الفاضية: . في الطريقة الاولى (IsNull) قلنا اذا الحقل Null ، فاعطنا النتيجة 0 ، في الطريقة الثانية (Len) قلنا اذا عدد حروف الحقل تساوي صفر ، فاعطنا النتيجة 1 ، . والنتيجة: . لكن الامر الاكثر إتباعا هو Nz ، ومعناه Null to Zero ، والامر هو NZ([Field_Name], Value to Replace)Q ، واليك 4 امثلة عليه: 1. الطريقة الخطأ في استعمال الامر ، حيث لم نخبر الامر النتيجة التي نريدها في حال اكتشف ان الحقل فاضي ، 2. اذا كان الحقل Null ، فحول نتيجة الحقل الى 0 (وهذه الطريقة الاكثر اتباعا) ، 3. وممكن ان ، اذا كان الحقل Null ، فحول نتيجة الحقل الى 1 (او اي قيمة ثابته) ، 4. والقليل يعرف ، اذا كان الحقل Null ، فتستطيع ان تعطي اي قيمة/معادلة شئت للحقل (لاحظ انا ضرب قيمة الحقل Field1 في 100 وفي 200 ، حسب قيمة Field1) ، وحتى يمكننا ان نستدعي دالة Function : . والنتيجة: . جعفر 292.Nulls.mdb.zip

وعليكم السلام انا عملت لك طريقتين لعمل سجل جديد ، وتفتح النموذجين من ازرار النموذج الرئيسي: . . 1. الماكرو 1 يفتح النموذج frm_Table1 مباشرة على سجل جديد ، وهذه الطريقة هي الافضل ، 2. عند فتح النموذج frm_Table2 ، وعلى حدث "عند الفتح" ، يقوم ماكرو 2 بعمل سجل جديد (وهذا اللي انت قمت به) جعفر 291.English_wordings.mdb.zip

السلام عليكم أخي ابو عبدالله هذا ليس برنامجي!! قلت لك جرب برنامجي ( Multilanguage3.zip )كما هو لوسمحت من النموذج الرئيسي تختار اللغة العربية ، ثم تضغط على زر Form Address ، وشوف مسميات الحقول والازرار بالعربي ، واضغط على زر ملاحظة1 وملاحظة2 حتى ترى الرسائل بالعربي هذا هو المطلوب جعفر