jjafferr

اخي tbazh :) هل استطعت الحصول على طلبك؟ جعفر

حياك الله :) في الحقيقة ما كان في مشكلة ، وكل شئ كان تمام :) بس اللي عملته هو: 1. حذفت السجل اللي في جدول التقييم ، لأنه كان بدون الرقم الوظيفي ، وهذا كان غريب ، فكان اعتقادي بأنك ادخلتيه في الجدول مباشرة ، لأنك اذا كنتي ادخلتيه في النموذج form1 فكان لازم يظهر…

وعليكم السلام اخي صالح ، صبحك الله بالخير :) الله ان شاء الله يطول في عمرك ، ساعدنا علشان نساعدك :) عندك : 10 جداول ، وفيها 54 حقل ، 3 استعلامات ، 11 نموذج ، وتقريرين :) في وسط هذه الغابة من الكائنات ، كيف نقدر نعرف مكان : اذا كان الباقي -1 واقل او اي شئ آخر م…

تفضلي اختي :) جربي form1 والاستعلام وما شئتي :) جعفر 290.employees.accdb.zip

وعليكم السلام :) وطيب ليش هاللف والدوران ، ليش ما تستخدم المعادلة اللي اعطيتك (هم معادلتين وجربهم الاثنين) في الكود مباشرة علشان تحسب التاريخ من Text_stamp؟ هذه الطريقة مباشرة ومافيها اعتماد على الاكسس :) ومع اني ما لمست Vb لمدة طويلة ، فاذا حبيت ارفق برنامجك …

الحمدلله :)

آسف أخوي ، ما عندي فكرة :( نرجع للكود ، لانه به المرونه والقوة اللي نقدر نخليه نعمل اللي نريد ، و DoCmd . RunSQL " UPDATE ، عبارة عن استعلام تحديث ، بس في طرق اخرى غير هذا الامر والطريقة ، يعني انا اعطيتك طريقة (صحيح ممكن ما تكون الافضل ، بس فيها المرونه لعمل …

آسف أخوي ، ما عندي فكرة :( بس تأكد انك في كود Vb ما ادخلت قيمة للحقل Text_Stamp ، جعفر

الحمدلله انه يوم مبارك :) فاليك هذا الحل البسيط :) الاستعلام كما هو: اعمل التغييرات التاليه عليه: والنتيجة: والآن ، استعمل الاستعلام كما تشاء ، وغيره الى استعلام تحديث مثل ما كنت تريد :) جعفر 286.1.RpQr.mdb.zip

حياك الله :) جرب القيمة الافتراضية بدون اشارة = . VB مالها علاقة بطريقة عمل جدول الاكسس ، يعني Vb بيطلب اضافة سجل ، فالجدول لما يضيف سجل ، فانه تلقائيا سيضيف القيمة الافتراضية للحقل :) جعفر

:)

وعليكم السلام يالسيد :) ولا تنسى تدعي لنا في هذا اليوم المبارك الاغر :) في الجدول ، الحقل no_subaccount هو رقم وليس نص ، بينما انت كتبته في الكود على انه نص ، لهذا السبب الكود ما يشتغل :) غير السطر التالي: Set rs = db.OpenRecordset("SELECT * FROM accountsub WH…

انا اضطررت ان اغير التاريخ الى تاريخ انجليزي علشان امشي شغلي :) 1. طالع الحقل Date2 في الجدول ، تلقاه فاضي ، 2. جرب الزر اللي على النموذج ، راح يدخل قيم الاستعلام (طبعا التواريخ الاخيرة) في الحقل Date2 ، 3. العب في الكود مثل ما تريد :) ، وهذا هو الكود اللي على…

حياك الله اخي فواز :) الاسهل: في الجدول ، اضف حقل رقم السند بصيغة ترقيم تلقائي ، وهكذا سيكون عندك الارقام متسلسلة :) الاصعب: تعمل كود في النموذج تستخدم فيه DMax او DCount لحقل رقم السند بصيغة رقم ، ثم تضيف اليه واحد ، هكذا: 'Me.Receipt_Number = DCount("*", "aa…

حياك الله :) ياريت تخبرني الموضوع بالكامل ، ممكن نتوصل لحل افضل :) الكود ممكن يحل لنا المشكلة بطريقة سلسه ، او نستفيد من الاستعلام ونطلب من الكود يستعمله :) جعفر

وعليكم السلام اخي :) طريقتك صحيحة ، ويمكنك الاستغناء عن الاشارة = :) ولكن ، يجب ادخال اي معلومة في السجل حتى يتم استعمال القيمة الافتراضية :) في المرفق ، انا اضفت حقل Any_Number ، بحيث لما تدخل اي رقم ، فسترى ان القيمة الافتراضية تم تسجيلها ، وفي نفس الوقت يظه…

تفضل :) بس لازم تغير صيغة حقل التاريخ في الجدول من نص الى تاريخ (انا ما غيرته ، لكني عملت عملت لك الاستعلام المطلوب) ، يعني غير الجدول وايتخدم الاستعلام :) جعفر 286.RpQr.mdb.zip

وعليكم السلام اخي الفاضل :) اسعد الله صباحك بهذا اليوم المبارك الاغر :) ، وأسال الله العلي القدير جلت قدرته ان يوفقنا ويعطينا من فضله الواسع في هذا اليوم وكل يوم مما ننال به رضاه وعتق رقابنا من النار ، إنه سميع قريب والحمدلله رب العالمين :) ياريت شرح اكثر شوي …

عفوا اختي :) ممكن تشرحين لي لوسمحتي من اين نأخذ الدائن والمدين ؟ مع مثال لوسمحتي وبالتفصيل :) جعفر

حياك الله :) انا استعملت Event Procedure على حدث النقر على زر الامر ، بينما الاخ سالم استخدم Embedded Macro ، ولم انظر فيه ، فلا اعرف ما فيه :( جعفر