multiple data

[elixir_5000]

i hav a problem
i have to print a invoice using cr 8.0 i have access database and using vb 6.0
i have a table named data2
i use data2 to store all the fields that are going to be used in cr
i have a form that asks user for the invoive numbers and user enters them as from 607 to 618

where from and to are labels and 607 and 618 are written by user in two text boxes
now 618-607=11
so what i have done at the click of print button in the same form the invoices from 607 to 618 are brought to data2

now the problem is i dont know how to use the cr to print for more than 1 invoice
i know how to print a single invoice but plz tell me how to print more than 1

[Rahul_PC]

just provide Records To CR it Will Do the rest
But Remember to Set Proper value for section's proprty NEWPAGEAFTER / NEW PAge BEFORE

[elixir_5000]

just provide Records To CR it Will Do the rest
But Remember to Set Proper value for section's proprty NEWPAGEAFTER / NEW PAge BEFORE

can u plz what do u mean by it i dont know that

[elixir_5000]

Set new1 = New ADODB.Recordset
Dim str As String
str = "select * from data2 "
new1.Open str, conn
 
Dim oapp As CRAXDRT.Application
Dim rpt As CRAXDRT.Report
Dim rpt1 As CRAXDRT.Report
Set oapp = New CRAXDRT.Application
Set rpt = oapp.OpenReport(App.Path & "\tax invoice.rpt", 1)
 
rpt.Database.SetDataSource new1, 3, 1
cr1.ReportSource = rpt
 
cr1.ViewReport

i am using the above code it only displays the first record of the table data2
tell me if some sought of loop is required
plz help