كشف المبيعات الشهرية لعميل معين 0000 كيف تتم 00 مرفق مثال للتوضيح

أنظر الي الإستعلام الإجراءي المنشأ داخل قاعدة البيانات وطريقة الإستدعاء من الفيجوال بيزيك 6.0

70NMST.rar

اخي العزيز MMA-EG اسعد الله اوقاتك

اشكرك اولا على التعديل ولكن اخي العزيز هذا التعديل لم يفى بالغرض حيت اولا

لا يتم عرض مبيعات العميل الشهري في MS2 حسب المثال وثانيا

لايمكن الدخول الى قاعدة البيانات لادخال البيانات مثلا

يرجى مراجعة ذلك مع عدم تغير قاعدة البيات ليتم فهم الموضوع

ولك كل الشكر والتقدير

اخي العزيز MMA-EG اسعد الله اوقاتك

اشكرك اولا على التعديل ولكن اخي العزيز هذا التعديل لم يفى بالغرض حيت اولا

لا يتم عرض مبيعات العميل الشهري في MS2 حسب المثال وثانيا

لايمكن الدخول الى قاعدة البيانات لادخال البيانات مثلا

يرجى مراجعة ذلك مع عدم تغير قاعدة البيات ليتم فهم الموضوع

ولك كل الشكر والتقدير

أولاً : إذا دخلت علي الإستعلام ( SaleMonths ) بواسطة الأكسيس ونقرت علية سيظهر لك نافذة ( InputBox ) ، أدخل كلمة ( سامر ) أو إسم العميل الذي ترغب في معرفة إجمالياتة سيعرض لك إجماليات العمليل المختار ، حيث أن هذا العارض عارض إجرائي ، والهدف منه عدم نسخ الكود المعقد داخل الفيجوال ، أما إذا أدخلت أي قيمة غير فعلية أو قيمة فارغة فلا يعرض أي نتائج ( علي العموم أنا عدلت في الكود مرة أخري وأرفقتة لك ) بس كدة الكود سيصبح أكثر تعقيداً ( علي ما أعتقد حسب فهمك للغة الإستعلامات البنيوية ) !!!!

ثانياً : كيف يتم إجراء تخزين لعملية معين علي إستعلام إجماليات ، علي سبيل المثال لا يمكنك تعديل حقل بجملة إستعلام مجاميع ، مثال :

Select Dep_ID,Dep_Code,Dep_Name,Count(Emp_DepID) As CountDep
From Dep Inner Join Emp On Dep.Dep_ID = Emp.Emp_DepID
Group By Dep_ID,Dep_Code,Dep_Name

بإختصار لا يمكنك التعدلي علي إستعلام ( مجاميع Group By أو حقل محسوب ) ، ولكن يمكن التعديل بنافذة أو جريد مرتبط بكائن بيانات Recordset مفتوح بداخلة جملة إستعلام عادية ، مثلاً :

Select Emp_ID,Emp_Code,Emp_Name,Emp_Salary,Emp_Bdate,Emp_Jdat
From Emp
Order By Emp_ID

ثالثاً : أما بالنسبة للجريد الموجود داخل الفيجوال بيزيك 6.0 فهو يعمل معي جيداً ، فما الأمر إذاً !!!

علي العموم أنا حذفت الجريد القديم وقمت بإضافة جريد آخر وأتمني أن يعمل معك جيداً

ملحوظة أخيرة ، رجاء التأكد من النتائج جيداً وإجراء فحص كامل ، وإذا حدث أي خطأ آخر فأنا موجود بالمنتدي يومياً حسب الظروف

وشكراً

70NMST.rar

اخي العزيز MMA-EG الله يعطيك العافية

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

معقد كثير

وكيف يمكن الدخول الى الجدول MMMM المدخلة فية البيانات ليتم التعديل عليها مثلا او التعديل على الجدول

نحن نبحث عن كود بطريقة الفيجوال بعيدا عن التعقيدات

واقدم شكري لك مرة اخرى 000 والسلام عليكم ورحمة الله

اقتباس

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

أنا عملت فحص للعمود SaleSum والعمود Balance وجدت النتائج سليمة ، فما الأمر إذاً .

اقتباس

مع ان الكود المستعمل في الاكسيس معقد كثير

مش فاهم ، يعني أية معقد !!!

نصيحة أخوية ، حاول قدر المستطاع أن تفهم هذه التعقدات لأنها ستفتح لك الأفكار !!

علي فكرة ، ممكن تاخد كل الإستعلام الموجود بالعارض SaleMonths عدا الجملة التالية :

PARAMETERS ID_Name Text (255);

ومن ثم نسخها داخل الفيجوال مع تغيير في الشرط التالي :

''بدلاً من.
WHERE MMMM.NAME Like IIF(ID_Name Is Null,'*',ID_Name)

''غيرة الي.
Dim strFind As String

strFind = Trim(InputBox("إدخل إسم العميل","بحث")

If(strFind <> "")Then Sql = Sql & "WHERE MMMM.NAME = '" & strFind & "'"

اقتباس

نحن نبحث عن كود بطريقة الفيجوال بعيدا عن التعقيدات

هوا دة الكارثة التي أراها في جميع المنتديات ، بإختصار مع العرب ومنتدياتها !!!

الكل عايز السهل ، عايز القص واللصق !!!

صحيح أنا مبرمج فيجوال ، لكن أنا أري أن للفيجوال تخصصات ..

تخصص بناء الألعاب والوسائط المتعددة كما تعمل عليها شركة ( المتحدة للبرمجيات ) . تخصص بناء قواعد البيانات . ..... الي آخرة

فإذا إخترت مسار قواعد البيانات فعليك محاولة إحتراف المسار التي تسير علية وتأسيس نفسك فيها . علي سبيل المثال ، أنا إخترت الفيجوال والأكسيس . من الصحيح محاولة فهم العديد من الفيجوال التي تخدمني في بناء تطبيقات إدارية . وفي نفس الوقت فهم الأكسيس جيداً علي الأقل كقاعدة بيانات ( ملف بيانات ) ، أي فهم الدوال وغيرها ، فالإستعلام المرفق لا يحتوي علي سحر بل مجرد مجموعة من الدوال المعروفة بالأكسيس .

أخي الكريم ، آسف علي الصراحة ، بس أنا بحب أقول الحقيقة ، ولو كنت خاطيء فرجاء التوجية .

وأتمني التوفيق دائماً لك ولي ولجميع العرب وأعضاء المنتدي الكرام

وشكراً

اخي العزيز MMA-EG بارك الله فيك

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

اشكرك مرة اخرى على المساعدة 000والله الموفق

ياخبر ، هيا جت فيك ،

والله العظيم أنا لم أتخيل للحظة أنك من المبتدئين .

تقبل أسفي

أممممممممممممممممممممم

طب قلي كيف لي أن أساعدك ، أعتقد أن الحل الذي أرفقتة لك حل مبدئي الي حدٍ ما

وشكراً

اخي العزيز MMA-EG بارك الله فيك

اخي العزيز كلنا اخوة واصحاب وانا حقا اتعبتك ورهقتك

حيت اول ما كتبت هذا الموضوع كان

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

مع العلم انا محاسب وليس مبرمج ولكن الهواية هي السبب

واخير اتقدم من قلبي لك بكل الحب والعرفان 000والى اللقاء في موضوع اخر يفيد ويسفيد منة كل من بحث عن العلم 000 والله الموفق

علي العموم أخي الكريم أنا أتمني لك التوفيك من كل قلبي

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

لكن أخي تذكر دائماً أن الموضوع قائم وأنا منتظر رد الأعضاء معك ، لعلي وعسي أن أجد حل أبسط !!!

مع العلم أنني أعتقد أنني قدمت لك الطريقة المثلي والصحيحة والتي سيتقدم بها الأعضاء للرد علي سؤالك

وشكراً

أخي الكريم ، تحية طيبة وبعد ،

نظرت لكود الإستعلام عدة مرات فوجدت طريقة جلب الشهر ( كتابياً ) كان صعباً جداً ويربك من يقرأها ولم أستخدم فيها إمكانيات الدوال !!!

لذلك أخي ، سأرفق لك الملف مرة أخري بعد تغيير الإستعلام المعقد

حيث أننا بدلت العارض الموجود داخل قاعدة البيانات بحيث إمكانية إستخدامها ، وفي نفس الوقت كتبت جملة الإستعلام داخل الفيجوال

الآن أخي الكريم ، ما رأيك

أتمني هذا حل أفضل بالنسبة لك

أتمني التوضيح

ملحوظة : وجدتك قمت بإضافة هذا المثال بمنتدي المحيط ، إذا كان هذه المرة أفضل مما سبق ، فهل تسمحلي أن أستجيب الية حتي يستفيد الجميع بمنتدي المحيط ، أم أنتظر آراء الآخرين ؟؟؟؟؟

وشكراً

70NMST.rar

اخي العزيز MMA-EG-cairo الله يعطيك العافية والصحة

حقا اخي العزيز هذا ما نبحث عنة 100% والمثال يعمل كما هو المطلوب

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

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

اشكرك مرة اخرى على هذا الموضوع ودعوة الى جميع الاعضاء للتعرف على هذا المثال ودراستة والى اللقاء في موضوع اخر يفيد ويستفيد منة كل الاعضاء 000 والله الموفق