الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

عرض تقرير محصور بين تاريخين

بدأه ساره1985 في 28 مايو 2012 · 7 رد · 1,316 مشاهدة · في تصميم وبرمجة التقارير
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

السلام عليكم

عندي مشكلة في عرض تقرير محصور بين تاريخين وحقل التاريخ معرف في الداتا بيز varchar

ياريت تساعدوني ضروري ضروري

#2

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

#3

هل من مجيب :sad:

#4

عليكم السلام

يجب أن يكون حقل التاريخ Date وليس Varchar

والطريقة كالتالى

Date From parameter.

csharp-crystal-reports-datefrom.GIF

Date To Parameter

csharp-crystal-reports-dateto.GIF

Double click each field then it will automatically selected

csharp-crystal-reports-datetodate-formula.GIF

بعد كده اعملى فى الفورمه اتنين Textboxs

وده كود الفورمه

using System;
using System.Windows.Forms;
using CrystalDecisions.CrystalReports.Engine;
using CrystalDecisions.Shared;

namespace WindowsApplication1
{
	public partial class Form1 : Form
	{
    	public Form1()
    	{
        	InitializeComponent();
    	}

    	private void button1_Click(object sender, EventArgs e)
    	{
        	ReportDocument cryRpt = new ReportDocument();
        	cryRpt.Load("PUT CRYSTAL REPORT PATH HERE\CrystalReport1.rpt");

        	TableLogOnInfos crtableLogoninfos = new TableLogOnInfos();
        	TableLogOnInfo crtableLogoninfo = new TableLogOnInfo();
        	ConnectionInfo crConnectionInfo = new ConnectionInfo();
        	Tables CrTables;

        	ParameterFieldDefinitions crParameterFieldDefinitions ;
        	ParameterFieldDefinition crParameterFieldDefinition ;
        	ParameterValues crParameterValues = new ParameterValues();
        	ParameterDiscreteValue crParameterDiscreteValue = new ParameterDiscreteValue();

        	crParameterDiscreteValue.Value = textBox1.Text;
        	crParameterFieldDefinitions = cryRpt.DataDefinition.ParameterFields;
        	crParameterFieldDefinition = crParameterFieldDefinitions["fromDate"];
        	crParameterValues = crParameterFieldDefinition.CurrentValues;

        	crParameterValues.Clear();
        	crParameterValues.Add(crParameterDiscreteValue);
        	crParameterFieldDefinition.ApplyCurrentValues(crParameterValues);

        	crParameterDiscreteValue.Value = textBox2.Text;
        	crParameterFieldDefinitions = cryRpt.DataDefinition.ParameterFields;
        	crParameterFieldDefinition = crParameterFieldDefinitions["toDate"];
        	crParameterValues = crParameterFieldDefinition.CurrentValues;

        	crParameterValues.Add(crParameterDiscreteValue);
        	crParameterFieldDefinition.ApplyCurrentValues(crParameterValues);

        	crConnectionInfo.ServerName = "YOUR SERVERNAME";
        	crConnectionInfo.DatabaseName = "DATABASE NAME";
        	crConnectionInfo.UserID = "USERID";
        	crConnectionInfo.Password = "PASSWORD";

        	CrTables = cryRpt.Database.Tables;
        	foreach (CrystalDecisions.CrystalReports.Engine.Table CrTable in CrTables)
        	{
            	crtableLogoninfo = CrTable.LogOnInfo;
            	crtableLogoninfo.ConnectionInfo = crConnectionInfo;
            	CrTable.ApplyLogOnInfo(crtableLogoninfo);
        	}

        	crystalReportViewer1.ReportSource = cryRpt;
        	crystalReportViewer1.Refresh(); 
    	}
   }
}

تم تعديل هذه المشاركة بواسطة حمزه المصرى في 29 مايو 2012 في 12:36

C# - SQl - Matlab - ASP - PHP - HTML -XML -Crystal Report

#5

شكرا بارك الله فيك علي هذا الرد ولكن تم تغيير الحقل الي datetime في aql والحمد لله ولكن المشكله الان في كيفية بعت قيمة التاريخين من vb.net الي الكريستال ريبورت

#6

فى VB.NET هايبقى نفس الطريقه بس الكود هايختلف اختلاف بسيط جدا

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

Imports CrystalDecisions.CrystalReports.Engine
Imports CrystalDecisions.Shared
Public Class Form1
	Private Sub Button1_Click(ByVal sender As System.Object, _
	ByVal e As System.EventArgs) Handles Button1.Click

    	Dim cryRpt As New ReportDocument
    	cryRpt.Load("PUT CRYSTAL REPORT PATH HERE\CrystalReport1.rpt")

    	Dim crParameterFieldDefinitions As ParameterFieldDefinitions
    	Dim crParameterFieldDefinition As ParameterFieldDefinition
    	Dim crParameterValues As New ParameterValues
    	Dim crParameterDiscreteValue As New ParameterDiscreteValue

    	crParameterDiscreteValue.Value = TextBox1.Text
    	crParameterFieldDefinitions =  _
			cryRpt.DataDefinition.ParameterFields
    	crParameterFieldDefinition =  _
			crParameterFieldDefinitions.Item("Orderdate")
    	crParameterValues = crParameterFieldDefinition.CurrentValues

    	crParameterValues.Clear()
    	crParameterValues.Add(crParameterDiscreteValue)
    	crParameterFieldDefinition.ApplyCurrentValues(crParameterValues)

    	CrystalReportViewer1.ReportSource = cryRpt
    	CrystalReportViewer1.Refresh()
	End Sub
End Class

تم تعديل هذه المشاركة بواسطة حمزه المصرى في 29 مايو 2012 في 18:38

C# - SQl - Matlab - ASP - PHP - HTML -XML -Crystal Report

#7

انا استخدمت هذه الطريقة

RPRT.RecordSelectionFormula = "{reportAboutDate.baby_date} >='" & from_date.Text & "' and {reportAboutDate.baby_date} <='" & to_date.Text & "' "

ولكن يعطيني خطا

#8

ممكن ترفقى صوره أو نص الخطأ ؟

C# - SQl - Matlab - ASP - PHP - HTML -XML -Crystal Report

مواضيع مشابهة