jjafferr

وعليكم السلام 🙂 اسمح لي اشرح لك طريقة سهلة في التعامل مع الدالة الشرطية iif (ملاحظة: حسب اعدادات كمبيوترك ، فقد تستعمل الدالة الفاصلة المنقوطة ; او الفاصلة , والاكسس سيخبرك برسالة خطأ وسيكون المؤشر واقف على الفاصلة فقم بتغييرها الى فاصلة منقوطة او العكس) : هذه القاعدة : اذا عندك شرط 1 ، فاقفل نهايه الدالة بقوس 1 ، واذا عندك شرطين 2 ، فاقفل نهاية الدالة بقوسين 2 ، واذا عندك شروط 3 ، فاقفل نهادية الدالة باقواس 3 ، وهكذا : Condition And / Or Conditions = شرط او / و شروط True = نتيجة الشروط صحيحة False = نتيجة الشروط خطأ بشرط 1 A: iif( (Condition1 And Or Conditions1) ; True ; False ) ونعيد كتابة الدالة بحيث نكتب نتيجة الشرط الخطأ في السطر التالي A: iif( (Condition1 And Or Conditions1) ; True ; False ) بشرطين 2 A: iif( (Condition1 And Or Conditions1) ; True ; iif( (Condition2 And Or Conditions2) ; True ; False )) A: iif( (Condition1 And Or Conditions1) ; True ; iif( (Condition2 And Or Conditions2) ; True ; False )) بشروط 3 A: iif( (Conditions1) ; True ; iif( (Conditions2) ; True ; iif( (Conditions3) ; True ; False ))) A: iif( (Conditions1) ; True ; iif( (Conditions2) ; True ; iif( (Conditions3) ; True ; False ))) والآن الى معادلتك ، وبنفس الطريقة : 1 karar: IIf([moy_bem]>=10);"ناجح"; "اعادة") karar: IIf([moy_bem]>=10);"ناجح"; "إعادة") 2 karar: IIf(([moy_bem]>=10);"ناجح"; IIf(([moy_bem]<10 And [yaer]<=2003);"يوجه"; "إعادة")) karar: IIf(([moy_bem]>=10);"ناجح"; IIf(([moy_bem]<10 And [yaer]<=2003);"يوجه"; "إعادة")) 3 karar: IIf(([moy_bem]>=10);"ناجح"; IIf(([moy_bem]<10 And [yaer]<=2003);"يوجه"; IIf(([moy_bem]>=10 And [moy_admi]<10);"ناجح"; "إعادة"))) karar: IIf(([moy_bem]>=10);"ناجح"; IIf(([moy_bem]<10 And [yaer]<=2003);"يوجه"; IIf(([moy_admi]>=10 And [moy_bem]<10);"ناجح"; "إعادة"))) ولما تنتهي من عمل الدالة ، اجمعها في سطر واحد 🙂 وبسبب وجود كلمات عربية في الدالة ، فقد تلاحظ ان متغيرات الدالة قفزت من مكانها الى مكان آخر ، فلا تهتم لهذه النقطة ، فالاكسس سيعرف موقعهم الصحيح 🙂 جعفر

يجب ان تضع هذا السؤال في ذلك الموضوع ، حتى يقوم اخوي العود ابوخليل للرد عليه 🙂 جعفر

وعليكم السلام 🙂 اسمح لي اشرح لك الموضوع بطريقة سهلة : اذا فتحت ملف اكسل ، وبه عدة سجلات ، ونفترض انه تم حفظ المؤشر على اول سجل ، او تفتح جدول في الاكسس : 1. اذا اردت ان تعرف عدد السجلات ، فتضطر الى سحب "شريط التمرير" العمودي (Vertical Scroll bar) الى الاسفل ، الى آخر سجل ، وبهذه الطريقة تعرف كم عدد السجلات ، بالنسبة لعملية Recordset ، فتكتب rst.MoveLast لذهاب المؤشر الى آخر سجل ، وطبعا لما السجلات تكون كثيرة ، فالوصول الى آخر سجل يأخذ بعض الوقت ، 2. بعد ان عرفت عدد السجلات ، ولتبدأ تقرأ السجلات ، تضطر الى سحب "شريط التمرير" الى الاعلى الى اول سجل ، بالنسبة لعملية Recordset ، فتكتب rst.MoveFirst لذهاب المؤشر الى اول سجل ، 3. اذا بدأت البحث يدويا عن معلومة معينه ، فإنك تقرأ السجل ، ثم تنقل للسجل الذي اسفل منه ، بالنسبة لعملية Recordset ، فتكتب rst.MoveNext ، 4. ولما توصل للنهاية ، واردت البحث عن شيء آخر ، فتضطر الى سحب "شريط التمرير" الى اعلى الى اول سجل مرة اخرى ، بالنسبة لعملية Recordset ، فتكتب rst.MoveFirst لذهاب المؤشر الى اول سجل. يعني هكذا: dim rst as dao.recordset dim RC as long dim i as long set rst = currentdb.openrecordset ("Select * From tbl2") rst.moveLast rst.moveFirst RC= rst.recordcount for i = 1 to RC ... ... rst.moveNext next i rst.close set rst= nothing في حالات ، انت لا تريد ان تعرف عدد السجلات ، وانما تريد ان تبدأ تقرأ السجلات سجل سجل الى نهاية السجلات/الملف EOF فيصبح الكود: dim rst as dao.recordset set rst = currentdb.openrecordset ("Select * From tbl2") rst.moveFirst do until rst.EOF ... ... rst.moveNext Loop rst.close set rst= nothing . مع العلم اننا لا نحتاج الى الذهاب الى اول سجل لما نفتح الملف ، ولكن اذا قرأنا الملف وبقينا على آخر سجل ، فالكود لن ينتقل تلقائيا الى اول سجل لقراءة معلومات اخرى ، خصوصا اذا كان هذا الكود في وحدة نمطية ، ويتم استدعائها من استعلام لمجموعة سجلات ، فيجب ان نجعل الكود ينتقل لأول سجل في كل مرة يتم استدعاء الكود 🙂 جملة الحذف هي لحذف بيانات الجدول 🙂 جعفر

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

هاي الله يسلمك لها علاقة باللغة اللي انت مختارها لعرض صفحات للمنتدى : في اسقل اي صفحة في المنتدى ، في اختيار لغة صفحات المنتدى : . 1. اذا تختار رقم 1 ، English USA ، وهو تنسيق المنتديات الاجنبية ، فتصبح الصفحة من اليسار الى اليمين ، وكما تفضلت ، فخلط الكلمات العربية والانجليزية لا تأخذ مكانها الصحيح : . 2. بينما اذا اخترت رقم 2 ، Officena default ، وهو تنسيق المنتديات العربية ، فتصبح الصفحة من اليمين الى اليسار ، ولا ترى فيها خلط بين الكلمات العربية والانجليزية ، وانا استعمل هذه الطريقة : جعفر

🙂

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

ما شاء الله ، خلال دقيقتين عملت اللازم ، وكتبت مشاركتك 🙂 قوّاك الله 🙂 جعفر

اخي الفاضل: رجاء مراجعة قوانين المنتدى: قواعد المشاركة فى الموقع اضغط هنـــــــــامن فضلك لقراءة القواعد كاملة و بصفة خاصة نؤكدعلى ما يلي 1- يمنع منعا باتا نشر أية مواد تخالف حقوق الملكية الفكرية محتوى المشاركة 12. يمنع وضع سؤال لا علاقة له بالموضوع الموضوع فيه التساؤل أو ليس له مناسبة في وضعه معه. جعفر

ما فهمت قصدك ، رجاء التوضيح .

اثناء تجوالي في نماذج برنامجك ، تعودت ان الزر الاحمر للخروج من النموذج ، واذا بعد النقر على الزر الاحمر في احد النماذج ، اتضح انه لحذف السجل ، وكنت قد حذفته بالفعل !! جعفر

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

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

وهذا رابط الاصدار الثاني

وعليكم السلام 🙂 عند التصدير لملف pdf ، يجب ان تصدر احد الكائنات الموجودة مثل تقرير او نموذج او استعلام او جدول ، ولا يمكن تصدير مجرد سجلات ، لذا يمكنك عمل تقرير بالحجم الذي تريد ، A5 مثلا ، ولما تعمل له تصدير ، سيحتفظ الملف بهذا الحجم 🙂 وهذا الرابط فيه شرح اكثر ، وسطر كود التصدير : جعفر

وعليكم السلام 🙂 مثلا اسم العميل هو A_Name ، و حقل رقم التسلسل هو A_No ، في الجدول tbl_A Next_Number = Nz(Dmax("A_No","tbl_A","A_Name='" & me.A_Name & "'")+1 ,1) فيصبح الكود: جعفر

هذا الموضوع يتكلم عنها : جعفر

السلام عليكم 🙂 زرت المشاركة البارحة ، وفتحت البرنامج عدة مرات ، وآخرها كان اليوم 🙂 التصميم رائع ، ويخبرنا ان الاكسس ليس السبب في قصور جمال نماذجنا وتقاريرنا ، وانما هو خيالنا 🙂 لم ادخل بيانات في البرنامج لمعرفة تفاصيل عمله ، ولكن لدي المبلحظات التاليه على الجداول: يجب عمل حقل تاريخ تلقائي ، وقيمته الافتراضية Now ، بحيث عند عمل اي سجل ، يتم تسجيل وقت عمل هذا السجل ، وستحتاج الى هذه الحقل عند الانتقال الى SQL Server ، الجدول tbl_Login ، بدل ان يكون افقي ، وتضطر الى اضافة حقل جديد ، إجعله عمودي ، بحيث تقدر تضيف اسماء النماذج كسجلات ، ويمكنك استعمال استعلام Crosstab لفرزه ، جميل استخدامك الحقل Deleted ، فانت تحفظ اي سجل تم كتابته ولا تحذف اي سجل تم كتابته 🙂 جميع الحقول اللي فيها معيار (سواء في الاستعلام او الكود) ، واللي فيها علاقة مع جدول آخر ، يجب ان يكون فيها فهرسة ، لسرعة عمل البرنامج ، طبعا تعديل المكتبات لكي تعمل على النواتين 32بت و 64بت ، لا تعبئ الشاشة كاملة ، فيجب ان يظل الجزء السفلي من الشاشة ، للوندوز ، سواء لفتح برامج اخرى او اي سبب آخر ، او يكون عندك زر لهذا الخيار 🙂 وأسأل الله سبحانه وتعالى ان يوفقك 🙂 جعفر

نعم ممكن ، وبهذه الصورة : جعفر AniGIF.zip

هذا الكود لا يوجد به متغيرات 😁 وهذا الكود لفتح الاستعلام في وضع التصميم ، وكود تشغيل الاستعلام يكون: DoCmd.OpenQuery "Sale" جعفر

لا ، فقط الملفات بصيغة bmp 🙂 ويمكنك تحويل اي من ملفات الصور الى صيغة bmp ، سواء عن طريق برامج الصور او مواقع الانترنت 🙂 جعفر

جمل تعريف المتغيرات Dim او Private او Public او Global او Static تحفظ جزء من الذاكرة لهذا المتغير ، وهي تخبر البرنامج عن نوع المتغير (نص او رقم او تاريخ او .. ) ، ولكن الافضل ان تستعمل Dim بـ : Option Compare Database Option Explicit dim int_B as integer Private Sub cmd_frm_m1_Click() Dim str_A as string بهذه الطريقة ، الاكسس يساعدك ويخبرك عن مكان الخطأ في المتغير ، قبل بدء تشغيل البرنامج ، اذا استعملت ويكون البرنامج اسرع في العمل 🙂 جعفر

وكما قال اخوي ابوخليل ، الموضوع يخص ماكرو الامان ، وهنا تفصيل للموضوع: جعفر

شو قصدك ؟

التجربة لن تكلفك ، إلا تنزيل الملف ذو 1x1 بكسل ، ثم اعطائه نفس اسم قاعدة البيانات ، ثم تشغيل البرنامج وملاحظة وجود صورة الاكسس من عدمها 🙂 جعفر