Smart questions
Smart answers
Smart people
INTELLIGENT WORK FORUMS
FOR COMPUTER PROFESSIONALS

Member Login

Come Join Us!

Are you a
Computer / IT professional?
Join Tek-Tips now!
  • Talk With Other Members
  • Be Notified Of Responses
    To Your Posts
  • Keyword Search
  • One-Click Access To Your
    Favorite Forums
  • Automated Signatures
    On Your Posts
  • Best Of All, It's Free!

Join Tek-Tips
*Tek-Tips's functionality depends on members receiving e-mail. By joining you are opting in to receive e-mail.

LINK TO THIS FORUM!

Add Stickiness To Your Site By Linking To This Professionally Managed Technical Forum.
Just copy and paste the
code below into your site.

Partner With Us!

"Best Of Breed" Forums Add Stickiness To Your Site
Partner Button
(Download This Button Today!)

Feedback

"...I train people in ACCESS. I make sure they know about these forums, give them some training on how to use the site, and have a shortcut to it on their PC's..."

Geography

Where in the world do Tek-Tips members come from?
RovirozM (TechnicalUser)
18 Apr 12 17:31
Hi Guys,

I'm running in Visual Studio 2010 (Visual Basic) two Crystal Reports when I press a button in my app.  For Example :

Button1_Click
Report1()  <-- This report has two pages
Report2()  <-- This report has one page

But something happen when I run it because when you click the command button the two crystal reports run, then the one that is showed on the screen first is the last one executed ( Report2() ) with one page, then after moving to the first one ( Report1() ) show me that are two pages available but when I press the Next page button on Crystal/Visual toolbar it doesn't take it to the second page (just to the Report2() again).

Why could this be happening?  it is a bug ?  I can never see the second page on the first report()....   (Of course if I change the order of both reports I mean the one with two pages at the end works perfectly)

This is an example of how a create this kind of reports on VS2010:

Dim rcore As New Core.T2_appUsersHelper
        Dim PrinterSettings As New System.Drawing.Printing.PrinterSettings

        If InStr(1, Trim(FOBCodesToDisplayFIFOReport), Trim(lsvShipPlans.FocusedItem.SubItems(8).Text)) = 0 Then
            Exit Sub
        End If

        RV1.FileName = Core.T2_appModuleHelper.GetAppPath(gCore, gAppModule) & "\Reportes\" & "Report1.rpt"
        RV1.SetDatabaseLogon(gCore.User.UserName, rcore.getPasswordText(gCore.User))
        RV1.PrintOptions.PrinterName = SetPrinter(PrinterSettings.PrinterName)
        RV1.SetParameterValue(0, "6623957327")
        RV1.SetParameterValue(1, GUSERNAME)
        RV1.SetParameterValue(2, "APP")

        'RV1.PrintToPrinter(1, True, 1, 500)
        Dim ObjViewReport As New gui.frmCrReports(RV1, GFrmMain)
        ObjViewReport.Show()

Any idea?  or parameter to change?

Thanks a lot !

P.D. I put an easy MediaFire Word File with images that will describe it better.  http://www.mediafire.com/?b842ezxz5c5npx8

Reply To This Thread

Posting in the Tek-Tips forums is a member-only feature.

Click Here to join Tek-Tips and talk with other members!

Close Box

Join Tek-Tips® Today!

Join your peers on the Internet's largest technical computer professional community.
It's easy to join and it's free.

Here's Why Members Love Tek-Tips Forums:

Register now while it's still free!

Already a member? Close this window and log in.

Join Us             Close