Shivan Rekany

في يوم السابع ان شاء الله وما نسيتك عن قريب ان شاء الله راح ارفع لك طلبك تحياتي

لكي تقدر تعمل التعديل على نموذج الفرعي اليك هذا الكود Me.تابع132.Form.AllowEdits = True واذا تريد ان لا يقدر التعديل عليه غير كلمة ترو في نهاية الجملة ترو الى فالس Me.تابع132.Form.AllowEdits = False تحياتي

ماتريد منه نحن بخدمتك بس وضح ماتريد اخي

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

اعمل التقريرك واحنا راح نساعدك بالتعديل عليها ان شاء الله اذا تريد

اعتذر منك بشدة كان نسيت ان احذف مصدر الحفظ عليه لكومبوبوكس اتفضل هذا جربه 037.rar

ما وصلت لجواب سؤالي اتفضل هذا انا عملت المبلغ الكلي الاولى + مجموع ايداع - مجموع سحب CostDB11.rar

هناك سؤال هل سيكون كل واحد عنده مبلغ الكلي في البداية ويتم تزايد وتناقص بسحب وايداع او تريد ان يكون مبلغ الكلي يبدأ من مجموع ايداع ناقص مجموع السحب بانتظارك

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

القي نظرتا الى هذا اذا هذا هو ماتريد عندي بعض ملاحظات والا افهمني اكثر عن ما تريد بالضبط تحياتي test_up.rar

سؤال هل تريد لاضافة سجل جديد ام فقط للبحث

استأذن من استاذنا الغالي @محمدنجار انا نزلت مرفقك وما رأيت شي بأسم اسم العميل شوف الصورة

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

شكرا كثيرا انا ما كان مريض الحمد لله بل انا رحت عالمشفى من شان زوجتي اي اكدر اقول انا ايضا اليوم صرت اب

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

كل شي له حل فقط انتظرني

الجمال يرجع لعيونك اخي حلبي شكرا لك

اتفضل الان القي نظرتا الى Q2 والسبب كله يرجع للاستعلام Q1 الحقل Final شوف اضفت هذا السطر له IIf([xResult]="";""; يعني صرت هكذا Final: IIf([xResult]="";"";IIf([MyResult] Is Not Null;IIf([XResult]>[UpperLimit];ChrW(9650);IIf([XResult]<[LowerLimit];ChrW(9660);IIf([MyResult] Like "*Positi*";ChrW(10070);IIf([MyResult] Like "React*";ChrW(10070);"")))))) لكن بعد بها بعض اخطاء حين يكون حقل myresult بيكون فراغ انا ما افهم بالڤچبگ ما تريد لكي اعطيه جملة مناسبة لكن الان الاستعلام Q2 ما به اي خطأ separatMyNum.rar

اسف لاني كان قلت لك لكن للاسف ما اقدرت ان اشوفه لانه صار عندي ظروف ورحت عالمشفى لذا اعتذر منك بشدة والحمد لله وصلت للمطلوب تحياتي

حسب فهمي لطلبك اتفضل عملت كما قلت في مشاركتي السابقة هل وصلت للمطلوب وافيني بالنتيجة احذف اي سجل تريد او اضف ما بها مشكلة شوف الصورة اليك ملفك القي نظرتا اليه هل تم الحل او بعد تحياتي 037.rar

اتفضل نفس الكود انا طبقت شوف الصورة تحياتي Database.rar

اخي الكريم السلام عليكم ورحمه‌ الله وبركاته اسف على التأخير الرد اذا انا ما كان على الخطأ احنا عملنا على نموذج اسمه رسوم التعليم 1 وليس Aliform1 لذا تقدر تشوم ما عملنا في النموذج رسوم التعليم 1 اعمل نفس الشي في اي نموذج تريد تحياتي

افتح نموذج في وضع تصميم في خصائصه كابشن caption اكتب اي اسم تريد تحياتي

عفوا على التاخير في الرد اتفضل القي نظرتا الى مصدر التقرير Database1 (5).rar

استاذنا الافاضل اذا تسمحون لنا بالمداخلة نريد ان نضيف هذا الكود مع الكود السابق البحث لكي يبحث لنا كل اسماء وليس اسم الاول فقط للتوضيح مثلا عدنا 2 اسماء باسم احمد عند البحث راح يعطيك الاس الاول وبواسطة ازرار اذا تروح الى سجل الاخر مباشرتا راح يعطيك الاسم اللي بعده لكن اذا تستخدم هدول سوى عند تضغط على الزر راح يروح على اسم الثاني اي احمد الثاني Private Sub fsearch_AfterUpdate() If Not IsNull(Me.fsearch) = True Then Me.RecordSource = "SELECT names.id, names.tname FROM [names] WHERE (((names.tname)=[Forms]![names]![fsearch]));" Else Me.RecordSource = "SELECT names.* FROM [names]" End If End Sub Private Sub fsearch_Change() DoCmd.SearchForRecord acDataForm, "names", acFirst, "[tname]='" & Me.fsearch & "'" End Sub بهذا الكود بعد تحديث لكومبوبوكس اي بعد البحث سيكون مصدر النموذج هو تلك السجلات اللي يساوي مع الاسم المختار في كومبوبوكس واذا بيكون الكومبوبوكس فارغة ما بها اي اسم سيختار كل السجلات من جديد db.rar