[VB6] crystal report

[cesco]

Ciao a tutti
sto facendo un import dei dati, e quando da un file di testo finisco il ciclo,
e ho aggiornato la tabella vorrei mandare in stampa con Crystal report, scrivo questo:

        CR.RetrieveDataFiles
        CR.Destination = crptToPrinter
        CR.CopiesToPrinter = 2
        CR.Action = 1

il problema è che sull'ultima riga CR.action= 1 mi da i seguenti errori
vedere allegato.
Sapete dirmi come mai....
grazie anticipatamente.