Bonjour,

J'ai une application sous VB6 avec des états conçus avec Crystal Report 9.2. Je voudrais pouvoir imprimer n'importe lequel de mes états ouvert par le bouton Imprimer du commondialog de windows, pas avec le bouton imprimer de crystal report. Voici le code que j'ai mis sur click du bouton imprimer
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
 
 
Private Sub menu_imprimer_Click()
    On Error Resume Next
    If ActiveForm Is Nothing Then Exit Sub
 
 
    With dlgCommonDialog
        .DialogTitle = "Imprimer"
        .CancelError = True
        .Flags = cdlPDReturnDC + cdlPDNoPageNums
        If ActiveForm.rtfText.SelLength = 0 Then
            .Flags = .Flags + cdlPDAllPages
        Else
            .Flags = .Flags + cdlPDSelection
        End If
        .ShowPrinter
        If Err <> MSComDlg.cdlCancel Then
            ActiveForm.rtfText.SelPrint .hdc
        End If
    End With
End Sub
La boite de dialogue d'impression s'ouvre mais quand je lance, l'état qui est ouvert n'est pas imprimé. Que faire pour arriver à imprimer mes états avec la boite d'impression du commonDialog ?

Merci d'avance.