从范围到发票打印发票 [英] Printing Invoice from Range to of Invoice

问题描述

亲爱的所有人，

当天的问候.

我已开具1至10的发票.

现在我要给打印范围从1到5.

我一次可以打印一页或一张纸，即1或2等.

请告诉我如何给多页范围.如何将打印范围从(账单号)更改为(账单号)

我通过rptcrpara.rpt传递了提到的参数来报告和显示报告.

我在textbox1.text中定义了数字，即2，调用该发票进行打印的号码显示了2号发票.现在我要发布号码范围，即1到5，现在出现问题了，如何在五个页面上调用所有五个.

Dear All,

Greeting of the day.

I have made invoices from 1 to 10.

Now I want give range for printing from 1 to 5.

I have been getting print of One page/ bill at a time i.e. 1 or 2 etc.

Kindly tell me how to give range for multiple page. how to give range to printing from (bill no) to (bill no)

I''m passing the under mention parameters to report and display report with the help of rptcrpara.rpt.

I define the number in the textbox1.text i.e. 2 and which call the invoice to print it show the invoice no.2 . Now I want to issue number range i.e. 1 to 5 now problem occurs how to call all five on five pages that.

Imports CrystalDecisions.CrystalReports.Engine
Imports CrystalDecisions.Shared
Public Class RptParameter
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim cryRpt As New RptCrpara
        cryRpt.Load("rptcrpara.rpt")

        Dim crParameterFieldDefinitions As ParameterFieldDefinitions
        Dim crParameterFieldDefinition As ParameterFieldDefinition
        Dim crParameterValues As New ParameterValues
        Dim rvalue As New CrystalDecisions.Shared.ParameterDiscreteValue
        Dim rupee As String = "Rupees"
        rvalue.Value = rupee

        Dim crtextval1 As New ParameterDiscreteValue

        crtextval1.Value = Val(TextBox1.Text)
        crParameterFieldDefinitions = cryRpt.DataDefinition.ParameterFields()
        crParameterFieldDefinition = _
        crParameterFieldDefinitions.Item("docno")
        crParameterValues = crParameterFieldDefinition.CurrentValues

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

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

End Class

谢谢.

Jatinder Gupta.

Thanks.

Jatinder Gupta.

推荐答案

您正在使用水晶报表.重新设计报告并使用发票编号.作为小组重新设计的报告，并将所有细节保留在小组内部.这是解决问题的最简单方法

You Are using crystal report. redesign your report and use invoice no. as group redesign report and keep all the detail inside the group. it is the easiest way to solve your problem

这篇关于从范围到发票打印发票的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！