
08/06/2012, 13:29
|
 | | | Fecha de Ingreso: abril-2011 Ubicación: Salto
Mensajes: 437
Antigüedad: 13 años, 10 meses Puntos: 6 | |
Respuesta: Crystal Report Frustrado 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 |