Crystal Report Frustrado

[detective_jd]

Hola decidi cambiar un poco mi codigo y me aparece el error que no se especificaron valores para alguno de los parámetros requeridos y esos 8 campos son los que estan el crystal report y en estas consultas. ¿Alguna sugerencia? Gracias.


Private Sub poblarBoleta()
Try
Dim objDA As New OleDbDataAdapter("SELECT fechaventa,importeventa from ventas where codigoventa=" & objventa.numero, objconexion)
objDA.Fill(dst, "ventas")
objDA = New OleDbDataAdapter("select importe,cantidadvendida from detalleventa where codigoventa=" & objventa.numero, objconexion)
objDA.Fill(dst, "detalleventa")
objDA = New OleDbDataAdapter("select nombrecliente,direccioncliente,cedulacliente from clientes inner join ventas on clientes.codigoventa=ventas.codigoventa where ventas.codigoventa=" & objventa.numero, objconexion)
objDA.Fill(dst, "clientes")
objDA = New OleDbDataAdapter("select nombrearticulo from articulos inner join detalleventa on articulo.codigoarticulo=detalleventa.codigoarticul o where detalleventa.codigoventa=" & objventa.numero, objconexion)
objDA.Fill(dst, "articulos")
Dim info As New crtboletita
info.SetDataSource(dst)
Me.crvwboleta.ReportSource = info
Catch ex As OleDbException
MsgBox(ex.Message, MsgBoxStyle.Exclamation, "Stockker")
End Try
End Sub