CRYSTAL REPORT 9 COMO IMPRIMIR

SOUZA 16/03/2011 18:41:26
#368191
Pessoal blz, e o seguinte estou migrando aos poucos minhas ferramentas e agora estou no crystal report 9 ja baixei fiz o 1 relatorio ja esta salvo como (CadCliente.rpt) antes no CR4 eu chamava da seguinte forma quando eu queria que imprimisse somente o cadastro que estava na tela do cliente

CrystalReport1.DataFiles(0) = App.Path & [Ô]\Cadastro.MDB[Ô]
CrystalReport1.SelectionFormula = [Ô]{clientes.CODIGO} = [ô][Ô] & Clientes.CODIGO & [Ô][ô][Ô]
CrystalReport1.ReportFileName = App.Path & [Ô]\CadCliente.rpt[Ô]
CrystalReport1.Action = 1

ai ele imprimia somente o registro que estava com ele na tela agora como fica isso no CR9 ja procurei aqui no forum ams nao encontrei nada que me orientase
CHARLESTON10 16/03/2011 18:56:01
#368192
Dim Report As New CrystalReport1
Private Sub Form_Load()

CrystalReport1.DiscardSavedData
CrystalReport1.Database.Verify

Screen.MousePointer = vbHourglass
CRViewer1.ReportSource = Report
CRViewer1.ViewReport
Screen.MousePointer = vbDefault
CRViewer1.EnableExportButton = True
CRViewer1.EnableRefreshButton = True
CRViewer1.EnableGroupTree = False

End Sub

Private Sub Form_Resize()
CRViewer1.Top = 0
CRViewer1.Left = 0
CRViewer1.Height = ScaleHeight
CRViewer1.Width = ScaleWidth
End Sub
SOUZA 16/03/2011 19:09:05
#368193
charleston10 uma duvida pois o crystam report 4 vem com o vb e com a inst do CR9 tem que adicionar alguma dll ao vb6 algo assim pois ele esta dando o seguinte erro no codigo que vc passou!
SOUZA 16/03/2011 19:14:20
#368194
os codigo que vc passou seria pra eu usar junto com oq postei ? pois nao vi onde vai a referencia ao arquivo que vai ser impresso ?
JAIR2002 16/03/2011 21:25:39
#368200
você usa o cristal para gerar os relatorio dentro ou fora do vb
SOUZA 16/03/2011 21:46:54
#368202
fora do vb faço o relatorio no cystal report e depois chamo o relatorio
SOUZA 16/03/2011 22:14:46
#368203
CrystalReport1.DataFiles(0) = App.Path & [Ô]\Cadastro.MDB[Ô]
CrystalReport1.SelectionFormula = [Ô]{clientes.CODIGO} = [ô][Ô] & Clientes.CODIGO & [Ô][ô][Ô]
CrystalReport1.ReportFileName = App.Path & [Ô]\CadCliente.rpt[Ô]
CrystalReport1.Action = 1 -= O ERRO ESTA NESTA LINHA !

que pode ser ?
SOUZA 17/03/2011 09:16:31
#368230
ninguem ?
Tópico encerrado , respostas não são mais permitidas