Crystal Report - PARA EXPERTOS EN RDC

 
Vista:

PARA EXPERTOS EN RDC

Publicado por hendrixo (15 intervenciones) el 27/11/2002 13:45:48
Gracias por interesarte por mi consulta.

El siguiente código me da un error que es el siguiente :

'Aun no se ha abierto el servidor'

Cn es la conexión directa al servidor y es global.

Dim Report As New CRpt_Clientes

Private Sub Form_Load()

Screen.MousePointer = vbHourglass

Dim rs_1 As ADODB.Recordset

Set rs_1 = New ADODB.Recordset

rs_1.Open "SELECT * FROM CLIENTE", Cn, 1, 2

Report.Database.SetDataSource rs_1, 3, 1

CRView.ReportSource = Report
CRView.ViewReport

Screen.MousePointer = vbDefault

End Sub
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder