Visual Basic, Crystal y Sql

[Nch]

Puedes usar un artificio aunque es un poco extenso, primero realizas la consulta, luego lo exportas a un archivo y finalmente lo cargas a un objeto crviewer.dll que debes incluirlo en tu formulario:

'Primero debes crear un diseñador con los
'campos que requieres (con una consulta
'incrustada que luego no sera usada)

Set Comando = New Command
Set rs = New ADODB.Recordset
Comando.ActiveConnection = TuConexion
Comando.CommandText = "SELECT ....."

'proceso de conexion
rs.CursorLocation = adUseClient
rs.Open Comando,,adOpenStatic, _
adLockOptimistic

'Exportamos los datos
Set reporte = New TuDiseniador
FileName = "c:\tmp.rpt"
Reporte.Database.SetDataSource rs
Reporte.ExportOptions.DestinationType =
crEDTDiskFile
Reporte.ExportOptions.DiskFileName =
FileName
Reporte.ExportOptions.FormatType =
crEFTCrystalReport
Reporte.Export False


'Visualizamos con el CRV
CRV.UserName = TuUsuario
CRV.ReportFileName = FileName
CRV.Connect = TuConexion
CRV.PrintReport
CRV.ReportFileName = ""