jjafferr

هذا ما كنت اعرفه ، فجزاك الله خيرا على هذه المعلومة ولكن نرجع لأصل الموضوع اللي بسببه انا وضعت الكود ، فنرى مدى ما يمكن ان يصل اليه التعقيد عن طريق الداله Format ، وانا على يقين بأنك لم تصل للطريقة الصحيحة للكود من اول مرة او مرتين لهذا السبب ، اعتقد بأن الدالة DateFormat تسهل الكود كثيرا جعفر

السلام عليكم أخي كريمو نحن الآن نقوم بأخذ البيانات من الجدول tbl_Loans ، والمسألة عبارة عن جمع وطرح ونحصل على النتائج المطلوبة ، بهذه البساطة وطريقة ادخال بيانات القرض للجدول ، هو عن طريق وعلى اساس الحقل "تاريخ بداية الخصم" في النموذج FrmCridi_sub او FrmElec_sub ، فكل قرض يبدأ بالشهر "تاريخ بداية الخصم" ، وينتهي بحسب نوعه. الآن انت تقول لي ، هناك نوعين من الموظفين (ولنفترض "تاريخ بداية الخصم" هو 5/2015 ، ولنفترض ، ولنفترض "قرض مالي 1" والممتد لمدة 10 اشهر): 1. موظف او منتدب ، ويتم بدء السداد من "تاريخ بداية الخصم" اي 5/2015 وينتهي في 2/2016 ، 2. "متعاقد كامل" او "متعاقد جزئي" او "عون نظافة" ، ويتم بدء السداد من الشهر التالي لـ "تاريخ بداية الخصم" اي 6/2015 وينتهي في 3/2016 ، اذا كان ما فهمته صحيح (وهنا اطلب منك ان تعطيني بشكل جدول في اكسل بعض من هذه النماذج حتى افهمها) ، فيجب ان نغير من تاريخ بداية/نهاية القرض ، ليعكس الاشهر الصحيحة لسداد القرض ، حسب صفة كل موظف. جعفر

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

وعليكم السلام احفظ الكود التالي كوحدة نمطية: Public Function Minutes2Duration(minutes As Long) As String Dim dd As Integer, hh As Integer, mm As Integer 'from: http://bytes.com/topic/access/answers/696226-converting-minutes-days-hours-minutes ' dd = minutes \ 1440 minutes = minutes - dd * 1440 hh = minutes \ 60 mm = minutes Mod 60 Minutes2Duration = Format(dd, "000") & ":" & Format(hh, "00") & ":" & Format(mm, "00") End Function وفي الحقل الذي تريد ان يتم فيه التحويل ، اكتب هذا الكود: Minutes2Duration([a1]) جعفر

انا او الاستاذ رمهان جميعا إن شاء الله جعفر

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

السلام عليكم ادخل في البرنامج eng adel_data.mdb ، اذهب لقائمة الجداول ، للجدول الالوان : وغير اسمه الى الالون (لاحظ الاسم مافيه ألف بين الواو والنون): واغلق البرنامج. ادخل في البرنامج eng adel.mdb ، واعد ربط الجدول الالون بالبرنامج eng adel_data.mdb بالجدول الالون ، الآن شغل البرنامج وجرب الظاهر ان في احدهم غير اسم الجدول وصارت هذه المشكلة كلها جعفر

السلام عليكم بعد قرأت مواصفات الطابعة ، وبالنظر الى طباعتها ، هذه تطيع dot matrix ، يعني طابعة نقطية. جرب بدل ما تخلي التقرير بالعرض ، جربه بالطول ، جعفر

واذا كانت عندك الصورة aa_img.jpg في المجلد ، فماذا تريد ان تفعل؟ اقتراحي ان يكون هناك عدد تسلسلي من رقمين مثل: aa_01.jpg aa_02.jpg بحيث لأقدم دائما يكون عنده الرقم الاكبر !! ايش رايك؟ طلبك اسهل واجد من اقتراحي وبعدين عندي سؤال للعلم: انا سهلت لك العمل في عدة اسطر ، ليش رجعتها سطر واحد؟؟ جعفر

والآن ، تستطيع ان تنقص السنوات بطريقة الحساب العادية ، وتطرح السنوات من بعض. هل هذا الذي تريده ، او في شئ آخر ما شرحته لي؟ جعفر

السلام عليكم أخوي رمهان انا قلت في اول الموضوع: يعني كنت اتوصل للمطلوب ، ولكن وللأسف بعد مجموعة محاولات !! وانا فاهم قصدك ، وطريقتك بتعطي الاجابة الصحيحة ، ولكن ، مو دائما انت محتاج تستعمل Format ، فمرة تحتاج ومرة لا ، ومرة M/D/YY ومرة dd/mm/yyyy ، وهكذا ، وصدقني لما عندك برنامج مستعجل وتشتغل عليه ليل نهار والزبون على راسك ، فما دائما تنتبه لـ Format ، إسألني وانا اخبرك كم مرة صارت معي ، الى ان انتبه لها بعد ما احك راسي واطيّح الشعرتين الباقيات على راسي الدالة هذه ، ومن اول مرة وتعطينا النتيجة الصحيحة ، ولأني استفدت منها ، حبيت الكل يستفيد منها جعفر

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

لا ، ماكان هذا السؤال !! السؤال كان: وانا قلت لك: فانت ما عندك تاريخ ميلاد (تاريخ الميلاد فيه اليوم والشهر والسنة) ، وانما عندك سنة الميلاد فقط. والآن ، تستطيع ان تنقص السنوات بطريقة الحساب العادية ، وتطرح السنوات من بعض. هل هذا الذي تريده ، او في شئ آخر ما شرحته لي؟ جعفر

انا كنت بأتفق معاك أخوي أبوخليل ، لو انه كان يستعمل الاكسس 2003 من مدة ، بس لأنه الآن بدأ وقال "حالياً أنا أتعلم برمجة الأكسس" ، لهذا السبب اقترحت عليه ان يبدأ بـ 2010 مباشرة ، فهي بتسهل عليه مجموعة اشياء وجزء من دفاعي عن 2010 هو http://www.officena.net/ib/index.php?showtopic=59697&p=382621 جعفر

وعليكم السلام كود الاخ رمهان هو عبارة عن مجموعة اسطر مدمجة في سطر واحد: Set img = CreateObject("wia.commondialog") Image_Path = (Application.CodeProject.Path & "\photo\" & "\\" & [id] & ".jpg") img.ShowAcquireImage.SaveFile Image_Path والان المسألة اصبحت اسهل للتعامل معها ، فالسطر الاول والاخير لا يوجد تغيير عليهم , ولكن التغيير يكون في السطر الثاني ، وهو مسار الصورة، والذي يجب ان نشتغل عليه ونتوسع فيه طلبك هو: (4) ليحفظ الصورة في (3) المجلد الفرعي داخل (2) مجلد صور الموظفين الموجود في (1) مجلد البرنامج الرئيس Set img = CreateObject("wia.commondialog") '1 Image_Path = Application.CurrentProject.Path '2 Image_Path = Image_Path & "\photo\" '3 Image_Path = Image_Path & "\" & [id] & "\" '4 Image_Path = Image_Path & [id] & ".jpg" img.ShowAcquireImage.SaveFile Image_Path وللعلم ، فالصورة التي يحفظها الكود ليست jpg وانما bmp (كما اوضحتها انا هنا http://www.officena.net/ib/index.php?showtopic=61540&p=399567 ) جعفر

وعليكم السلام انا اصوت لـ 2010 ، مع ان 2013 موجود. جعفر

انت الجميل أخونا العود أبوخليل ، ولك الشكر المتواصل على مساعداتك المتواصلة ورحم الله والديك دنيا وآخرة إن شاء الله جعفر

وعليكم السلام 1. لازم تعمل جدول يكون فيه حقل نوع الجهاز (Device) ، وحقل موديل الجهاز (Model) ، كما هو في الجدول tbl_Devices ، ويجب عليك تعبئة اسماء جميع الاجهزة وموديلاتها: 2. في النموذج ، تأخذ معلومات الحقل/كمبوبوكس نوع الجهاز ، من الحقل Devices ، في الجدول tbl_Devices ، وعلى حدث "بعد التحديث" تكتب هذا الكود ، حتى يكون محتوى الحقل موديل الجهاز حسب نوع الجهاز: Me.[موديل الجهاز].Requery Me.[موديل الجهاز] = "" 3. في النموذج ، تأخذ معلومات الحقل/كمبوبوكس موديل الجهاز ، من الحقل Model ، في الجدول tbl_Devices ، واستعلامه يكون: جعفر 85.computer.mdb.zip

وعليكم السلام أخوي أبوخليل انا قرأت الشروط ، وما فيها شئ يقول ان الملف مؤقت تسلم ايدك جعفر

وعليكم السلام أخي كريمو رجاء التوضيح أكثر بمثال ، لأني ما فهمت المطلوب جعفر

اذا كان المطلوب اجراء عمليات حسابية على حقل النص ، فالكود دائما يكون: a=val([myYear]) بينما اذا لم يكن عندك سبب في جعله حقل نص ، فاصحك بتحويلة الى حقل رقم من الان ، او لاحقا ، مادمت ما ادخلت اي شئ في الحقل غير ارقام فقط. جعفر

السلام عليكم ملاحظة: انا انزلت برنامج الاخ رمهان والاخ ابوياسر ، واتضح لي بان الصورة التي يحفظها البرنامج هو بصيغة bmp وليس jpg ، للعلم جعفر

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

وعليكم السلام دائما أخي أبوالعلا من السباقين وهذا الرابط به معلومات اضافية: http://www.officena.net/ib/index.php?showtopic=61511 جعفر