NOVAMENTE COM O CRYSTAL REPORT
Estou tentando mandar uma impressão direto para impressora so que estou me deparando com um probleminha. é uma tela que mostra se eu realmente quero imprimir na impressora padão.
Teria como mandar direto impedindo que essa tela aparecesse.
Estou usuando esse codigo:
Set Crystal = New CRAXDRT.Application
SQL = [Ô]Select * From boleto[Ô]
RsAccess.Open SQL, ConnAccess, 3, 3
Set Repor = Crystal.OpenReport(App.Path & [Ô]oleto.rpt[Ô])
Repor.DataBase.SetDataSource RsAccess
Repor.DiscardSavedData
Repor.PrintOut
Muito obrigado a todos
Teria como mandar direto impedindo que essa tela aparecesse.
Estou usuando esse codigo:
Set Crystal = New CRAXDRT.Application
SQL = [Ô]Select * From boleto[Ô]
RsAccess.Open SQL, ConnAccess, 3, 3
Set Repor = Crystal.OpenReport(App.Path & [Ô]oleto.rpt[Ô])
Repor.DataBase.SetDataSource RsAccess
Repor.DiscardSavedData
Repor.PrintOut
Muito obrigado a todos
Tenta assim na última linha:
Report.PrintOut False
Tópico encerrado , respostas não são mais permitidas