Je suis débutant en VB6, j'ai écrit ma première appli, maintenant je voudrais imprimer avec Crystal report, y a t-il une âme charitable qui pourrait me donner des exemples de codes VB6
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Zoury
Salut Jean-Michel! :O)
Je suis débutant en VB6, j'ai écrit ma première appli, maintenant je
voudrais imprimer avec Crystal report, y a t-il une âme charitable qui pourrait me donner des exemples de codes VB6.
Voici un exemple pour imprimer à partir du viewer.. '*** Private Sub crvReport_PrintButtonClicked(UseDefault As Boolean) UseDefault = False Call m_report.SelectPrinter(Printer.DriverName, Printer.DeviceName, Printer.Port) Call m_report.PrinterSetup(Me.hWnd) Call m_report.PrintOut(False) End Sub '***
Merci de poster les réponses au groupe afin d'en faire profiter à tous
Salut Jean-Michel! :O)
Je suis débutant en VB6, j'ai écrit ma première appli, maintenant je
voudrais imprimer avec Crystal report, y a t-il une âme charitable qui
pourrait me donner des exemples de codes VB6.
Voici un exemple pour imprimer à partir du viewer..
'***
Private Sub crvReport_PrintButtonClicked(UseDefault As Boolean)
UseDefault = False
Call m_report.SelectPrinter(Printer.DriverName, Printer.DeviceName,
Printer.Port)
Call m_report.PrinterSetup(Me.hWnd)
Call m_report.PrintOut(False)
End Sub
'***
Je suis débutant en VB6, j'ai écrit ma première appli, maintenant je
voudrais imprimer avec Crystal report, y a t-il une âme charitable qui pourrait me donner des exemples de codes VB6.
Voici un exemple pour imprimer à partir du viewer.. '*** Private Sub crvReport_PrintButtonClicked(UseDefault As Boolean) UseDefault = False Call m_report.SelectPrinter(Printer.DriverName, Printer.DeviceName, Printer.Port) Call m_report.PrinterSetup(Me.hWnd) Call m_report.PrintOut(False) End Sub '***
