ابوخليل

الاخوة : مارد ، عبدالله ، ابراهيم جزيتم خيرا

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

بل اقصد مربعات التحرير انت سألت هل هي اسرع واخف ؟ واجبتك حسب تجربتي وعلمي انها ليست اسرع واخف وليس للاسبقية حق امام المعلومة فقد تكون خاطئة او على الاقل قد يوجد اجابة افضل منها فالسطر الاخير ليس له داع ! هل اجابتي ازعلتك ؟

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

شكرا اخوي مارد كنت اعمل على مثال السائل فزيادة الخير خير جزاك الله خيرا ولاحظت ان المثال مضروب ولانه على صيغة mdb فقد استبدلته بآخر ويبدو ان السائل مبتدىء في اكسس اخي السائل : افتح النموذج على التصميم/ لسان التبويب حدث يوجد قيمة اسمها : عند التحميل ومكتوب امامها : اجراء حدث وبجانبها ايقونة عبارة عن ثلاث نقاط انقر على النقاط الثلاث لتنقلك الى محرر الفيجوال الخاص بالنموذج وبالتحديد عند كودنا المذكور مندوب3.rar

المشاكل في طريقة ادخال البيانات اذا كنت ستتعامل مع جدول العطل من خلال نموذج فرعي فانصحك بعلاقة واحد لكثير اما اذا احببت التعامل مع جدول العطل من خلال نموذج رئيس ووضعت الضوابط لذلك والضوابط هي ادخال الرقم المعرف الصحيح للموظف من خلال لوحة المفاتيح او قارىء الباركود او ادخال معرف الموظف من خلال قائمة حينها يمكنك الاستغناء عن العلاقة بين الجداول

لا مش اسرع واخف فاستخدام لوحة المفاتيح بادخال الارقام افضل واسرع من فتح القوائم المنسدلة ثم البحث عن القيمة المطلوبة

... اعينوا اخاكم ...

انظر هذا الموضوع يتحدث عن مثل مطلوبك http://www.officena.net/ib/index.php?showtopic=49961#entry305187

انظر صورة الجهاز المرفق من شركة zk يدعم العربية استخدمته من قبل وشغال في اكثر من مؤسسة يأتي معه برنامج( سوفت وير) معرب هذا الجهاز موديل zk2010-4 من الاصدارات الحديثة نوعا ما او ما يسمى ثلاثة في واحد يستخدم البطاقات الممغنطة وفيه احدث منه يدعم الشبكات عن بعد

تختلف الاسطر البرمجية الرابطة من جهاز لآخر حسب الشركة المصنعة وايضا حسب الموديل (الاصدار) للشركة الواحدة علما انها كلها تسير في بوتقة واحدة فتجد مع كل جهاز كتيب او شرح لخصائص الربط والتعامل مع الجهاز برمجيا او ما يسمى manual ان كنت تملك احد هذه الاجهزة فيلزم ارفاق الـ manual الخاص به

تجعل حقل رقم الطالب وحقل تاريخ الغياب مفتاحين بكذا لن يتكرر رقم الطالب خلال اليوم حتى لو تم الالحاق 100 مرة والطريقة : بعد فتح الجدول على التصميم / اضغط على زر Ctrl ثم حدد الحقول المطلوبة ( ظللها ) ثم بالزر الايمن اختر المفتاح

هنا الناتج غير مكرر ولا يمكن ان يتكرر مع وجود العلاقة يمكن يحدث التكرار بسبب عملية تكرار الالحاق اذا كان كذلك فالحل هو بضبط الجدول الملحق اليه

انظر المحاولة ان كانت تلبي طلبك 1- اضفنا حقلا للايام 2- حساب المدة بالايام تم التطبيق على الاعدادية فقط UPDegree2.rar

جزاك الله خيرا واحسن اليك كما يوجد خط آخر في هذه المشاركةhttp://www.officena.net/ib/index.php?showtopic=61347#entry395681

ويوجد خط آخر في هذه المشاركة http://www.officena.net/ib/index.php?showtopic=25202#entry119121

تحتاج الى تحميل خط نقاط ثم تجعله هو الافتراضي في التقرير هذا كل شيء ملف الخط في المرفقات salman1.rar

انظر هنا http://www.officena.net/ib/index.php?showtopic=659#entry3115 وهنا http://www.officena.net/ib/index.php?showtopic=44856#entry262349 وهنا http://www.officena.net/ib/index.php?showtopic=31139#entry157297

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

مانت لوحدك وانا معك سهران وآسف المعلومة غير دقيقة عن elseif وهنا تصحيح http://www.officena.net/ib/index.php?showtopic=61333

السلام عليكم ورحمة الله وبركاته درس حول الـ elseif وطريقة بنائها فما هي الـ elseif ؟ عندما نريد التحقق من قيمة عنصر محدد فيمكننا استخدام الـ else if وهي هنا تختصر علينا كثيرا من الخطوات علما انه يمكننا ايضا استخدام if لوحدها بخلاف ما إن أردنا التحقق من قيمة عناصر مختلفة فنستخدم الـ if فـ elseif مشابهة نوعا ما لفكرة OR توضيح اكثر للفرق بينهما : الفرق هو أن الـ elseif مرتبطة بالــ if التي قبلها فإذا كان الشرط الذي قبلها صحيحاً لم تعمل وأما الـ if المنفصلة فليست مرتبطة بما قبلها وبالتالي فإنها تعمل دائماً وبالمثال يتضح المقال : 'elseif : if x=1 then ?=? elseif x=2 then ?=?? elseif x=3 then ?=??? else ?=????? end if في الكود اعلاه سيتم التحقق من if فان وجد الشرط والا انتقل الى elseif الاولى فان تحقق الشرط والا انتقل الى elseif الثانية .. لاحظوا اننا ادخلنا في النهاية else بقيمة معينة ففي عدم تحقق اي شرط من الشروط الثلاثة فإن الكود الموجود داخل else هو الذي سيعمل ....

جزاكم الله خير اخواني على بذل المساعدة الشرطين من جدولين مختلفين فما تصلح elseif يلزم ان يكون كل شرط منفصل عن الآخر اخونا الكريم انظر التعديل على المرفق اتمنى ان يحقق مطلوبك Tabel5.rar

ما رأيك بشيء افضل من ذلك ؟ اختصار للاكواد وبدون بحث ودوارات انظر التعديل على مثالك وحاول ترك حقل العدد فارغا TestUp.rar

شكرا استاذ محمد بكذا حتى لوفتح الشفت من الخارج كلما فتح البرنامج يرجع القفل ولكن انت نسيت ترفق الــ SetProperties : Function ؟

الصق هذه الجملة في حدث النقر للزر في النموذج الرئيسي Dim rs As Recordset Set rs = Me.F_ordersubform.Form.RecordsetClone rs.MoveLast R = rs.RecordCount rs.MoveFirst For i = 1 To R If IsNull(rs!Qty) Then MsgBox "اكتب العدد" Exit Sub End If rs.MoveNext Next rs.close Set rs = Nothing