Results 1 to 1 of 1

Thread: crystal report possible error, why?

Hybrid View

  1. #1

    Thread Starter
    PowerPoster
    Join Date
    Mar 2005
    Posts
    2,580

    crystal report possible error, why?

    Code:
    
    Private Sub Image1_Click(Index As Integer)
        Dim miecopie As Integer
        Report1.DataFiles(0) = mydatabase
        Select Case Index
        Case 0
            Report1.Destination = 0
            Report1.Action = 1
        Case 1
            'MIECOPIE = tdoc_numcopie
            'If MIECOPIE = 0 Then MIECOPIE = 1
            'REPORT1.CopiesToPrinter = MIECOPIE
            Report1.Destination = 1 ''''<<<<<<<<<<<<<<<<<<<<<<<<here error
            Report1.Action = 1
    
        Case 4, 5    ' e-mail
            InviaMailocreaPDF Index, Report1.ReportFileName
    
        Case 3
            Unload Me
        End Select
    End Sub
    for test on Cryustal Report i use the default version in VB 6.0 CD. is a 4.6 version
    Attached Images Attached Images  

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •  



Click Here to Expand Forum to Full Width