function ShowCreprt()
{
string str_sql=null;
DataSet DsMain = new DataSet();
CrystalDecisions.CrystalReports.Engine.ReportDocument rp;
string reportPath = Server.MapPath("LogReport.rpt"); //Set path of Crystal Report
rp = new CrystalDecisions.CrystalReports.Engine.ReportDocument(); // Object of Report Document
sql = "Select l_name as username,'' as sno, userdetail.user_ip as uip from userdetail Where userdetail.user_id=" + int_loginID + " order by servertime";
//in DsMain i fill records as per above query
rp.FileName = reportPath;
rp.SetDataSource(dsmain.Tables[0]);
crviewer.ReportSource = rp;
//I have crviewer control on my page
}
This blog provide knowledge of all type of query. I want to share my experience with all.
Showing posts with label Crystal Report. Show all posts
Showing posts with label Crystal Report. Show all posts
Thursday, 30 April 2009
Crystal Report Printing
This example of printing crystal report in Desktop application
Dim DsPrint As New DataSet
//In DsPrint I have my data for printing in crystal reply. Assume that Record only One.
If (DsPrint.Tables(0).Rows.Count - 1) >= 0 Then
Dim ObjR As New CrystalDecisions.CrystalReports.Engine.ReportDocument
ObjR.FileName = "F:\Myproject\CrystalReceipt.rpt" // this is physical path of crystal report.
ObjR.ParameterFields.Item("Trans_ID").CurrentValues.AddValue(Int_TransID)
ObjR.ParameterFields.Item("Str_M").CurrentValues.AddValue(DsPrint.Tables(0).Rows(0).Item(5).ToString)
ObjR.ParameterFields.Item("Str_S").CurrentValues.AddValue(DsPrint.Tables(0).Rows(0).Item(0).ToString)
ObjR.ParameterFields.Item("Str_C").CurrentValues.AddValue(DsPrint.Tables(0).Rows(0).Item(2).ToString)
ObjR.ParameterFields.Item("Str_Con").CurrentValues.AddValue(DsPrint.Tables(0).Rows(0).Item(3).ToString)
ObjR.ParameterFields.Item("Str_Del").CurrentValues.AddValue(DsPrint.Tables(0).Rows(0).Item(1).ToString)
ObjR.ParameterFields.Item("Str_Price").CurrentValues.AddValue(DsPrint.Tables(0).Rows(0).Item(4).ToString)
ObjR.ParameterFields.Item("Str_Status").CurrentValues.AddValue("Deducted")
ObjR.PrintOptions.PrinterName = str_ReceiptPrinter
ObjR.PrintOptions.PaperOrientation = CrystalDecisions.Shared.PaperOrientation.Landscape // You can change as per your need.
ObjR.PrintToPrinter(1, False, 1, 1)
End If
Dim DsPrint As New DataSet
//In DsPrint I have my data for printing in crystal reply. Assume that Record only One.
If (DsPrint.Tables(0).Rows.Count - 1) >= 0 Then
Dim ObjR As New CrystalDecisions.CrystalReports.Engine.ReportDocument
ObjR.FileName = "F:\Myproject\CrystalReceipt.rpt" // this is physical path of crystal report.
ObjR.ParameterFields.Item("Trans_ID").CurrentValues.AddValue(Int_TransID)
ObjR.ParameterFields.Item("Str_M").CurrentValues.AddValue(DsPrint.Tables(0).Rows(0).Item(5).ToString)
ObjR.ParameterFields.Item("Str_S").CurrentValues.AddValue(DsPrint.Tables(0).Rows(0).Item(0).ToString)
ObjR.ParameterFields.Item("Str_C").CurrentValues.AddValue(DsPrint.Tables(0).Rows(0).Item(2).ToString)
ObjR.ParameterFields.Item("Str_Con").CurrentValues.AddValue(DsPrint.Tables(0).Rows(0).Item(3).ToString)
ObjR.ParameterFields.Item("Str_Del").CurrentValues.AddValue(DsPrint.Tables(0).Rows(0).Item(1).ToString)
ObjR.ParameterFields.Item("Str_Price").CurrentValues.AddValue(DsPrint.Tables(0).Rows(0).Item(4).ToString)
ObjR.ParameterFields.Item("Str_Status").CurrentValues.AddValue("Deducted")
ObjR.PrintOptions.PrinterName = str_ReceiptPrinter
ObjR.PrintOptions.PaperOrientation = CrystalDecisions.Shared.PaperOrientation.Landscape // You can change as per your need.
ObjR.PrintToPrinter(1, False, 1, 1)
End If
Tuesday, 21 April 2009
Load Report Failed.
Below code is working fine
CrystalDecisions.CrystalReports.Engine.ReportDocument rp;
string reportPath = Server.MapPath("LogReport.rpt");
rp = new CrystalDecisions.CrystalReports.Engine.ReportDocument();
sql = "Select 'User Name :'+lmaster.l_name as username,'' as sno, userdetail.user_ip as uip from userdetail order by servertime";
dsmain = mydata.GetDataSet(sql, 1);// this method my own method will be return query data in dataset.
rp.FileName = reportPath;
rp.SetDataSource(dsmain.Tables[0]);
crviewer.ReportSource = rp;
CrystalDecisions.CrystalReports.Engine.ReportDocument rp;
string reportPath = Server.MapPath("LogReport.rpt");
rp = new CrystalDecisions.CrystalReports.Engine.ReportDocument();
sql = "Select 'User Name :'+lmaster.l_name as username,'' as sno, userdetail.user_ip as uip from userdetail order by servertime";
dsmain = mydata.GetDataSet(sql, 1);// this method my own method will be return query data in dataset.
rp.FileName = reportPath;
rp.SetDataSource(dsmain.Tables[0]);
crviewer.ReportSource = rp;
Thursday, 16 April 2009
Change Report Viewer Toolbar Images.
Find out below path in your system.
Inetpub\wwwroot\aspnet_client\system_web\2_0_50727\
If in your server crystal report support installed then you found below path
Under below path you get then all images of report viewer control.
Inetpub\wwwroot\aspnet_client\system_web\2_0_50727\CrystalReportWebFormViewer3\images\toolbar
You can replace your images with default images.
Note. Images name are same as default images.
Please Let me know if any query.
Inetpub\wwwroot\aspnet_client\system_web\2_0_50727\
If in your server crystal report support installed then you found below path
Under below path you get then all images of report viewer control.
Inetpub\wwwroot\aspnet_client\system_web\2_0_50727\CrystalReportWebFormViewer3\images\toolbar
You can replace your images with default images.
Note. Images name are same as default images.
Please Let me know if any query.
Subscribe to:
Posts (Atom)