Visual Basic - no me funciona el datareport

Hola, mi caso es que utilizo el siguiente código:
report es un datareport y re es un recordset ya declarado y abierto

Set repor.DataSource = re

Me sale el error de que no coinciden los tipos y me gustaria saber a que se debe ese error. Es que quiero que la fuente de datos sea el recordset y no quiero utilizar el dataenvironment ni nada de eso, dijeron en algun foro que esto asi funcionaba pero por lo visto no es asi, ¿tengo que poner antes algo para que no me de ese error o que tengo que poner?

Alguien sabe de algun manual de cómo usar un datareport sin el dataenvironment?

Muchas gracias por vuestra atencion.

Saludos :

Nuria Montoro

Nuria:

Me enfrenté al mismo problema y tengo varios ejemplos pero tengo que buscarlos, la manera en que salí rápido del paso y que a lo mejor te serviría, te lo anexo en el siguiente código.

Dim rsReporte As New ADODB.Recordset
Dim strSql As String
Dim sCheque As Double
Dim sEfectivo As Double
Dim sIva As Double
Dim SBruto As Double
Dim sGastos As Double

Dim creatabla As Recordset
Dim nombretable As String
nombretabla = "Gastos" & Format(Time, "hhmmss")
strSql = ""
strSql = "Create table " & nombretabla & " (Des_Gasto text(25) null,Fecha_Gasto text(25) null,Pag_Efectivo text(25) null, Pag_Cheque text(25) null, No_Cheque text(25) null,Banco_Cheque text(25) null, No_FacNota text(25) null, Importe_Bruto text(25) null, Iva_Normal text(25) null, Iva_Retenido text(25) null, Fecha_Cheque text(25) null)"

gblConn.Execute strSql
strSql = ""
'strSql = "insert into " & nombretabla & " SELECT tb_Gastos.Des_Gasto, tb_Gastos.Fecha_Gasto, tb_Gastos.Pag_Efectivo, tb_Gastos.Pag_Cheque, tb_Gastos.No_Cheque, tb_Gastos.Banco_Cheque, tb_Gastos.No_FacNota, tb_Gastos.Importe_Bruto, tb_Gastos.Iva_Normal, tb_Gastos.Iva_Retenido, tb_Gastos.Fecha_Cheque From tb_Gastos WHERE (((Month([Fecha_Gasto]))=" & Gs_Mes & ") AND ((tb_Gastos.No_Economico)='9086') AND ((Year([Fecha_Gasto]))=" & Gs_Anio & "))"
strSql = "insert into " & nombretabla