Dudas Sobre Crystal Reports

[JennyMedel]

Hola estoy tratando de hacer un reporte en Crystal Reports, pero me gustaria que fuera por medio de codigo y quiero aumentar una tabla mas que necesito para mi reporte, pero no se como mostrarla??, es mas nisiquiera me aparece el reporte como tal.

Imports System.Data.OleDb

Imports CrystalDecisions.CrystalReports.Engine

Public Class ventasxarticulo

Inherits System.Windows.Forms.Form

Private conn As OleDbConnection = New OleDbConnection

Private adaptador As OleDbDataAdapter

Private enlaceBase As BindingManagerBase

Private comando As OleDbCommandBuilder

Private Sub ventasxarticulo_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

conn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" _

& pv.const_BASE_DE_DATOS_ & ";User Id=admin;Password=;"

adaptador = New OleDbDataAdapter("SELECT * FROM productos ", conn)

comando = New OleDbCommandBuilder(adaptador)


Try

''dsv_a= dataset

Dim mi_dsv_a As New dsv_a

adaptador.Fill(mi_dsv_a, "productos")

''crv_a=Crystal Report

Dim mi_crv_a As New crv_a

mi_crv_a.SetDataSource(mi_dsv_a)

''crvv_a=CrystalReportViewer

crvv_a.ReportSource = mi_crv_a

Catch ex As Exception

MessageBox.Show(ex.Message, "Imprimir", _

MessageBoxButtons.OK, MessageBoxIcon.Error)

End Try

End Sub


End Class

"este codigo lo tengo en un formulario llamado ventasxarticulo"


("`-''-/").___..--''"`-._
`6_ 6 ) `-. ( ).`-.__.`)
(_Y_.)' ._ ) _ `._ `. ``-..-'
(ll).-'' (((!.' ((!.-'
J E N N Y