Jump to content
Fórum Script Brasil
  • 0

Vb 6 + Cr 10


Sérgio Roberto
 Share

Question

tenho um aplicativo em VB 6 e um relatório em CR 10, quando executo este relatório dentro do VB, roda legal, mas quando compilo e crio o executável, ao acessar o relatório, aparece o seguinte erro:

run time error -2147206461 (80043ac3) file not found.

este erro acontece mesmo na maquina onde está instalado o CR 10.

Qualquer ajuda será de muita valia.

Obrigado

Sérgio Vicentim

Link to comment
Share on other sites

6 answers to this question

Recommended Posts

  • 0

O código que estou utilizando é o seguinte:

Private Sub Form_Load()

Dim Tipo As Long

Dim Relatorio As String

Dim tam As Long

Relatorio = Ativo

Me.Caption = Titulo

Dim CRXApplication As New CRAXDRT.Application

Dim CRXReport As New CRAXDRT.Report

Dim CRXDatabase As CRAXDRT.Database

Set CRXApplication = CreateObject("CrystalRuntime.Application.10")

Set CRXReport = CRXApplication.OpenReport(App.Path & "\CorAtivosGeral.rpt", 0)

CorAtivosGeral.ReportSource = CRXReport

CorAtivosGeral.ViewReport

CorAtivosGeral.DisplayBorder = True

CorAtivosGeral.DisplayTabs = False

CorAtivosGeral.EnableDrillDown = False

CorAtivosGeral.EnableNavigationControls = True

CorAtivosGeral.EnableCloseButton = True

CorAtivosGeral.DisplayGroupTree = False

CorAtivosGeral.DisplayBackgroundEdge = True

CorAtivosGeral.EnableAnimationCtrl = True

CorAtivosGeral.Top = 0

CorAtivosGeral.Left = 0

CorAtivosGeral.ReportSource = CRXReport

CorAtivosGeral.Zoom (95)

CorAtivosGeral.Refresh

Set rs = Nothing

Set CRXApplication = Nothing

Set CRXReport = Nothing

End Sub

Private Sub Form_Resize()

CorAtivosGeral.Height = Me.ScaleHeight

CorAtivosGeral.Width = Me.ScaleWidth

End Sub

Link to comment
Share on other sites

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Guest
Answer this question...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

 Share



  • Forum Statistics

    • Total Topics
      151k
    • Total Posts
      649k
×
×
  • Create New...