[alma_fandi]

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

اخواني كيف ممكن  اعمل مثل الصورة

حاولت  اعملprameter fields
rep.SetParameterValue(0, DateTimePicker1.Value)
عرض لى التاريخ كامل

   

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


كذلك الشهر العربي  (كانو ثاني  شباط اذار نيسان ..... ) بالمربع  (2)
كذلك  العام  بالمربع (3)

مع الشكر

[alma_fandi]

uuuuuuuuuuuup

[alma_fandi]

نو كومنت ؟؟؟؟

[عبـدالله]

هذا الكود لعرض اسم الشهر العربي (كانو ثاني شباط اذار نيسان ..... ) ورقم السنة،
وبالنسبة للتقرير نعم كما فعلت بعمل Paramater واسناد البيانات اليها

PHP كود :

Dim y As String = DateTimePicker1.Value.ToString("yyyy", New Globalization.CultureInfo("ar-jo"))
Dim m As String = DateTimePicker1.Value.ToString("MMM", New Globalization.CultureInfo("ar-jo")) 


[alma_fandi]

(22-04-17, 04:10 PM)عبـدالله كتب : هذا الكود لعرض اسم  الشهر العربي  (كانو ثاني  شباط اذار نيسان ..... ) ورقم السنة،
وبالنسبة للتقرير نعم كما فعلت بعمل Paramater واسناد البيانات اليها

PHP كود :

Dim y As String = DateTimePicker1.Value.ToString("yyyy", New Globalization.CultureInfo("ar-jo"))
Dim m As String = DateTimePicker1.Value.ToString("MMM", New Globalization.CultureInfo("ar-jo")) 


   

جاري التجربة

[عبـدالله]

بالنسبة لتحديد البحث (حسب) يمكن تجربة هذا الكود على افتراض أن اسم الباراميتر في التقرير هو search
ويمكنك تحديد أكثر من اختيار للبحث مثل "العمر ومكان العقر"
وفي حالة عدم اختيار أي كمبوبكس يضع "(غير محدد)"

PHP كود :

Dim s As New List(Of String)
If Me.cboSex.SelectedIndex > 0 Then s.Add("الجنس")
If Me.cboAge.SelectedIndex > 0 Then s.Add("العمر")
If Me.cboType.SelectedIndex > 0 Then s.Add("نوع الحيوان")
If Me.cboPlace.SelectedIndex > 0 Then s.Add("مكان العقر")
If Me.cboState.SelectedIndex > 0 Then s.Add("حالة الحيون")
If s.Count > 0 Then
    rep.SetParameterValue("search", String.Join(" و", s))
Else
    rep.SetParameterValue("search", "(غير محدد)")
End If 


ويستحسن استخدام اسم الباراميتر name وليس index ليسهل فهم الكود.

[alma_fandi]

(22-04-17, 05:07 PM)عبـدالله كتب : بالنسبة لتحديد البحث (حسب) يمكن تجربة هذا الكود على افتراض أن اسم الباراميتر في التقرير هو search
ويمكنك تحديد أكثر من اختيار للبحث مثل "العمر ومكان العقر"
وفي حالة عدم اختيار أي كمبوبكس يضع "(غير محدد)"

PHP كود :

Dim s As New List(Of String)
If Me.cboSex.SelectedIndex > 0 Then s.Add("الجنس")
If Me.cboAge.SelectedIndex > 0 Then s.Add("العمر")
If Me.cboType.SelectedIndex > 0 Then s.Add("نوع الحيوان")
If Me.cboPlace.SelectedIndex > 0 Then s.Add("مكان العقر")
If Me.cboState.SelectedIndex > 0 Then s.Add("حالة الحيون")
If s.Count > 0 Then
    rep.SetParameterValue("search", String.Join(" و", s))
Else
    rep.SetParameterValue("search", "(غير محدد)")
End If 


ويستحسن استخدام اسم الباراميتر name وليس index ليسهل فهم الكود.