26/09/2003, 21:41
|
| | | Fecha de Ingreso: septiembre-2003
Mensajes: 3
Antigüedad: 21 años, 4 meses Puntos: 0 | |
 omitir menu impresoras con crystal reports
Dim BaseDatos As String
BaseDatos = App.Path & "\2003.mdb"
CrystalReport1.DataFiles(0) = BaseDatos2
CrystalReport1.ReportFileName = App.Path & "\pba3.rpt"
CrystalReport1.SelectionFormula = "{interesesmuertos.recibo} = '" & Text4.Text & "' "
CrystalReport1.ReportSource = crptReport
'(LLAMADO A IMPRESORAS) ESTO LLAMA AL MENU DE IMPRESORAS SI NO LO QUIERES SOLO ELMINA LA LINEA CrystalReport1.PrinterSelect
'FIN LLAMADO IMPRESORAS
CrystalReport1.PrintReport
Un saludo.
server142 |