Olá... Pessoal,
Como Faço? Alguém tem algumas dicas?
Vejamos:
Crei um botão que o mesmo ao ser clikado
chama o relatório (do Crystal) com os dados
dos clientes cadastrado.Ok!
"Mas no caso se eu quiser imprimir somente
um só cliente... como faço???
Alguém poderia me auxíliar???
'-------------------------------------------------------------
Private Sub btnprint_Click()
CrystalReport1.ReportFileName = (App.Path & "elacli.rpt")
CrystalReport1.DataFiles(0) = (App.Path & "CadCli.mdb")
CrystalReport1.SelectionFormula = "{TblCli.Cliente}='" & X & "'"
CrystalReport1.CopiesToPrinter = 1
CrystalReport1.WindowState = 2
CrystalReport1.WindowControlBox = True
CrystalReport1.Destination = 0
CrystalReport1.Action = 1
End Sub
'-------------------------------------------------------------