Ver Mensaje Individual
  #1 (permalink)  
Antiguo 19/07/2012, 10:30
wayko
 
Fecha de Ingreso: julio-2012
Mensajes: 9
Antigüedad: 11 años, 9 meses
Puntos: 0
Como enviar datos de un formulario VB a un Datareport

Buen dia

tengo un rpoblema con un formulario

resulta que quiero enviar datos de un formulario mediante una consulta SQL a un DataReport

este es mi codigo

'....Se empieza a Descontar las Cantidades de cada producto.


'AQUI EMPIEZA EL REPORTE DE LA COTIZACION RECIENTEMENTE INGRESADA
Dim Numerocot As Integer
Dim SQL As String
Numerocot = Text2.Text
If Rs.State = 1 Then Rs.Close
SQL = "SELECT NVACOTIZACION.[Nº de requisicion], NVACOTIZACION.[N° cliente], NVACOTIZACION.Fecha, PEDIDOPRODUCTO.Folio, PEDIDOPRODUCTO.Cantidad, PEDIDOPRODUCTO.[Nombre del producto], PEDIDOPRODUCTO.Marca, PEDIDOPRODUCTO.Categoria, PEDIDOPRODUCTO.Observaciones, PEDIDOPRODUCTO.[Precio unitario], PEDIDOPRODUCTO.Total, NVACOTIZACION.Subtotal, NVACOTIZACION.IVA, NVACOTIZACION.Total FROM NVACOTIZACION INNER JOIN PEDIDOPRODUCTO ON NVACOTIZACION.[Nº de requisicion] = PEDIDOPRODUCTO.[N° de requisicion]WHERE NVACOTIZACION.[N° DE REQUISICION] = '" & Numerocot & "' AND PEDIDOPRODUCTO.[N° DE REQUISICION] = '" & Numerocot & "' "
Set RptCotizacion.DataSource = Cn.Execute(SQL)
'RptCotizacion.ColWidth(1) = 1200
Set RptCotizacion.DataSource = Cn.Execute(SQL)
RptCotizacion.Show 1

LA CONSULTA SI SE PUEDE EJECUTAR DESDE LA BASE DE DATOS PERO CUANDO LE ENVIO LA CONSULTA A EL DATA REPORT NO SE PUEDE


ALGUIEN PUEDE EXPLICARME?


COMO SE PUEDE HACER ESO






esta es una copia de la foto del sistema y todo lo que esta ingresado es como yo lo quiero mandar a una data report


asi es como yo quiesiera hacer si pueden diganme por favor

Última edición por wayko; 19/07/2012 a las 10:44