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

وين الاجااااااابه يا ناس

تهي تهي

للرفع

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

أخى الكريم لقد جربت code ويمكنك أن تجربه وتخبرنى بالنتيجة

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

select Sum(مبيعات التلفزيون) from table 
where  DATEPART(month, col2) = رقم الشهر 
and (إسم الموظف) = إحمد

col2 ---------> هو الcolumn الخاص بالتاريخ

رقم الشهر = 1 ---------> إذا كان شهر يناير

وفقك الله

يعني اخي استخدم هذا الكود في الكرستال ربورت ويطلع اللي اريده

اذا كان كذا بحاوول وبعطيك النتيجة والله لا يرحمنا منكم

تحياتي

اخوي للأسف حاولت بس ما ضبط معاي الكود ما ادري ليه

يمكن انا ما فهمته

يا ريت عزيزي تحاول تبسطه لي او تشرحه لي

او تعطيني كود اخر

انا الجدول عندي يحتوي على محصول يومي والذي اريده هو ايجاد المحصول للمبيعات خلال شهر

حيث ان لدي مربعي نص واحد لرقم الموظف والأخر للشهر

تقبل تحياتي

وارجو ان لا اكون قد اثقلت عليك عزيزي

أخى الفاضل

أولا أنا أسفة على تقصيرى معك

بفرض أن هذه هى البيانات التى سوف نبحث عنها

اقتباس

name ------------Tv------------Fd -------------Rs ------------Date

              Ahmad --------- 3 ---------- 6 ----------4 ---------- 12/01/2006

              Emad  --------  5 --------- 6 --------- 9 --------- 12/01/2006

        Khalid --------    3 --------- 0 --------- 4 --------- 15/01/2006

        Khalid  --------  5 --------- 7 --------- 3 --------- 17/01/2006

        Emad  --------    6 --------- 4 --------- 4 --------- 19/01/2006

        Ahmad --------    1 --------- 9 --------- 0 --------- 20/01/2006

        Khalid  --------  7 --------- 2 --------- 9 --------- 24/01/2006

        Ahmad  -------    5 --------- 7 --------- 5 --------- 26/01/2006

        Emad  --------    7 --------- 6 --------- 9 --------- 30/01/2006

اقتباس

كيف استعلم عن المبيعات خلال شهر

هذا الكود معناه أنك تستعلم عن كل المبيعات لكل شخص لشهر يناير

select name,Sum(Tv) as 'مبيعات التليفزيون' ,Sum(Fd) as 'مبيعات الفيديو',Sum(Rs) as 'مبيعات الرسيفر'
from trialtable 
where  DATEPART(month, date) = 1
group by name

ويمكنك أن تستعلم عن شهر فبراير أو مارس ---------- ألخ عنطريق تغيير الرقم فى هذا الكود

where  DATEPART(month, date) = 2

هذا الكود معناه أنك تستعلم عن كل المبيعات لكل شخص للأسبوع الأول لشهر يناير

select name,Sum(Tv) as 'مبيعات التليفزيون' ,Sum(Fd) as 'مبيعات الفيديو',Sum(Rs) as 'مبيعات الرسيفر'
from trialtable 
where date between '01-01-2006' and '01-08-2006'
group by name

هذا بالنسبة للإستعلام

أحاول عمل مثال لكل فأمهلنى الوقت

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

فتح الله عليك يا enjyshahin

دا الاستعلام اللى يعطى المجاميع

وإذا أراد أخونا (أو أختنا) vb.n أن يستعمله فالأفضل أن يضعه فى View إذا كان SQL Server أو استعلام إن كان أكسس

وكنت فى قسم التقارير عرضت عليه حل آخر من الكريستال نفسه

وما أستغرب له هو كلامك:

اقتباس

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

وقد عرضت الحل للسؤال، فهل السؤال مازال قائم؟

والله من وراء القصد وهو يهدى السبيل

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

لكن اتمنى ان اكون لم اثقل عليك في الموضوع

واطمع في طيبتك اكثر

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

ولكني لم افلح في ذلك حتى الان لا ادري لماذا يمكن تكون القصه كلها قله خبره مني

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

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

والكود الخاص بالعرض هو كلتالي

Try
            Dim sql As String = " select * from em where datee = #" & CDate(TextBox2.Text) & "# and ophes = " & Me.TextBox1.Text.Trim & ""
            Dim adap As New OleDbDataAdapter(sql, con)
            mydset.Clear()

            If TextBox1.Text = "" Or TextBox2.Text = "" Then
                MessageBox.Show("فضلا اضف القيم في المربعات ثم اعرض التقرير")
            Else

                adap.Fill(mydset, "em")
                Dim rp As New CrystalReport2()
                rp.SetDataSource(mydset)
                Me.CrystalReportViewer1.ReportSource = rp
                mycon.Close()
                g1.Hide()
                b3.Show()

            End If
        Catch ex As Exception
            MessageBox.Show("اضف التاريخ ورقم المكتب لتتم العملية")
        End Try

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

واريد استخدام التكست بوكس الخاص بالتاريخ لتتم العملية

ارجو ان اكون لم اثقل عليك

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

Dim sql As String =

ام استخدمه لوحده

لانني حاولت استخدامه لوحده ويتم وضع اخطاء تحت الاستعلام المطلوب

تحياتي لك ووللجميع

''convert format DateTimePic to month

Dim sql As String = " select * from em where datee = #" & month(DateTimePic.value) & "# and ophes = " & Me.TextBox1.Text.Trim & ""

اسف اخي كريم على التأخير

واشكرك من كل قلبي واشكر كل من شاركني

بسأل اخي عن هذه الجمله

datee = #" & month(DateTimePic.value) &

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

اعرف ان بعض اسئلتي غبيه لكن ايش نعمل هههههههههه

تقبل تحياتي واشكركم على سعة صدوركم لي

اخوكم

اخوي كريم جربت كلامك لكن ما ادري هل يجمع لي المحصول الشهري ام يعرض لي البيانات خلال شهر

وفيه مشكله ا خرى اني جربت الكلام اللي قلت عليه لكن للأسف طلع في الكرستال ربورت فقط قائمه page header

والبيانات المطلوبه من الجدول لم تظهر

انا عملت الكود هذا واتمنى الجميع يساعدني

  Try

            Dim sql As String = " select * from em where datee = " & Month(DateTimePicker1.Value) & " and ophes = " & TextBox1.Text & ""
            Dim adap As New OleDbDataAdapter(sql, con)
            mydset.Clear()

            
            adap.Fill(mydset, "em")
            Dim rp As New CrystalReport2()
            rp.SetDataSource(mydset)
            Me.CrystalReportViewer1.ReportSource = rp
            mycon.Close()
            g1.Hide()
            b3.Show()

          
        Catch ex As Exception
            MsgBox(ex.Message)
        End Try

ساعد لكي مثل

الملف مرقق غير به حسب مسمياتك

اي خدمه

RepMonth.zip

المثال مرفق غير حسب مسمياتك

اي خدمه

المثال مرفق غير حسب مسمياتك

اي خدمه

RepMonth.zip

RepMonth.zip

الف الف الف الف الف الف الف الف الف الف الف الف الف الف الف الف الف الف الف الف الف ;)

الف الف الف الف الف الف الف الف الف الف الف الف الف الف الف الف الف الف الف الف الف ;)

الف الف الف الف الف الف الف الف الف الف الف الف الف الف ;)

الف الف الف الف الف الف الف ;)

الف الف الف ;)

شــــــــــــــــ ;) ـــــــــــــــــــــكـــــــــــــــــــــــــــ ;) ــــــــــــــر اخــــــــــــــي كـــــــــــــــ ;) ــــــــــــريـــــــــــــــــــــــــ ;) ــــــــــــــــــــــــــــم

والله يعطيك الف عافيه على المجهود وما ادري كيف اجازيك على مساعدتك لي والله العظيم ان فضلك على راسي يا غاالي

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

الف شكر لكم وربي يعطيكم الف عااااااااافيه

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

تحياتي لك وامنياتي لك بالصحه والعافيه

اخوك

عبدالله

الحمد لله أن هداك إلى حل مشكلتك

أنا أسفة لأنى لم أعمل بالaccess قبل ذلك وإلا كنت ساعدتك بما رزقنى الله من علم

وعلى فكرة فإن كريم أعلم منى الaccess وجزاه الله كل الخير

أختك إنجى

ولو اختي انجي انتي ما قصرتي معااااا ي والله

ومعروفك على راسي

تحياتي لك ولاخي كريم

الاخ كريم

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

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

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

وللمعلوميه انا لما علمت التقرير اخذت المجاميع من الحقول التي في details وعلمت لها كلك يمين واخذت القيمه insert summray حتى اتلافى تكرار مدخلات الموظف خلال الشهر ويأتيني بالمجموع فقط وكذلك المكتب

اتمنى ان تفيدوني في هذه النقطه ولكم تحياتي الفائقه

وسؤال على الطاير هههههههههههه هل بالامكان ان اعمل تقرير سنوي بتغيير الكود السابق

ولك تحياتي وعااااااااااااف اني طولت عليكم باسئلتي واسف على ازعاجي المتواصل ولكن انتم كرام وانا استاهل هههههه ;)

أخى الكريم

ممكن أن يكون والله أعلم

أن فى جملة الselect تكتب فى أخرها order by emp_name

فيكون الكود

select ................ 
from ...................
where .................. 
order by emp_name

جربه والله أعلم

وممكن group by أن كان الكود عبارة عن

select sum(......)

select ................ 
from ...................
where .................. 
group by emp_name

والله أعلم

وفقك الله

انت مبرمج عليك تشغيل الهيلب الشخصي

سؤال ليس واضح ولكن مشكله السنه غير كلمة month to year

select ................

from ...................

where year(fDate)=???

اشكرك اختي انجي على المساعده وراح احاول اعمل بكلامك

واخي كريم برضو اشكرك على المساعده وجزاك الله خيرا

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

وراح اوضح سؤالي اكثر للاخ كريم

انا تقريري يحتوي على مكاتب ومحصول المكاتب من مدخلات الموظفين

يعني المكتب رقم 1 له مدخلات اعمال الموظفين اي له مثلا بيع رسيفرات و بيع اي شي ثاني و برضو بيع اي شي ثالثث

والمكتب 2 كذلك ........... الخ

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

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

ولكم تحياتي

ارسال المشروع انظر به اه المشكلة