<td> <CR:CrystalReportViewer ID="CrystalReportViewer1" runat="server" AutoDataBind="True" GroupTreeImagesFolderUrl="" Height="1202px" ReportSourceID="CrystalReportSource1" ToolbarImagesFolderUrl="" ToolPanelWidth="200px" Width="1104px" /> <CR:CrystalReportSource ID="CrystalReportSource1" runat="server"> <Report FileName="Gp.rpt"> </Report> </CR:CrystalReportSource> </td>
Dim dt As New DataTable startDate = txtStart.Text.Trim() endDate = txtEnd.Text.Trim() dt = BO.GenerateGrossProfit(startDate, endDate) Dim rptA As ReportDocument = New ReportDocument() '// Dim str As String = "" Dim ds As New DataSet str = "Select ID,BRANCHCODE from Report_HDR_History" ds = DL.ExecuteNonQueryforGP(str) rptA.Load(Server.MapPath("") & "/Gp.rpt") rptA.FileName = Server.MapPath("/Gp.rpt") rptA.SetDataSource(ds.Tables(0)) rptA.SetDatabaseLogon("SMUSER", "SMUser@123") CrystalReportViewer1.DisplayToolbar = True CrystalReportViewer1.ReportSource = rptA CrystalReportViewer1.DataBind() CrystalReportViewer1.RefreshReport()
var
This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)