محمود بن عوض قام بنشر مايو 3, 2012 مشاركة قام بنشر مايو 3, 2012 السلام عليكم اخوتى الكرام برجاء المساعدة فى إستكمال الملف المرفق وهو لإستخراج فواتير وحساب الارصدة والمبيعات كالتالى: 1- كود لعدم ترك خانات فارغة عند تسجيل فاتورة وكذا إمكانية إستخدامه فى النماذج الاخرى لإدخال البانات. 2- عند الإستعلام عن رصيد صنف أو حركة صنف لا يتم ظهور رصيد الأصناف إلا إذا كانت مسجلة فى جميع الجداول ( الاصناف - المبيعات - المشتريات ) بمعنى أنه لو تم شراء صنف ولم يتم تسجيله بجدول المبيعات لا يتم ظهوره عند الإستعلام عن الرصيد رغم وجود رصيد منه. 3- كود يظهر رسالة بعدم وجود بيانات لفاتورة أو عند فتح تقرير فى حالة عدم وجود بيانات 4- كود للتفقيط " تحويل إجمالى فاتورة أو مبيعات إلى حروف " 5- كود لظهور الرصيد بلون مختلف بالتقرير فى حالة إذا كان الرصيد أقل من أو يساوى حد الطلب مع رجاء العلم أنى قد إستعنت فى هذا العمل بمشاركات بعض الاخوة بالمنتدى جزاهم الله خيرا... كذلك حاولت تطبيق كود عدم ترك الخانات فارغة من إحدى إصدارات مجلة الاكسس ولم يفلح .. حاولت عمل كود التفقيط بناء على بعض مشاركات الاخوة أيضا ولم يفلح.. معذرة للإطالة مع رجاء الاهتمام وإضافة الشرح إن أمكن..... شكر الله لكم حسن المعاونة MAWAD.rar رابط هذا التعليق شارك More sharing options...
أبو آدم قام بنشر مايو 3, 2012 مشاركة قام بنشر مايو 3, 2012 أخي العزيز محمود قائمة الطلبات طويلة وغير مشجعة إخوتك في عونك بإذن الله ، ولكن الحجم و عدم الوضوح سيؤدي للإحجام عن المشاركة ، لأن غايات المنتدى لا يندرج تحتها إنشاء التطبيقات و البرامج أو إكمالها دعنا نتبع الروتين التالي : أعد توضيح النقطة الأولى وحدد النموذج و الحقل و مكان الكود وهكذا حتى يسهل على من يرغب بمساعدتك التحرك و الوصول بسهولة في تطبيق كبير كالذي أرفقته. وهكذا حتى تنتهي من تحقيق غاياتك ، ويفضل أن يكون كل منها في موضوع مستقل لاحق، بعد أن تنتهي من بندك الأول هنا. والله من وراء القصد ... وهو حسبي ............. رابط هذا التعليق شارك More sharing options...
محمد ايمن قام بنشر مايو 4, 2012 مشاركة قام بنشر مايو 4, 2012 اخي الكريم كما قال لك الاخ ابو آدم الطلبات كثيرة لذلك قم بتقسيمها و سيساعدك الجميع انشالله لماذا لا تبدأ ب الطلب 1 - 4 حدد النماذج و الحقول المطلوب التعديل عليها و سأبدأ التطبيق ثم نكمل مشوارنا بإذن الله رابط هذا التعليق شارك More sharing options...
محمود بن عوض قام بنشر مايو 5, 2012 الكاتب مشاركة قام بنشر مايو 5, 2012 الاخوة الكرام جزاكم الله خيرا على سرعة الرد..... ولكنى أجملت فى الطلب حتى لا يمل منى الأخوة من تكرار الأسئلة واحد تلو الآخر ولكن عملاً بالنصيحة بالنسبة للطلب الأول والرابع ( أرجو الا تكونا فى حاجة لرفع الملف مرة أخرى ) 1- فى نموذج InvoiceEnter أود أن يتم التنبيه فى حالة ترك خانة من الخانات ( اسم العميل .. التاريخ..اسم الصنف..الكمية ...الخ) فارغة لتدارك السهو وكذلك فى أى نموذج آخر كمثال نموذج Purchases حتى أتمكن من تطبيقه بأى نموذج أريد. 2- تفقيط المبلغ الصافى للفاتورة فى نموذج InvoiceEnter وكذلك فى تقرير InvoiceHead وإجمالى المبيعات فى تقرير"قيمة المبيعات عن فترة" وكيف أستخدم هذا الكود بصة عامة وفقنى الله وإياكم للعلم النافع والعمل الصالح رابط هذا التعليق شارك More sharing options...
محمد ايمن قام بنشر مايو 5, 2012 مشاركة قام بنشر مايو 5, 2012 اخي الكريم بالعكس ( انا من جهتي لا امل عند وضع الطلبات واحد تلو الآخر ) ولكن لا احد يستطيع حمل عشر ( بطيخات ) بيد واحدة سنبدأ على بركة الله و المرفقات قريبا انشالله و للحديث تتمة رابط هذا التعليق شارك More sharing options...
محمد ايمن قام بنشر مايو 5, 2012 مشاركة قام بنشر مايو 5, 2012 اخي الكريم هذا هو المرفق مع بعض التعديلات غير التي طلبتها ( الجدولين InvoiceHead و InvoiceDetails ) حيث تم تغيير خصائص الحقلين ( no و invoice_no ) الى مفهرس ( بدون تكرار ) تلميحات اخي الكريم عندما تضع رز امر او مربع نص قم بتسميته نسبة الى عمله او القيمة التي يحويها مثال : زر اغلاق النموذج سمه clos او exit كي تسهل على نفسك و علينا معرفة وظيفة الزر حاول الابتعاد عن تسمية الازرار او الحقول باسماء عربية ( السبب طبعا هو صعوبة التبديل بين اللغة العربية و الانكليزية في محرر الفيجوال بيسك ) واخيرا و ليس آخرا انا بانتظار ردك على التعديلات حتى نكمل الموضوع ملاحظة : الحقل تفقيط سيعطيك ( خطأ ) في البداية ولكن عند اصدار فاتورة جديدة او العودة الى فاتورة قديمة سيعطيك قيمة الفاتورة كتابة MAWAD2.rar رابط هذا التعليق شارك More sharing options...
أبو آدم قام بنشر مايو 5, 2012 مشاركة قام بنشر مايو 5, 2012 خلف زر أمر لتدقيق الثغرات (الحقول الفارغة) ، ضع الكود التالي : Private Sub cmdChick_Click() Dim ctl As Control Dim vIndex As Long For Each ctl In Me.Controls If ctl.ControlType = acTextBox Or acComboBox Then With ctl If IsNull(Me.Controls.Item(vIndex)) = True Then MsgBox vIndex & ": " & Me.Controls.Item(vIndex).Name & " Value:Empty Field" Me.Controls.Item(vIndex).SetFocus Exit Sub End If End With End If 'This is used to track the actual Item Number. vIndex = vIndex + 1 Next ctl End Sub ........... رابط هذا التعليق شارك More sharing options...
محمد ايمن قام بنشر مايو 6, 2012 مشاركة قام بنشر مايو 6, 2012 بسم الله ماشاء الله اخي ابو آدم من الاخير جزاك الله كل خير ( لانو فعلا عبقري يا اخي ) خطرت لي فكرة لماذا لا نضع الكود في حدث ما عوضا عن زر امر !!!! ولكن لي سؤال اخي ابو آدم ماذا لو ان هناك بعض الحقول يمكن ان تبقى فارغة لسبب او لآخر هل الكود سيسبب اي مشاكل ؟؟ رابط هذا التعليق شارك More sharing options...
أبو آدم قام بنشر مايو 6, 2012 مشاركة قام بنشر مايو 6, 2012 أخي الحبيب جزيت خيراً على كلماتك الطيبة الكود مصمم كي يقوم بمنع ترك أي حقل من نوعي مربع نص ومربع تحرير وسرد فارغاً في حال رغبتنا بترك أحد الحقول فارغاً نقوم بإستثنائه بجملة if في بداية الكود ، ولكنه في هذه الحالة لا يعود عام الاستخدام ويحتاج لتفصيل وتحليل حسب أسماء احقول. أما مسألة وضع الكود في حدث بدلاً من زر أمر ، فيدرج أستخدام مثل هذه الأوامر في حدث قبل انهاء التحميل On Unload ولكنني لم أجرب هذا الكود في هذا الحدث جرب ووافني بالنتيجة ..... ............. رابط هذا التعليق شارك More sharing options...
محمد ايمن قام بنشر مايو 6, 2012 مشاركة قام بنشر مايو 6, 2012 الكود يعمل تمام التمام وضعت الحدث عند اغلاق النموذج طبعا هناك بعض التعديلات التي يجب ان تتم لمنع اغلاق النموذج في هذه الحالة رابط هذا التعليق شارك More sharing options...
محمود بن عوض قام بنشر مايو 6, 2012 الكاتب مشاركة قام بنشر مايو 6, 2012 (معدل) الأخوة الكريم أبو أيمن وأبو آدم شكر الله لكم مسعاكم الحمدلله تم تنفيذ المطلوب بالنسبة للبندين الأولين ولكن توجد بعض الملاحظات بعد إذنكما 1-أنه عند الإنتقال بالماوس بين الخانات قد لاتظهر الرسالة بتدارك الفارغ 2-لاحظت تغيير فى بيانات جدولى InvoiceHead و InvoiceDetails فى أرقام الفواتير وكذلك التاريخ هل قمتم بتعديلها وهل عند كتابة رقم الفاتور بأى رقم سيتم تحويله لرقم مسلسل آخر؟ 3- حدث تعديل فى تقرير InvoiceHead وهو المفترض طباعة الفاتورة منه ولا أعرف سببه والتقرير غير صالح فى هذه الحالة 4-الا توجد من طريقة لعمل كود الحقول الفارغة على النموذج ككل وليس لكل حقل 5-لم أفهم طريق وضع الكود خلف زر أمر التى ذكرها الاخ أبو آدم جزاه الله خيراً ( وعلى فكرة أنا تهت بينكما فى حواركما حول هذا الكود...ارجو الافادة) فى إنتظار ردكما مع خالص الشكر تم تعديل مايو 6, 2012 بواسطه محمود بن عوض رابط هذا التعليق شارك More sharing options...
محمد ايمن قام بنشر مايو 6, 2012 مشاركة قام بنشر مايو 6, 2012 اخي الكريم بالنسبة الى اسئلتك فالاجابة كما يلي : 1 - يجب عليك منع الانتقال بالماوس ( الكود موجود في نموذج و لكنك لم تستعمله كما ان الوحدة النمطية الخاصة بالكود غير موجودة ) 2 - نعم قمت بتعديل بعض الخصائص في بعض الحقول و السبب : رقم الفاتورة لا يجب ان يتكرر - التاريخ ممكن ان يتكرر فانت في يوم واحد قد تعطي 20 فاتورة مبيع !!!!! و ليس فاتورة واحدة فقط اما بقية سؤال فلم افهم شيئا 3 - حدث تعديل تقرير ؟؟؟؟؟ بصراحة لم افهم عن ماذا تتحدث هل يمكنك ان تسعفنا ببعض التوضيح ؟؟؟؟؟؟ 4 - الكود يعتمد على تصميم نموذجك و بتوضيح اكبر اذا كان هناك بعض الحقول يمكن ان تبقى فارغة لسبب او لآخر فلا يمكن تطيبق كود اخينا ابو آدم اما اذا كانت جميع الحقول في نموذج يجب ان تملئ بالبيانات عندها يمكن تطبيق الكود 5 - اخي و معلمي ابو آدم وضع زر امر جديد ووضع الكود فيه حيث يقوم الكود بالاختبار لوجود حقول فارغة و جربت ان اضع الكود عند اغلاق النموذج و الكود يعمل كما يمكن وضع الكود عند اي حدث و لكن يجب ان تنتبه اذا كان هناك اي حقول يمكن ان تبقى فارغة لسبب او لآخر فلا يمكن تطبيق الكود رابط هذا التعليق شارك More sharing options...
أبو آدم قام بنشر مايو 7, 2012 مشاركة قام بنشر مايو 7, 2012 إخوتي الفضلاء أرفق لكم الكود معدلاً ليقوم باستثناء حقول محددة من النموذج من عملية التدقيق ، ليصبح الكود : Private Sub Title_Exit(Cancel As Integer) Dim ctl As Control Dim vIndex As Long For Each ctl In Me.Controls If ctl.ControlType = acTextBox Or acComboBox Then With ctl If IsNull(Me.Controls.Item(vIndex)) = True Then If ctl.Name <> "Title" And ctl.Name <> "CompanyName" Then MsgBox vIndex & ": " & Me.Controls.Item(vIndex).Name & " Value:Empty Field" Me.Controls.Item(vIndex).SetFocus Exit Sub End If End If End With End If 'This is used to track the actual Item Number. vIndex = vIndex + 1 Next ctl End Sub ويوضع الكود في حدث عند الخروج لآخر حقل في النموذج ، حيث تتم عملية التدقيق لكافة الحقول بإستثناء التي قررنا عدم التدقيق عليها والمرفق تطبيق لما ورد أعلاه والله من وراء القصد ... وهو حسبي ......... NA_EmptyFields.rar رابط هذا التعليق شارك More sharing options...
محمد ايمن قام بنشر مايو 7, 2012 مشاركة قام بنشر مايو 7, 2012 بسم الله ماشاء الله اخي ابو آدم فعلا كلمة عبقري لا تفعل شيئا امام ما تقدمه من ابداعات جزاك الله كل خير رابط هذا التعليق شارك More sharing options...
أبو آدم قام بنشر مايو 7, 2012 مشاركة قام بنشر مايو 7, 2012 شكراَ ... شكراً مجاملاتك وتشجيعك يشعرنا بأننا نقدم ما ينفع ويقضى الحاجة ......... 1 رابط هذا التعليق شارك More sharing options...
محمود بن عوض قام بنشر مايو 7, 2012 الكاتب مشاركة قام بنشر مايو 7, 2012 الاخ الفاضل /أبو أيمن .... أعزك الله بالنسبة للنقطة الأولى لم أفهم العبارة (الكود موجود في نموذج و لكنك لم تستعمله كما ان الوحدة النمطية الخاصة بالكود غير موجودة) وأين هذا الكود وكيفية تفعيله أما بالنسبة لرقم الفاتورة فأنا خشيت أنى عندما أدخل رقم فاتورة وليكن ( 122) مثلا يكون الرقم المدون بالجدول مسلسل مثل 10-101 .. وهكذا وبالنسبة لتقرير InvoiceHead فأرفق لك صورة للتقرير بالملف MAWAD ( الاصلى ) وصوره له بعد التعديل MAWAD2 لمعرفة الفرق ومعذرة لم ألحظ زر الامر الذى تتحدث عنه فأين هو؟ وآسف إذا كانت أسئلتى سخيفة أو تنم عن سوء فهم ولكنى أطمع فى سعة صدركما رابط هذا التعليق شارك More sharing options...
محمود بن عوض قام بنشر مايو 7, 2012 الكاتب مشاركة قام بنشر مايو 7, 2012 (معدل) الاخ الفاضل /أبو أيمن .... أعزك الله بالنسبة للنقطة الأولى لم أفهم العبارة (الكود موجود في نموذج و لكنك لم تستعمله كما ان الوحدة النمطية الخاصة بالكود غير موجودة) وأين هذا الكود وكيفية تفعيله أما بالنسبة لرقم الفاتورة فأنا خشيت أنى عندما أدخل رقم فاتورة وليكن ( 122) مثلا يكون الرقم المدون بالجدول مسلسل مثل 10-101 .. وهكذا وبالنسبة لتقرير InvoiceHead فأرفق لك صورة للتقرير بالملف MAWAD ( الاصلى ) وصوره له بعد التعديل MAWAD2 لمعرفة الفرق ومعذرة لم ألحظ زر الامر الذى تتحدث عنه فأين هو؟ وآسف إذا كانت أسئلتى سخيفة أو تنم عن سوء فهم ولكنى أطمع فى سعة صدركما التقرير.rar تم تعديل مايو 7, 2012 بواسطه محمود بن عوض رابط هذا التعليق شارك More sharing options...
محمد ايمن قام بنشر مايو 7, 2012 مشاركة قام بنشر مايو 7, 2012 اخي ابو آدم انت لا تقدم فقط ما ينفع بل ما ينفع وما ينتفع به مع كثير من الخبرة و المعرفة و بصراحة اقولها لك من باب الأخوة سامحك الله انا لا اجاملك بل اقول الحقيقة اما بالنسبة الى اخي محمد عوض مين ابو ايمن ؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟ المشارك في الموضوع ( ابو آدم ) و ( محمد ايمن ) فمن تقصد ؟ اخي الكريم ما اقصده ان الكود موجود و لكنك لم تستعمله هو انك كتبت الكود و لكنك قمت بايقافه كما ان هناك وحدة نمطية يجب ان توضع في برنامجك ليعمل الكود اي ان الكود موجود و لكن غير مفعل هذا ما اقصده أما بالنسبة لرقم الفاتورة فأنا خشيت أنى عندما أدخل رقم فاتورة وليكن ( 122) مثلا يكون الرقم المدون بالجدول مسلسل مثل 10-101 .. وهكذا ارجو بعض التوضيح !! اما بالنسبة الى النقطة الاخيرة فأي زر امر تتحدث عنه ؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟ هل تقصد المشاركة 12 اذا كانت هي فما اقصده ان اخينا ابو آدم وضع كود من عنده ليقوم بالبحث عن الحقول الفارغة و اعطاء رسالة بها و لكن كيف يتم تطبيق هذا الكود ؟؟؟ وضع زر امر ووضع هذا الكود خلفه هذا ما اقصده و اخيرا هذا البرنامج مع تعديلات بسيطة التعديل الاول لتعطيل الانتقال بدولاب الفأرة ( الملف std.dll ) يجب ان يبقى في فولدر البرنامج دائما التعديل الثاني هو لزر طباعة التقرير InvoiceHead حيث انني سهوت للاسف و اخطأت في الكود لذلك اصبح التقرير يظهر بهذا الشكل و قد قمت بتصحيح الكود و للحديث تتمة انشاء الله MAWAD3.rar رابط هذا التعليق شارك More sharing options...
محمود بن عوض قام بنشر مايو 7, 2012 الكاتب مشاركة قام بنشر مايو 7, 2012 الاخ الكريم / محمد أيمن ... لا أعرف بالضبط كيف خلطت الاسماء ولكنى فوجئت بها عند إستفسارك فأرجو أن تقبل إعتذارى أما بالنسبة للكود فلا أعرف أين هو بالضبط لتفعيله وكيف أصنع له وحدة نمطية ......مش بقول لك أنا تهت منكم! أما بالنسبة لرقم الفاتور أنا جربته فعلاً ولا توجد مشكلة ولكنى اردت ان ابين لك سبب إستفسارى. ممكن ننقل على الطلب التالى ؟؟ عند الإستعلام عن رصيد صنف ( الاصناف ) أو حركة الصنف من جدول InvoiceDetails و Purchases (أى المشتروات وبها رصيد أول المدة والمبيعات) إذا كان هناك صنف مسجل فى جدول Purchases كوارد أو كمية أولية ولم يتم تسجيله بجدول InvoiceDetails أو إستخراج فاتورة له لا تظهر كميته ضمن الرصيد ( بضاعة موجودة دون بيع ولا تظهر كرصيد) ومعذرة لقد طلبت أن تتكرموا على بشرح الاكواد التى توضع حتى أفهم وأنفذ لقلة علمى بذلك ومرة أخرة معذرة على الخطأ الغير مقصود.......... وفقكما الله لصالح الأعمال رابط هذا التعليق شارك More sharing options...
محمد ايمن قام بنشر مايو 7, 2012 مشاركة قام بنشر مايو 7, 2012 ولا يهمك اخي الكريم اما بالنسبة الى الكود فكما قلت لك في المشاركة السابقة اضفت الوحدة النمطية و فعلت الكود بقي عليك التجربة و النتائج و بالنسبة الى الشرح فاعذرني نسيت ان اضع شرح و سأضعه في آخر المشاركة اما بالنسبة الى الطلبات فأنا اخالفك الرأي مارايك ان نكمل الطلبين 3 - 5 ( الاسهل فالاصعب ) حدد التقارير كما ارجو منك ان تشرح لي الطلب الخامس فلم تتضح الصورة لي كثيرا شرح الاكواد في الطبات السابقة اولا كود عدم ترك الحقول فارغة Private Sub Date_Exit(Cancel As Integer) If IsNull(Me.Date) Then MsgBox "أدخل التاريخ ", vbInformation Me.Invoic_No.SetFocus Me.Date.SetFocus End If وضعت الكود عند الخروج من حقل التاريخ If IsNull(Me.Date) Then MsgBox "أدخل التاريخ ", vbInformation Me.Invoic_No.SetFocus Me.Date.SetFocus اذا كان الحقل ( date ) فارغا يعطي رسالة ( ادخل التاريخ ) طبعا بقية الحقول تم تنفيذ الكود بنفس الطريقة مع مراعاة مايلي: 1 – تغيير اسم الحقل 2 – تغيير نص الرسالة ثانيا : حقل التفقيط يقوم الحقل باستدعاء كود تحويل الارقام الى حروف و اعطاء النتيجة في هذا الحقل =NoToTxt([نص17],"جنيه مصري","") & " فقط لاغير " وهذا الكود ينفذ بشكل دائم ( طالما ان النموذج مفتوح ) nototxt اسم الكود نص 17 اسم الحقل المراد تنفيذ الكود عليه ثالثا : تعطيل الانتقال بدولاب الفارة blRet = MouseWheelOFF تم وضع هذا الكود عند تحميل النموذج و هو يستدعي وحدة نمطية تعطل الانتقال بين السجلات بدولاب الفارة طبعا ستلاحظ التالي اذهب الى الوحدات النمطية و ستجد وحدتين نمطيتين الاولى باسم TotalToText و الثانية MouseOff الاولى لتحويل الارقام الى احرف ( تفقيط) الثانية لتعطيل الانتقال بدولاب الفارة اذكرك اخي الكريم انه في المرفقات ملف باسم std.dll هذا الملف يجب ان يتواجد دائما في فولدر البرنامج رابط هذا التعليق شارك More sharing options...
محمود بن عوض قام بنشر مايو 8, 2012 الكاتب مشاركة قام بنشر مايو 8, 2012 (معدل) أخى محمد السلام عليكم شكر الله لك صعة صدرك وصبرك الحمدلله جربت الكود وشغال تمام أما بالنسبة للسؤال الذى طلبت تأجيله فأنا أظن أنه توجد مشكلة فى العلاقات فى الإستعلام لا أفهمها ...وعلى كلٍ فالبنسبة للطلب الثالث والخامس فكما يلى : 1- الطلب الثالث : مثلاً عند فتح تقرير InvoiceHead [ وأرجو أن تراجعه على الملف الاصلى قبل التعديلات ] وهو خاص بعرض بيانات فاتورة بناءا على إدخال رقم الفاتورة فالمطلوب إذا كان رقم الفاتورة الذى تم إدخاله غير موجود تصدر رسالة بعدم وجود فاتورة بهذا الرقم ولا تظهر صفحة التقرير فارغة ...كذلك تقرير " مسحوبات عميل " فى حالة عدم وجود مسحوبات لهذا العميل...ونأخذ مثال على النماذج " عرض بيانات عميل " ..وهكذا وطبعاً أنا من خلال الشرح أحاول تطبيقه على أى نموذج أو تقرير بعد ذلك. 2- الطلب الخامس : بالنسبة لتقرير " رصيد الأصناف " فى خانة الرصيد إذا كان الرصيد يساوى حد الطلب [ وهو هنا فى المثال كمية 3 وحدات ] يكون الرصيد باللون الازرق مثلاً وإذا كان أقل يكون باللون الأحمر مثلا وبالمناسبة هناك إستفسار هل من الممكن وضع كود فى نموذج الفاتورة فى خانة الكمية إذا كان لايوجد رصيد من الصنف تظهر رسالة بعدم إمكانية تحرير الفاتورة أو عدم وجود رصيد " على فكرة لو دى هتتعبك لا داعى لها " 3- جزاك الله خيراً على الشرح وعلى فكرة بالنسبة لكود التفقيط انا حاولت كتابته من قبل عرض الموضوع عليكما بنفس الطريق ولكن كانت تظهر كلمة خطأ# ولم أعرف السبب ولك منى خالص تحياتى تم تعديل مايو 8, 2012 بواسطه محمود بن عوض رابط هذا التعليق شارك More sharing options...
محمد ايمن قام بنشر مايو 8, 2012 مشاركة قام بنشر مايو 8, 2012 اخي الكريم في البداية لاشكر على واجب و كلنا هنا اخوة ان شاء الله اخي الكريم تم تنفيذ الطلب الثالث و الخامس والشرح كالآتي اولا كود عدم وجود بيانات نفتح التقرير في طريقة عرض التصميم و نختار ( حدث ) ثم نختار ( عند عدم وجود بيانات ) ( تنفيذ حدث ) وقمت بوضع رسالة تفيد بعدم وجود بيانات طبعا تم التنفيذ على كافة التقارير وبالمناسبة لقد عدلت التقرير invoiceheade كما كان في الملف الاصلي ( عند فتحه يطالبك برقم الفاتورة ) ( لانني حذفت الشرط و نسيت اعادته عن طريق الخطا ) ثانيا كود اظهار رصيد الاصناف بلون آخر ندخل الى التقرير في طريقة عرض التصميم ننقر بالزر الايمن على مربع النص المراد تنفيذ شرط عليه و في مثالنا هنا هو ( الرصيد ) ونختار من القائمة ( تنسيق شرطي ) تظهر نافذة جديدة لضبط اعدادات التنسيق الشرطي و قد ضبطت الاعدادات على ( تعبير هو ) ([الرصيد]=[order_point]) حيث عند تساوي قيمة الحقلين يظهر حقل الرصيد باللون الازرق اضفت شرطا جديد و ضبطت الاعدادات على ( تعبير هو ) ( [الرصيد]<[order_point] ) وهنا اذا كانت قيمة الرصيد اصغر من حد الطلب يظهر حقل الرصيد باللون الاحمر بقي عليك ان تجرب المرفق و توافيني بالنتيجة وللحديث تتمة ان شاء الله MAWAD4.rar رابط هذا التعليق شارك More sharing options...
محمود بن عوض قام بنشر مايو 9, 2012 الكاتب مشاركة قام بنشر مايو 9, 2012 (معدل) أخى الكريم شكراً لك ...... جربت الملف وهو تمام ولكن عند فتح التقرير InvoiceHead ظهرت رسالة " ?NAME# " فى خانة التفقيط وهل يمكن تغيير عنوان الرسالة التالية لـ" أدخل رقم الفاتورة " وبالنسبة لتقرير الارصدة كنت أود أن يكون الرقم نفسه الذى يتغير لونه وليس الخانة ولكن شكراً ذلك يفى بالغرض معذرة لم أستطيع وضع الصورة فى المشاركة ولكن هى الرسالة التى تظهر عند فتح التقريرInvoiceHead مع خالص تحياتى وإلى اللقاء بمشيئة الله تم تعديل مايو 9, 2012 بواسطه محمود بن عوض رابط هذا التعليق شارك More sharing options...
محمد ايمن قام بنشر مايو 9, 2012 مشاركة قام بنشر مايو 9, 2012 اخي الكريم تم حل مشكلة الخطا في التقرير اما بالنسبة الى الرسالة هل تقصد الرسالة التي تظهر عند فتح التقرير اعتقد انه لا يمكن و لكن ساحاول وبالنسبة الى تقرير الارصدة افتح التقرير في عرض التصميم ثم اضغط على مربع نص الرصيد واختر تنسيق شرطي وقم بتغيير ما تشاء من هناك ثم اضغط موافق ملاحظة لا تقم بتغيير نص الشرط ابدا و للحديث تتمة إن شاء الله MAWAD5.rar رابط هذا التعليق شارك More sharing options...
محمود بن عوض قام بنشر مايو 10, 2012 الكاتب مشاركة قام بنشر مايو 10, 2012 أخى محمد............... السلام عليكم فعلاً غيرت تنسيق مربع النص ونجح بفضل الله .. ولكن تقرير InvoiceHead تلف مرة أخرى يفتح بدون طلب رقم الفاتورة وبياناته غير موجودة فما السبب ؟ أنا بإنتظار ردك حتى ننتقل إلى طلب آخر.... ولك منى خالص الدعاء بدوام العافية رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.