جهراوي الكويت قام بنشر نوفمبر 13, 2007 مشاركة قام بنشر نوفمبر 13, 2007 اخواني الافاضل .. هذا الدرس لتعلم كتابة الكود .. ومعرفة كيفية عمل الكود وكيفية التطبيق .. لكن اضفنـــــــــا اليه قليل من المرح .. وليس المرح هو الهدف .. لكن لتوصيل الفكرة .. سوف نعمل 3 دروس الدرس الاول عمل ( وميض النموذج ) الدرس الثاني عمل ( وميض متبادل في النموذج ) الدرس الثالث عمل ( وميض على زينة لبمات عرس ) الاختبار الرابع عمل اشارات مرور .. يعني .. عند تشغيل النموذج ..تظهر علامة دائرية حمراء وبعد ثاوني تختفي وتظهر علامة دائرية صفراء وبعد ثواني تختفي وتظهر علامة دائرية خضراء وتختفي ليظهر النموذج الرئيسي ... الدرس الاول .. لتعلم خاصية الاخفاء ... مع المعلوم ان اي كائن في النموذج عندما نسند له خاصية الاخفاء VISIBLE فانها تاخذ احد قيمتين اما TRUE أو FALSE لكن هنا ... هذه الطريقة تختلف طريقة العمل... نعمل على النموذج ليبل عدد اثنين ونكتب في الاول ما نشاء ونكتب في الثاني ما نشاء كذلك ونعطي لكل منهما اسم مثلا اكس واكس واحد عند فتح الخصائص لكل منهما نجعل عند التنسيق وخاصية المرئي مرئي نعم ... نضع هذا الكود في عند عداد الوقت Me.x.Visible = Not x.Visible Me.xx.Visible = Not xx.Visible عند الفاصل الزمني .. نضع الوقت 500 يعني نصف ثانية والآن جرب النموذج ولاحظ ماذا ترى .. كيفية النموذج 1- يفتح النموذج مباشر فيجد ان خاصية المرئي لكل X و XX مرئي .. 2- بعد نصف ثانية .. يعمل الكود الكود يقول (اعكس الخاصية الموجودة ) يجد أن الخاصية ( مرئي).... فيقوم البرنامج بعكسها الى ( غير مرئي) 3- بعد نصف اثانية اخرى ...يفحص الخاصية يجد ان الخاصية الجديدة ( غير مرئي ) فيعكسها الى ( مرئي ) وهكذا ..... لنجرب الكود لنرى ماذا يحدث ...ثم ننتقل الى الدرس الثاني ______.rar 1 رابط هذا التعليق شارك More sharing options...
منذر عساج قام بنشر نوفمبر 13, 2007 مشاركة قام بنشر نوفمبر 13, 2007 بارك الله فيك أخي الكريم والف شكر رابط هذا التعليق شارك More sharing options...
Nofalnss قام بنشر نوفمبر 13, 2007 مشاركة قام بنشر نوفمبر 13, 2007 فكرة حلوة الله يخليلنا ياك نوفل رابط هذا التعليق شارك More sharing options...
جهراوي الكويت قام بنشر نوفمبر 14, 2007 الكاتب مشاركة قام بنشر نوفمبر 14, 2007 الدرس الثاني .. تعديل بسيط على الدرس الأول وضعنا 2 ليبل كما في الدرس الاول الاول جعلنا خصائصه مرئي الثاني جعلنا خصائص غير مرئي بهذا يكون انتهى الدرس كيفية عمل البرنامج 1- عند فتح البرنامج يكون الليبل الاول مرئي والثاني غير مرئي ... وذلك بناء على التصميم 2- بعد نصف ثانية يبدا عمل الكود المرفق وهو ( يعكس ) كل خاصية فيقوم بعكس خاصية المرئي للليبل الاول فيصبح ............... غير مرئي فيقوم بعكس خاصية المرئي للليبل الثاني فيصبح ............... مرئي وبعد نصف ثانية اخرى يقوم بالعكس وهكذا الفكرة .. بسيطة جدا ... لكن تصلح لواجهة البرنامج لكل مشروع الملف مرفق جهراوي الكويت ______.rar رابط هذا التعليق شارك More sharing options...
منذر عساج قام بنشر نوفمبر 15, 2007 مشاركة قام بنشر نوفمبر 15, 2007 نرجو الإستمرار في وضع هذه الدروس المفيدة وإذا رغبت في الإستمرار يمكن تغيير العنوان ليكون (دروس قصيرة لحركات جميلة في الأكسس) مثلاً وسيتم تثبيته بعد ذلك إن شاء الله رابط هذا التعليق شارك More sharing options...
نرجس الورد قام بنشر نوفمبر 15, 2007 مشاركة قام بنشر نوفمبر 15, 2007 رائع شكررررررررررا لك رابط هذا التعليق شارك More sharing options...
جهراوي الكويت قام بنشر نوفمبر 17, 2007 الكاتب مشاركة قام بنشر نوفمبر 17, 2007 الاخ الفاضل .. منذر عساج شكرا لك على المتابعة ... وآسف لأنني لم أرى الرد الى متأخرا .. ثانيا .. بالااشارة الى العنوان الذي اقترحته أنت ((دروس قصيرة لحركات جميلة في الأكسس) فأراه عنوانا جميلا .. ولا مانع لدي .. من تغيير العنوان ثالثا ... اليكم الملف الثالث في تغيير اللون ..وهذه المرة .. تعتمد على دالة if وهذا البرنامج الصغير عبارة عن مربع نص يأخذ اللون من المربع المجاور له .. فتوحي الحركة بتتابع الالوان والهدف كما قلت .. تعلم كيفية الاستفادة من كتابة الكود ونتائجه ______.rar رابط هذا التعليق شارك More sharing options...
منذر عساج قام بنشر نوفمبر 18, 2007 مشاركة قام بنشر نوفمبر 18, 2007 تم التعيديل بشرط أن نرى هذا الموضوع بعد فترة وقد وصل الى مئة صفحة بارك الله فيك وسيتم التثبيت رابط هذا التعليق شارك More sharing options...
جهراوي الكويت قام بنشر نوفمبر 19, 2007 الكاتب مشاركة قام بنشر نوفمبر 19, 2007 اخي الفاضل .. مذر عساج شكـــــــــــــــــــرا لك على كرمـــك وكرم الاخوان في المنتدى .. مرفق الملف الرابع كيفية تغير خلفية النموذج بناء على دالة RND وشكرا لكم مرة ثانية ___________________.rar رابط هذا التعليق شارك More sharing options...
جهراوي الكويت قام بنشر نوفمبر 19, 2007 الكاتب مشاركة قام بنشر نوفمبر 19, 2007 اخواني الافاضل .. بفضل الله اولا واخيرا ..ثم بفضل ادارة واعضاء هذا المنتدى .. الجميل ...فقد حقق هذا المنتدى انجازا عظيما .. منقطع النظير .. وبالنيابة عن اخواني أتقدم بجزيل الشكر على ادارة المنتدى على جهودهم العظيمة وتفانيهم على ادارتهم الراقية لهذا المنتدى وسرعة تجاوبهم .. وتحملهم لنا على كل الاحوال ... اخواني الافاضل .. لا يقتصر دور المنتدى على : أ- طرح الاسئلة من الاعضاء بانتظار الاجابة . ب- الاجابة على اسئلة الاعضاء ج- بل يتعدى الامر ... بالمساهمة ... بأي فكرة .. أو برنامج أو مثل أو ملف أ و.. ابداع .... يمكن الاستفادة منه لاحقا ... ويكون مرجع لباقي الاعضاء في اي وقت آخر .. واليكم هذه المشاركة .. والتي أرجو من اخواني في ادارة المنتدى ...أرجو ... أرجو أن يتم حذف ( مشاركتي ) ... إن كانت هذه المشاركة موجودة .. .. لأن الآول صاحب الطيب وصاحب المعروف ... الدرس الأول .. اظهار واخفاء السجلات عن طريق الماكرو .. الدرس الثاني .. اظهار واخفاء السجلات عن طريق الخصائص وعن طريق كود البرمجة .. الدرس الثالث .... اخفاء السجلات .. يوميا وتلقائيا .. بمجرد دخول اليوم الجدي الدرس الرابع .. اخفاء السجلات .. بعد مرور يومين .. وأكرر .. أرجو ... أرجو أن يتم حذف ( مشاركتي )..... إن كانت موجودة منقبل احد الاعضاء .. واليكم الدرس الأول ........ 1 رابط هذا التعليق شارك More sharing options...
جهراوي الكويت قام بنشر نوفمبر 19, 2007 الكاتب مشاركة قام بنشر نوفمبر 19, 2007 الدرس الاول .. اخفاء واظهار السجلات .. عن طريق الماكرو.. 1- نعمل نموذج .. يستند الى جدول ... أ- نموذج - معالج النموذج -نختار اسم الجدول - تالي- نختار الحقول- تالي - نختار مجدول- تالي- تالي -تالي -انهاء 2- نعمل ماكرو عدد 2 أحدها لاخفاء السجلا ت والثاني لاظهار السجلات 3- عمل ماكرو لاخفاء السجلات - ماكرو - جديد أ- نختار اولا.... أمر CLOSE بالوسائط التالية 1 الوسيطة الاول نموذج 2- الوسيطه الثانية اسم النموذج مثلا33 3- الوسطيه الثالثة .. هل تريد الحفظ نختار .. لا .. ب- تحت أمر CLOSE نضع أمر لفتح النموذج ..OPENFORM بالوساط التالية 1- اسم النموذج 33 2- النوع نموذج 3- وضع البيانات ( اضافة ) وهذا مهم جدا ... جدا ... جدا 4- نحفظ الماكرو باسم ( اخفاء السجلات ) ألان نعمل ماكرو الثاني بنفس الطريقة السابقة مع تغيير ما يلي :- 3- وضع البيانات ( تحرير ) وهذا مهم جدا ... جدا ... جدا 4- نحفظ الماكرو باسم ( اظهار السجلات ) ملاحظة : لماذا ... بداية نعمل اغلاق للنموذج الحالي ... الجواب ..لأننا نعتمد على نموذج واحد ...وبالتالي يشترط اغلاقه .. قبل فتحــه .. بناء على المستجدات الجديدة .. أخيرا نضع الماكرو ( الاثنين ) في رأس النموذج ونكتب عليها أحدهما ( اخفاء السجلات ) والثاني ( اظهار السجلات ) مهم جدا ... احفظ التغييرات الجديدة والتعديلا ت ... التي تمت على النموذج ....قبل التجربة .... وسامحوني على هذا الشرح الطويل والممل ..وذلك حتى يكون مرجعا ... الجميع فيما بعد ..حتى للمبتدئين ___________________.rar رابط هذا التعليق شارك More sharing options...
جهراوي الكويت قام بنشر نوفمبر 20, 2007 الكاتب مشاركة قام بنشر نوفمبر 20, 2007 الطريقة الثانية .... لاخفاء واظهار السجلات .. اعتمـــــــــــــادا على كود البرمجــــــــة ... قبل كل شيء تعالوا نلقي نظره سريعة على هذه الأكواد .. ************************************************************* DOCMD.CLOSE ومعناه .. غلق الكائن الحالــــــــي الموجود فيه الكود ... سواء كان هذا الكائن .. نموذج .. تقرير .. جدول .. ماكرو... ************************************ هذا الكو د لاغلاق الكائن ايا كان اسمـــــــــــــه وأيا كان موقعـــــــه .. بشرط ذكر ...........نوعه واسمـــه DOCMD.CLOSE Objecttype , objectname DoCmd .Close acForm , "66" Objecttype نوع الكائن .. مثلا ( نموذج - تقرير -استعلام - ماكرو - جدول - وحدة نمطية ....) objectname اسم الكائن مثلا ( اسمه نموذج فتح الحالات - استعلام التاريخ .....) يعني اسم الكائن وليس نوعه .. مثــــــــــــال DoCmd .Close acForm , "66" هذا الكود .. لغلق ..... نمــــــــــوذج ... واسم هذا النموذج 66 واذا لم تحد اسم الكائن سوف يتم اغلاق الكائن الحالي الموجود فيه الكود ******************************************************************************** واليك الكود الثالث لفتح النموذج docmd openform formname view filtername wherecondition datamode windowmode DoCmd .OpenForm ac Normal, "", "", acEdit , acNormal formname اسم النموذج المطلوب فتحه view طريقة العرض لفتح النموذج مثلا ( عرض التصميم -أو المعاينة أو صفحة البيانات ) filtername عامل التصفية في تقييد سجلات النموذج وهو اختيـــــــــاري wherecondition شروط لعرض السجلات datamode وضع ادخال البيانـــــــــــــــات ( تحرير أو اضافة ...أو للقراءة فقط ) windowmode وضع اطار النموذج ( عادي - رمز أو مخفي ) مثال DoCmd .OpenForm "66", acNormal, "", "", acEdit, acNormal اطار النموذج عادي/ للتحرير / لايوجد شرط / لايوجدتصفية / العرض عادي / اسم النموذج/ نموذج / أمر ******************************************************************** الآن لنطبق ما قلنا على الدرس الثاني مع ملاحظة .. أنه بما أننا نستخدم نموذجا واحدا .. لذلك نضع في بداية الكود اغلاق النموذج الحالــــــــــــــــــــي ليتم فتحه حساب المعطيات الجديدة .... وكذلك أيضا ... لأننا لا نستيطع فتح نموذج .. هو .. أصلا .. مفتوح ..؟!!! لذلك نضع بداية امر الاغلاق ..... ثم أم الفتح .... لنرى التطبيق في الدرس الثاني .... رابط هذا التعليق شارك More sharing options...
جهراوي الكويت قام بنشر نوفمبر 20, 2007 الكاتب مشاركة قام بنشر نوفمبر 20, 2007 الآن لنطبق ما قلنا على الدرس الثاني مع ملاحظة .. أنه بما أننا نستخدم نموذجا واحدا .. لذلك نضع في بداية الكود اغلاق النموذج الحالــــــــــــــــــــي ليتم فتحه حساب المعطيات الجديدة .... وكذلك أيضا ... لأننا لا نستيطع فتح نموذج .. هو .. أصلا .. مفتوح ..؟!!! لذلك نضع بداية امر الاغلاق ..... ثم أم الفتح .... لنرى التطبيق في الدرس الثاني .... ******************* 1- نلغي مفعول المعالج ... ونعمل زرين أمر .. احدهما نكتب عليها ( اظهار البيانات ) والآخر نكتب عليه (اخفاء البيانات) عند حدث النقر على الزر الآول وهو الاظهار نكتب الكود الأول DoCmd.Close acForm, "66" DoCmd.OpenForm "66", acNormal, "", "", acEdit, acNormal عند حدث النقر على الزر الثاني نكتب الكود الثاني .. والفرق بينهما كلمة واحدة DoCmd.Close acForm, "66" DoCmd.OpenForm "66", acNormal, "", "", acAdd, acNormal الآمر سهل جدا .. واليك الملف 33__________________________.rar رابط هذا التعليق شارك More sharing options...
منذر عساج قام بنشر نوفمبر 20, 2007 مشاركة قام بنشر نوفمبر 20, 2007 (معدل) بارك الله فيك ونفع بعلمك تم دمج الموضوعين معاً لسهولة البحث وبالتوفيق إن شاء الله تم تعديل نوفمبر 20, 2007 بواسطه منذر عساج رابط هذا التعليق شارك More sharing options...
at_aziz قام بنشر نوفمبر 20, 2007 مشاركة قام بنشر نوفمبر 20, 2007 بارك الله فيك وجزاك الله خير والى الامام وفقك الله رابط هذا التعليق شارك More sharing options...
أبوليان قام بنشر نوفمبر 20, 2007 مشاركة قام بنشر نوفمبر 20, 2007 الله يجزيك بالخير واصل .. وإلى الإمام أبو ليان رابط هذا التعليق شارك More sharing options...
جهراوي الكويت قام بنشر نوفمبر 21, 2007 الكاتب مشاركة قام بنشر نوفمبر 21, 2007 اخواني ... شكرا لكم جميعا على هذا الدعم ..... رابط هذا التعليق شارك More sharing options...
جهراوي الكويت قام بنشر نوفمبر 21, 2007 الكاتب مشاركة قام بنشر نوفمبر 21, 2007 اخواني الافاضل ... تعملنا كيفية ( اخفاء السجلات ) و( اظهار السجلات ) عن طريق 1- الماكرو 2- كود البرمجة 3- وألان عن طريق الخصائص .. 1- نذهب الى النموذج في عرض التصميم ونختار خصائص لنموذج ثم البيانات ونختار ( ادخال البيانات) = نعم بهذه الطريقة تختفي السجلات ولاعادة اظهارها .. هناك طريقتان ...:- 1- من شريط القوائم - نختار ( السجلات ) ثم نختار ( ازالة عامل التصفية - الفرز ) أو 2- نعمل زر أمر لاعادة اظهار السجلات ونكتب الكود كما في الدرس السابق ... 2 رابط هذا التعليق شارك More sharing options...
u-w Lw7 قام بنشر نوفمبر 21, 2007 مشاركة قام بنشر نوفمبر 21, 2007 بارك الله في علمك وفي عملك وفي اهلك اخوي جهراوي كفيت ووفيت رابط هذا التعليق شارك More sharing options...
at_aziz قام بنشر ديسمبر 2, 2007 مشاركة قام بنشر ديسمبر 2, 2007 بارك الله فيك وجزاك الله خير ونفع الله بعلمك رابط هذا التعليق شارك More sharing options...
ابو ناره قام بنشر ديسمبر 2, 2007 مشاركة قام بنشر ديسمبر 2, 2007 بارك الله فيك على الشرح رابط هذا التعليق شارك More sharing options...
dove قام بنشر ديسمبر 7, 2007 مشاركة قام بنشر ديسمبر 7, 2007 مجهود رائع شكــــرا لك رابط هذا التعليق شارك More sharing options...
ahmed30627 قام بنشر ديسمبر 8, 2007 مشاركة قام بنشر ديسمبر 8, 2007 بارك الله فيك على المعلومات المفيده رابط هذا التعليق شارك More sharing options...
عاشق الرقي قام بنشر ديسمبر 8, 2007 مشاركة قام بنشر ديسمبر 8, 2007 بارك الله فيك ونفع بعلمك وجعله في ميزان حسناتك رابط هذا التعليق شارك More sharing options...
Her قام بنشر ديسمبر 9, 2007 مشاركة قام بنشر ديسمبر 9, 2007 جزاك الله خيرأً على المعلومات والشرح الرائع رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.