CRYSTAL REPORT - DUVIDAS
Boa tarde pessoal,
Estou trabalhando com o VB6, com MSSQL 7.0 e Crystal Report XI.
Tenho seguintes Referências e Componentes ativos no VB6 para o Crystal Report:
Referências
- Crystal ActiveX Report Viewer Export Library 11.5
- Crystal ActiveX Report Viewer Library 11.5
- Crystal ActiveX Report Viewer Web Report Source Library 11.5
- Crystal Report ActiveX Designer Run Time Library 11.5
- Crystal Report ActiveX Designer Design and Runtime Library 11.5
Componetes
Na Guia - Controls
- Crystal ActiveX Report Viewer Library 11.5
Na Guia - Designers
- Crystal Report 11.5
Os relatórios que eu criei no VB6 estão na extensão DSR.
Agora as dúvidas:
No canto superior esquerdo dos relatórios tem a opção [Ô]Exportar Relatório[Ô].
Ao seleciona-lo aparece uma tela para eu selecionar o formato e o local de destino
Via código como eu faço para:
1) Deixar apenas o formato PDF;
2) Pré-definir o nome do meu arquivo PDF;
3) Pré-definir o local onde irá ser salvo meu arquivo PDF;
4) como fazer para não aparecer a mensagem abaixo :
[Ô]Não cliente de e-mail padrão ou o cliente de e-mail atual não pode atender à solicitação de mensagem. Execute o Microsoft Office Outlook e defina-o como o cliente de email padrão.[Ô]
Grato
Estou trabalhando com o VB6, com MSSQL 7.0 e Crystal Report XI.
Tenho seguintes Referências e Componentes ativos no VB6 para o Crystal Report:
Referências
- Crystal ActiveX Report Viewer Export Library 11.5
- Crystal ActiveX Report Viewer Library 11.5
- Crystal ActiveX Report Viewer Web Report Source Library 11.5
- Crystal Report ActiveX Designer Run Time Library 11.5
- Crystal Report ActiveX Designer Design and Runtime Library 11.5
Componetes
Na Guia - Controls
- Crystal ActiveX Report Viewer Library 11.5
Na Guia - Designers
- Crystal Report 11.5
Os relatórios que eu criei no VB6 estão na extensão DSR.
Agora as dúvidas:
No canto superior esquerdo dos relatórios tem a opção [Ô]Exportar Relatório[Ô].
Ao seleciona-lo aparece uma tela para eu selecionar o formato e o local de destino
Via código como eu faço para:
1) Deixar apenas o formato PDF;
2) Pré-definir o nome do meu arquivo PDF;
3) Pré-definir o local onde irá ser salvo meu arquivo PDF;
4) como fazer para não aparecer a mensagem abaixo :
[Ô]Não cliente de e-mail padrão ou o cliente de e-mail atual não pode atender à solicitação de mensagem. Execute o Microsoft Office Outlook e defina-o como o cliente de email padrão.[Ô]
Grato
Alguem?
Pessoal consegui fazer. Acho que pode ser util para alguém.
Dim Report As New CrystalReport1
Dim Report1 As CRAXDRT.Report
Set Report1 = Report
With Report1
.ExportOptions.DestinationType = crEDTDiskFile
.ExportOptions.FormatType = crEFTPortableDocFormat
.ExportOptions.DiskFileName = CaminhoArquivo & NomeArquivo
.Export False
End With
Se tiverem algum comentário a fazer em relação ao código postem ai
Dim Report As New CrystalReport1
Dim Report1 As CRAXDRT.Report
Set Report1 = Report
With Report1
.ExportOptions.DestinationType = crEDTDiskFile
.ExportOptions.FormatType = crEFTPortableDocFormat
.ExportOptions.DiskFileName = CaminhoArquivo & NomeArquivo
.Export False
End With
Se tiverem algum comentário a fazer em relação ao código postem ai
Tópico encerrado , respostas não são mais permitidas