CRYSTAL Y ADO
Zulu
12 de Febrero del 2004
Buenas y gracias por adelanrtado. Tengo un problema en una aplicacion de crystal desde VB. El código es el siguiente:
Dim conexion As New ADODB.Connection
Dim rs As New ADODB.Recordset
Dim cmdstrig As String
conexion.ConnectionString= "Provider=Microsoft.Jet.OLEDB.4.0;Persist Security Info=False;Data Source=C:NWIND.MDB"
conexion.Open
cmdstring = "select * from clientes"
rs.Open cmdstring, conexion
report.Database.SetDataSource rs, 3, 1 <---ERROR
report.ReadRecords
CRViewer1.ReportSource = report
CRViewer1.ViewReport
El error que da es: error '9': El subindice está fuera del intervalo. Parece que al único que me da es a mi, la bd. EL recordset es correcto. Tambien he probado con RDO.
Dim conexion As New ADODB.Connection
Dim rs As New ADODB.Recordset
Dim cmdstrig As String
conexion.ConnectionString= "Provider=Microsoft.Jet.OLEDB.4.0;Persist Security Info=False;Data Source=C:NWIND.MDB"
conexion.Open
cmdstring = "select * from clientes"
rs.Open cmdstring, conexion
report.Database.SetDataSource rs, 3, 1 <---ERROR
report.ReadRecords
CRViewer1.ReportSource = report
CRViewer1.ViewReport
El error que da es: error '9': El subindice está fuera del intervalo. Parece que al único que me da es a mi, la bd. EL recordset es correcto. Tambien he probado con RDO.
maria
12 de Febrero del 2004
Un favor, yo tengo el mismo error en setdatasource, lo solucionaste, porfavor si es asi, puedes decirme como? Gracias