crystalreports y vb 2005
Publicado por dasa (13 intervenciones) el 17/06/2008 00:31:38
hola tengo un peque;o problema que espero puedan ayudarme a solcucionarlo estoy haciendo una aplicacion en vb 2005 y necesito hacer un reporte y me encontre con un ejemplo en internet pero a la hora de tratar de implementarlo no puedo ya que es necesario crear una variable de tipo reporte y en mio caso en la ayuda no me sale el reporte que cree este es el sig codigo
Dim sql As String = " select * from reppagos where mes = ('" & en & "') "
Dim bs As New BindingSource
Dim bn As New BindingNavigator
Dim conexion As String
conexion = " Provider=Microsoft.Jet.OLEDB.4.0;Data Source=H:progCBN.mdb"
Dim conn As New OleDbConnection(conexion)
Dim ds As New DataSet1
Try
'Crear los DataAdapters
Dim da As New OleDbDataAdapter(sql, conn)
'Poblar las tablas del dataset desde los dataAdaperts
da.Fill(ds, "reppagos")
'Poblar el informe con el dataSet y mostrarlo
Dim info As New aqui es en donde no me aparece para seleccionar el nombre del reporte que cree
info.SetDataSource(ds)
CrystalReportViewer1.ReportSource = info
Catch ex As Exception
MessageBox.Show(ex.ToString)
End Try
End Sub
alguien sabe por que no me aparece el reporte o como lo puedo solucionar?
de antemano gracias
Dim sql As String = " select * from reppagos where mes = ('" & en & "') "
Dim bs As New BindingSource
Dim bn As New BindingNavigator
Dim conexion As String
conexion = " Provider=Microsoft.Jet.OLEDB.4.0;Data Source=H:progCBN.mdb"
Dim conn As New OleDbConnection(conexion)
Dim ds As New DataSet1
Try
'Crear los DataAdapters
Dim da As New OleDbDataAdapter(sql, conn)
'Poblar las tablas del dataset desde los dataAdaperts
da.Fill(ds, "reppagos")
'Poblar el informe con el dataSet y mostrarlo
Dim info As New aqui es en donde no me aparece para seleccionar el nombre del reporte que cree
info.SetDataSource(ds)
CrystalReportViewer1.ReportSource = info
Catch ex As Exception
MessageBox.Show(ex.ToString)
End Try
End Sub
alguien sabe por que no me aparece el reporte o como lo puedo solucionar?
de antemano gracias
Valora esta pregunta


0