bjr j'ai travaillé une application en vb6 saisie de données pour une école primaire. pour afficher les résultats sous format imprimable, j'utilise crystal report 9. tout semble marcher bien.
mais en voulant essayer mon programme sur un autre Pc un message me dit qu'un fichier n'est pas correctement installé.
"crystal report msg : failed to open document
invalid TLV record"
que dois je faire ?
voilà la feuille de mon application
---------------------------------------------------
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 -------------------------------------- Public m_Application As New CRAXDDRT.Application Public m_Report As New CRAXDDRT.Report --------------------------------------------------- Private Sub Form_Load() Call Form_Resize Dim ReportFile As String ReportFile = App.Path & "\EXPORT\monfichier.rpt" Set m_Report = m_Application.OpenReport(ReportFile)' ===> le probléme se situe là je crois CRViewer.ReportSource = m_Report CRViewer.Zoom 1 CRViewer.ViewReport Screen.MousePointer = vbDefault End Sub
----------------------------------------------
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8 Sub Form_Resize() CRViewer.Top = 0 CRViewer.Left = 0 CRViewer.Height = Me.ScaleHeight CRViewer.Width = Me.ScaleWidth End Sub
merci d'avance
Partager