CRYSTAL E IMPRESSORA PDF

USUARIO.EXCLUIDOS 16/10/2009 18:44:22
#325505
Estou usando Crystal XI e VB6 e preciso imprimir boletos em PDF.

A exportação direta do crystal em formato PDF estraga o código de barras do boleto e, para evitar isto, estou tentando imprimir o boleto através de uma impressora PDF.

Preciso imprimir diretamente, sem interação do usuário de preferência pois o relatório será anexado automáticamente a um e-mail
TECLA 16/10/2009 20:08:42
#325512
Veja se é isso que precisa:

Dim Crystal As New CRAXDRT.Application
Dim Report As New CRAXDRT.Report
vnomerela = vdrive + [Ô]elbala1.rpt[Ô]
vformrela = [Ô][Ô]
Set Report = Crystal.OpenReport(vnomerela)
Report.RecordSelectionFormula = vformrela
Report.PrintOutEx , 1, True


PS. Não testei, pois não tenho CRYSTAL no PC.
Tópico encerrado , respostas não são mais permitidas