Amigos:
tengo un problema no se como mostrar un datareport sin dataenvironment,
ejemplo
Private Sub Command3_Click()
RPTcotizacion.Show
End Sub
me sale error
"Origen de datos no válido"
ayudenme...
alfredo
Amigos:
tengo un problema no se como mostrar un datareport sin dataenvironment,
ejemplo
Private Sub Command3_Click()
RPTcotizacion.Show
End Sub
me sale error
"Origen de datos no válido"
ayudenme...
alfredo
hay varios motivos por los cuales quieras mostra un reporte si conexion a un dataEviroment pero si lo q quieres es mostrar un reporte donde puedas poner etiquetas q luego le daras valores a traves de variables puedes hacer esto
Dim rs As New ADODB.Recordset '//esta variable es a nivel modulo
Private Sub Command1_Click()
rs.Fields.Append "Col6", adLongVarChar, 25 '//le creas un campo al recodset para simular data
rs.Open
Set DataReport1.DataSource = rs '//le asignas el recordset al datareport
DataReport1.Show '// y lo muestras
End Sub
cualquier otra duda o si no entendistes comunicate a
davidsryl@hotmail.com
Me funcionó:
Dim rs As New ADODB.Recordset '//esta variable es a nivel modulo
rs.Fields.Append "Col6", adLongVarChar, 25 '//le creas un campo al recodset para simular data
rs.Open
Set Cotizacion.DataSource = rs '//le asignas el recordset al datareport
Cotizacion.Sections("Sección1").Controls.Item(1) = MSFlexGrid1.TextMatrix(1, 2)'// tengo dramas aqui...
Cotizacion.Show '// y lo muestras
pero tengo dramas al mandar un datos de un flexgrid a un text del datareport..
error 438
gracias---Edited by: kool
Cotizacion.Sections("Sección1").Controls("Etiqueta 1").caption=MSFlexGrid1.TextMatrix(1, 2)
hola tengo un problema con el data report alguien seria tan amable de ayudarme por favor?