Alfredo
27 de Febrero del 2003

Tengo un programa en VB con una base de datos.
Si alguien me puede ayudar : Necesito saber como imprimir un solo registro, ya que he hecho el intento pero siempre me lanza al reporte todos los registros de mi base de datos.
gracias.

Javi
27 de Febrero del 2003

Supongamos que tienes una tabla en la base de datos con facturas numeradas con un campo llamado id (numérico entero) y quieres imprimir una factura concreta cuyo número introduce el usuario en una caja de texto (text1). Tendrías que hacerlo así:

basedatos = App.Path & "BASEDEDATOS.mdb"
CrystalReport1.DataFiles(0) = basedatos
CrystalReport1.ReportFileName = App.Path & "factura.rpt"
criterio = "{facturas.id} = " & Val(text1.text)
CrystalReport1.SelectionFormula = criterio
CrystalReport1.Action = 1

Si tienes alguna duda expones tu caso concreto.

Un saludo de Javi