Frage zu Crystal Reports

  • Hallo zusammen,
    Wie Ihr anhand meiner folgenden Frage leicht erkennen werdet, bin ich absoluter noob im Zusammenhang mit CR..
    Also:
    Ich habe in Access 2k ein Formular (Auswahl Daten). Nach der Auswahl kann der Benutzer mit einem button den Druck des CR-Berichts veranlassen.
    Mein Problem ist nun, dass ich aber den Viewer starten möchte..


    Folgender Code wurde bisher eingesetzt:


    Private Sub Befehl2_Click()
    On Error GoTo Err_Befehl2_Click
    Dim dbs As Database
    Dim qdf As QueryDef
    'Variable für Crystal Report Anwendung
    Dim CRXApplication As Object
    'Variable für Rapport-Objekt
    Dim CRXReport As Object




    'Verbindung zu aktueller Datenbank herstellen
    Set dbs = CurrentDb


    'Ausgewählte Batchnr in Tabelle schreiben
    dbs.Execute "UPDATE [dbo_T_Batch_Nr_Rapport] " _
    & "SET [Batch_Nr_Rapport] = " & [Batchnr]
    dbs.Close

    'Objekt von Crystal Report erstellen
    Set CRXApplication = CreateObject("CrystalRuntime.Application")
    'Objekt von Batchrapport erstellen
    Set CRXReport = CRXApplication.OpenReport("C:\CIMPLICITY\HMI\Projects\SaCU\Batchrapport\BatchRapport.rpt")


    'Befehl Rapport drucken
    CRXReport.PrintOut True

    Exit Sub

    Err_Befehl2_Click:
    MsgBox "Batchrapport kann nicht gedruckt werden!"


    End Sub


    Kann mir jemand sagen, wie und wo ich den Code ändern muss :gruebel
    Ich danke euch für eure Hilfe!


    aWAKEning