Method 'PrintReport' failed

[Lorski]

I am using VB6, Access 7 and CR8. My program used to work...until yesterday.

The end user tried to run this program...and it gave them an "automation error". When I walk it through step by step...I get a MS Visual Basic window with:

"Run-time error '-2147417848 (80010108)' -- Method 'PrintReport' of object 'CrystalCtrl' failed"

When I debug, it points to the "CrystalReport1.PrintReport" statement in my coding. Here's the code...

Private Sub cmdPrint_Click()

Label3.Caption = "Printing Reports..."
FileLoc = "S:\Users\Mis\Vtd8\IPLabels\"

SetAttr (FileLoc + "ManualIP.rpt&quot, vbNormal
CrystalReport1.DataFiles(0) = (FileLoc + "Lbls.mdb&quot
CrystalReport1.PrintReport
Label3.Caption = "Printed Labels."

End Sub

The report and files are located in the same folder. Again, this was working without errors for a few weeks... then this started. Any clues?
Thanks in advance.

 

[Guest_imported]

I got the same problem too! And it took me 2 days in working with that error but it ended me up in reinstalling the crystal reports. I hope this would help!

 

[tc3596]

try closing CrystalReport1

..CrystalReport1.close