ابو عبد الرحمن اشرف

اخي الفاضل / ابو خليل السلام عليكم ورحمة الله وبركاته بالنسبة لسطر الامر هذا If (Hex$(GetSerialNumber(Drive)) <> "48f63d0f") And (Hex$(GetSerialNumber(Drive)) <> "4ca3c5e7") And (Hex$(GetSerialNumber(Drive)) <> "38e7cbeb") And (Hex$(GetSerialNumber(Drive)) <> "98afd007") And (Hex$(GetSerialNumber(Drive)) <> "8c0b76a2") Then ان طال نتيجة وضع عدد كبير من ارقام الهارديسكات هل من طريقة لجعل السطر يكون على سطرين او ثلاث لاني حاولت وفشلت ويعطيني الرسالة الاتية

اخي الفاضل / ابو خليل السلام عليكم ورحمة الله وبركاته بالنسبة لسطر الامر هذا If (Hex$(GetSerialNumber(Drive)) <> "48f63d0f") And (Hex$(GetSerialNumber(Drive)) <> "4ca3c5e7") And (Hex$(GetSerialNumber(Drive)) <> "38e7cbeb") And (Hex$(GetSerialNumber(Drive)) <> "98afd007") And (Hex$(GetSerialNumber(Drive)) <> "8c0b76a2") Then ان طال نتيجة وضع عدد كبير من ارقام الهارديسكات هل من طريقة لجعل السطر يكون على سطرين او ثلاث لاني حاولت وفشلت ويعطيني الرسالة الاتية

اخي الحبيب الغالي نارت نورت المنتدي عودا حميدا اخي الحبيب اعانك الله على مساعدة اخوانك اللهم امين جزاني الله واياك الجنه واهلا وسهلا ومرحبا بالعضو الجديد بيننا والسلام عليكم ورحمة الله وبركاته

اخي الحبيب السلام عليكم ورحمة الله وبركاته 1 - عندي استعلام ياتي بايراد ومصروف العمارات لعام وفي حالة عدم وجود مصروف في عام معين فلا يعطيني الايراد ايضا ويظهر التقرير فارغ مع انه هناك ايرادات فما العمل اخي الاستعلامات هي ( aa-bb-mezan) والتقرير هو mezan -نستعلم عن سنه 2005 لا يعطيني اي شيئ مع ان هناك ايرادات للعمارات . 2 - في النموذج frmActivities لو اردنا تعديل بيانات سجل معين فما العمل - لانه لو تم تعديل التاريخ مثلا يتم عمل سجل جديد او رقم جديد والقديم لا يتم تعديله فكل ما اريده هو ان يتم عرض البيانات بعد ادخالها مع اعطائي امكانية البحث داخلها بعدد من الفلاتر اولا ايراد ام مصروف ثانيا نوع الايراد او المصروف (اخرى - عمارات - استراحة - ...) ثالثا رقم الادخال او اي كلمة في البيان لاستحضار السجل بسهولة وفي النهاية التعديل في اي حقل بالسجل سواء التاريخ او المبلغ او البيان والسلام عليكم ورحمة الله وبركاته

ارجو من الله ان تكون بتمام الصحة والعافية وان لا يتعدى الامر حبة بنادول والسلام عليكم ورحمة الله وبركاته

اخي الفاضل السلام عليكم ورحمة الله وبركاته ***ارجو منك اخي تجاهل المشاركة الاخيرة والمرفق بها ملف العقارات والى حضرتك توضيح الامور هنا ***النموذج erad موضوح فيه شقة رقم 1608 مكرر فيها المدة من والمدة الى والمدفوع حتى انتهاء الايجار ***انا اكتب المتأخرات يدويا في السجل التالي المكرر لنفس الفترة ، وطبعا اترك خانة المستحق فارغة ارجو منك الافادة اخي

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

المهم هنا إذا كان بإمكانك أن تدمج البييانات المالية في جدول tblExpenses وإلا فلتبقى في جدول Data أفضل من فصلها في جدول ثالث تحياتي,,, اخي الحبيب السلام عليكم ورحمة الله وبركاته اولا : الف سلامه عليك ولا بأس طهور إن شاء الله ثانيا : بالنسبة للمصروفات كده تمام جدا كل التقارير التي من الممكن ان يحتاج اليها المستخدم موجوده وكان آخرها اجمالي المصروفات لعام و الذي تفضلت اخي بحل مشكلته لي. ثالثا : انا عاجر عن فهم هذه الجملة السابقة ، فان كان بالامكان ان تساعدني حضرتك في دمج البيانات المالية في جدول tblExpenses فارجو منك اخي ان تقوم بعملها لو تكرمت وتفضلت علي ، والا الان اصبح جدول DATA به كل ما يخص المستاجر من بيانات بما فيها المبلغ المدفوع وتاريخ الدفع ورقم سند القبض ، ولكن هناك مشكلة بسيطه اخي وهي ان كثير من المستأجرين يدفعوا ايجاراتهم على دفعات كثيرة فما هي كيفية التغلب على هذه المشكلة في نفس الجدول اخي فالمشكلة تتلخص في ان المستأجر الذي لا يدفع ايجارة كاملا لا يعطى له سند قبض نظامي حتى يتم سداد المبلغ بالكلية ، ويكتفى بـإعطائه سند يدوي به البيانات الاتية رقم الشقة واسم المستأجر والمبلغ الاخير الذي دفعة والمتبقي عليه بعد تجميع ما تم دفعه. رابعا : اخي الحبيب حتى لا يحدث خلط عندي ( فالجداول الموجوده الان هي tblExpenses و tblExpensesTypes و DATA و Flat و buildings و years و Months ) وعلى العموم اخي ارجو منك النظر في جدول tblExpenses_1 الان هل هذا هو المطلوب وعندما نختار ايراد ثم عمارات في النموذج (frmActivities) يتم تفعيل كل الحقول اللازمة ( التي تمت اضافتها مؤخرا ) ام نكتفى بجدول DATA والذي ارجو ان تشاهده ايضا اخي

اخي الفاضل السلام عليكم ورحمة الله وبركاته ارجو من الله ان تكون بخير حال ....اللهم امين 1 - بالنسبة لجدول data الذي يشمل بيانات (( رقم الشقة - اسم المستأجر- المدة من - المدة الى - المبلغ المستحق )) هل من الافضل اضافة حقل الدفعة المقدمه هنا ام نجعل كل المدفوعات من الايجار في جدول منفصل باسم Premiums . ارجو الافادة اخي 2 - لقد تم تجميع مبالغ كل مصروف على حده في استعلام واحد ( al_m) اريد شرط التاريخ لعام معين 3 - هناك استعلام باسم qrypr يظهر فيه ما تم دفعة من دفعة مقدمه من data واجمالي الاقساط من premium ، والمشكلة لو لم يدفع المستأجر اي قسط لا يظهر بالاستعلام وعندما احاول جعل خصائص الربط لرقم 2 بان يشمل كافة السجلات من data وتلك السجلات فقط من Premiums يعطيني رسالة خطأ...... فلا ادري لماذا والسلام عليكم ورحمة الله وبركاته

اخي الغالي السلام عليكم ورحمة الله وبركاته الاستعلام يعمل الان بصورة صحيحة وجزاك الله كل خير وهناك ملاحظة غريبة جدا على اخي وهي انا اعمل على اوفيس 2003 بكمبيوتر الشركة وقاعدة البيانات بها عدد من الجداول والنماذج وفي المنزل اعمل على اوفيس 2007 ووجدت ان بعض النماذج (enter) والجدوال ( Premiums ) غير موجوده في نفس قاعدة البيانات فلماذا هذا اخي اما بالنسبة لجدول الاقساط هذا فهو جدول منفصل جديد به رقم الشقة - اسم المستأجر - القسط المدفوع - تاريخ الدفع - سند القبض - المدة من - المدة الى. ولقد تم عمل هذا الجدول بناءا على توجيهات حضرتك لي سايقا *** اخي الحبيب الجدول هذا ظاهر في الاستعلام qrypr والاستعلام all واريد رأي حضرتك فيهم اخي وساحاول تنفيذ تلك الدالة DLast أو DMax وسأوافيك بالنتيجة قريبا اخي وارجو منك اخي ان تجد لي تفسير لاختفاء بعض الجداول والنماذج في اوفيس 2007 اتمنى لحضرتك دوام الصحة والعافية والسلام عليكم ورحمة الله وبركاته

اخي الغالي السلام عليكم ورحمة الله وبركاته لقد قمت بعمل جدول data الذي يخص بيانات الشقة وجدول Premiums الذي يخص التسديد حاولت الربط بينهما في نموذج enter والحاصل عند استدعاء رقم الشقة بمربع تحرير وسرد يحدث ارتباط باول سجل لتلك الشقة وما اريده ان يتم الاتباط باخر سجل مثال شقة (0209 ) ، ادخلت مده جديدة من 1/4/2012 الى 1/4/2013 ولكن يقرأ من اول سجل في عام 2002 اخي الحبيب بالنسبة ايضا للتجميع حسب السنة اضفت التاريخ للاستعلام qryFlatsAcounts with date ولكن لا يجمع فأرجو من حضرتك مساعدتي بالنقطتين هاتين اخي

اخي الغالي السلام عليكم ورحمة الله وبركاته 1 - هل فعلا من الممكن ان نضع كل حقول جدول data في نفس جدول الايرادات والمصروفات tblExpenses وتظهر كل هذه الحقول ( رقم العمارة - رقم الشقة - اسم المستأجر - المدة من - المدة الى - المستحق - الدفعة المقدمه - المدفوع - المتبقي ) في نموذج frmActivities ان كان هذا بالامكان فارجو ان تساعدني فيه اخي 2 - تم ادخال مصروف لشقة 0403 لعام 2010 ، وايراد لشقة 0402 لعام 2010 ، والتجميع في الاستعلامين سواء حسب الشقة او العمارة مضبوط تماما فلقد تم تجميع كل الايرادات والمصروفات بغض النظر عن الاعوام ، فالرجاء التجميع حسب كل عام 3 - اخي الحبيب تم ادخال مصروف لشقة 0122 وهي غير مذكورة في جدول flat فلم تظهر في المعادلات ، فهل معنى هذا انه يجب اولا اضافة عمارة جديدة ان لم تكن موجوده في جدول buildings او شقة جديدة في جدول flat ان لم تكن موجوده

اخي الغالي ارجو من الله ان تكون في احسن اللهم امين

اخي الحبيب السلام عليكم ورحمة الله وبركاته اولا بوركت وبورك من حولك ومن يهمك امره امين ثانيا : ان فكرة هذا البرنامج مبنية اساسا على تأجير الشقق ومن ايراد تلك الشقق يتم الصرف على بعض الموارد المذكورة آنفا ومنها طبعا المصروف على العمارات ( صيانة الشقق وما شابه ) فاستفسار حضرتك ما علاقة جدول data بالموضوع فالاجابة ان ناخذ منه المدفوع خلال العام لشقة ما فيكون هذا هو ايراد تلك الشقة وبجموع مدفوع كل شقة في العمارة يتكون لنا ايراد العمارة وهكذا بالنسبة لاستعلام حضرتك يعمل بصيغة سليمه ولكن من المفترض اخي ان يتم التجميع حسب الشقة كما في الاستعلام qry1 ثم استعلام اخر للتجميع حسب العمارة (ولم استطيع عمله اخي ) وطبعا تكون الاستعلامات مقيده بشرط عام معين يعني ايراد ومصروف شقة لعام - ايراد ومصروف عمارة لعام - اجمالي الايراد(بجميع موارده ) والمصروف (بجميع موارده ) لعام وما يتم على العمارات كمصروف وايراد يتم على باقي الموارد من مصروفات وايرادات اخي الغالي يعني الموضوع عبارة عن مصروفات كثيرة ومنها العمارات وايرادات كثيرة ومنها العمارات ثم بما ان العمارات عامل مشترك فيحدث تجميع مصروف وايراد كل شقة وعماره لعام معين اخي الغالي ممكن ايميل حضرتك حتى ارسل لك البرنامج الذي صممته من سنه 2001 واريد تطويره الان وبالتالي تستطيع معرفة ما اريد بالضبط اخي او ترسله لي على ايميلي المذكور بالموقع اخي او اذكر ايميلي هنا بالمشاركة لا ادري هذا مخالف لقوانين المشاركة ام لا

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

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

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

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

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

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

اخي الفاضل الكريم / منتصر الانسي السلام عليكم ورحمة الله وبركاته هذا هو المراد بالضبط اخي الحبيب رفع الله قدرك وأعلى شأنك امين ولكن هناك ملاحظة بسيطة اخي لا يوجد وحدة نمطية او ماكرو او حدث لعمل هذا الابداع فكيف تم ذلك اخي بعد البحث في النموذج وجدت هذا الحدث فاين يوضع بالنسبة لافكار اخرى مشابه اخي Private Sub sbExpCounter() If Not IsNull(ExpType) And Not IsNull(ExpDate) Then ExpNo = Nz(DMax("expno", "tblExpenses", "exptype=form!exptype and Year(expdate)=Year(Form!expDate)"), 0) + 1 ExpCode = Year(ExpDate) & Format(ExpType, "00") & Format(ExpNo, "000000") End If End Sub 1- ما الفرق بين تاريخ الصرف وتاريخ الفاتورة بمعنى ايهما الذي يستعمله المستخدم 2- هل من حكمه معينه في اظهار رقم الكود في النموذج بالنسبة للمستخدم 3- ان مصروفات العمارات كانت مرتبطه برقم الشقة او العمارة ، حيث يبنى عليه( حقل رقم الشقة ) معادلات لمعرفة مصروف كل شقة وعمارة لعام معين وحضرتك وحدت جميع الحقول في الكل فهل من سبيل لذلك ام نضطر لعمل جدول منفصل لمصروفات العمارات

نعم اخي ومن فضل الله علىًّ ايضا ان وفقني للتعرف على منتداكم الغالي هذا والاهم انتم ايها المراقبون والاداريون ، فاسال الله ان يجمعنا في ظله يوم لا ظل الا ظله يوم القيامه والى اللقاء في سؤال جديد والسلام عليكم ورحمة الله وبركاته

اخواني الكرام السلام عليكم ورحمة الله وبركاته عندى 6 او 7 مجالات للمصروفات وكل واحد بجدول منفصل رجائي الاتي : جعل الكل في جدول واحد مع مراعاة الترقيم التلقائي لكل نوع على حده مع بداية عام جديد يتم ترقيم تلقائي جديد ان يكون هناك نموذج واحد يستدعي الكل عن طريق قائمة منسدلة والى حضراتكم الملف المرفق

اخي الفاضل الكريم ابو خليل السلام عليكم ورحمة الله وبركاته لله الحمد والمنه تم عمل الشرط ممتاز بالصيغة الآتية اخي If (Hex$(GetSerialNumber(Drive)) <> "48f63d0f") And (Hex$(GetSerialNumber(Drive)) <> "111111") Then

عندي نموذج رئيسي واخر فرعي به الدفعات المدفوعة ما اريده هو ان اجمالي المدفوع في النموذح الفرعي = خانه المدفوع في النموذج الرئيسي (ooo) والى حضراتكم المرفق