Estou com a seguinte dificuldade, quando exporto o CR para PDF ao abrir o PDF em um PC que não tenha a fote do código de barras da o erro que a fonte não foi localizada e no lugar do código de barras aparece apenas uns pontinhos, no PC onde montei o CR ao abrir o PDF aparece tudo OK pois tem a fonte.
Como consigo resolver esse problema?
Segue o código que estou usando para criar o pdf
Dim RelContasRece As CRAXDRT.Report
Dim m_Application As New CRAXDRT.Application
Set RelContasRece = m_Application.OpenReport(App.Path & "\crbloqueto.rpt", 1)
RelContasRece.Database.LogOnServer "pdsodbc.dll", "Banco de Dados", "", "Identificaço do Logon", PWDPdf
For I = 1 To RelContasRece.Database.Tables.Count
RelContasRece.Database.Tables(I).SetLogOnInfo "Banco de Dados", "", "Identificaço do Logon", PWDPdf
Question
FerNB
Se alguém puder me ajudar...
Estou com a seguinte dificuldade, quando exporto o CR para PDF ao abrir o PDF em um PC que não tenha a fote do código de barras da o erro que a fonte não foi localizada e no lugar do código de barras aparece apenas uns pontinhos, no PC onde montei o CR ao abrir o PDF aparece tudo OK pois tem a fonte.
Como consigo resolver esse problema?
Segue o código que estou usando para criar o pdf
Dim RelContasRece As CRAXDRT.Report
Dim m_Application As New CRAXDRT.Application
Set RelContasRece = m_Application.OpenReport(App.Path & "\crbloqueto.rpt", 1)
RelContasRece.Database.LogOnServer "pdsodbc.dll", "Banco de Dados", "", "Identificaço do Logon", PWDPdf
For I = 1 To RelContasRece.Database.Tables.Count
RelContasRece.Database.Tables(I).SetLogOnInfo "Banco de Dados", "", "Identificaço do Logon", PWDPdf
Next I
RelContasRece.DiscardSavedData
With RelContasRece
.ExportOptions.DiskFileName = App.Path & "\Boleto.pdf"
.EnableParameterPrompting = False
.ExportOptions.FormatType = crEFTPortableDocFormat
.ExportOptions.PDFExportAllPages = True
.ExportOptions.DestinationType = crEDTDiskFile
.ExportOptions.RTFExportAllPages = True
.Export False
End With
Obrigado!!!
Edited by FerNBLink to comment
Share on other sites
1 answer to this question
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.