Ver Mensaje Individual
  #2 (permalink)  
Antiguo 17/12/2007, 18:59
Avatar de GeoAvila
GeoAvila
Colaborador
 
Fecha de Ingreso: diciembre-2003
Ubicación: Antigua Guatemala
Mensajes: 4.032
Antigüedad: 21 años, 4 meses
Puntos: 53
Re: Consulta NO ME RESULTA AYUDAAAA !!!!

Cita:
Iniciado por Baco_ Ver Mensaje
A ver ... necesito sumar una cierta cantidad de productos ingresados para compararlos con las que he entregado, pero no he podido realizar la suma del campo cantidad les dejo el codigo a ver si me hechan una mano porfa

Private Sub CmdGuardar_Click()

Dim SumaCantidad As Integer

Conectar

rs1.Open "Select Sum(Cantidad) as SumaCantidad From Ingreso Where Producto = '" & TxtProducto & "'", Conexion, adOpenDynamic, adLockOptimistic
Text1.Text = rs1!SumaCantidad
rs1.Close

End Sub

En realidad no ha resultado nada (mi BD es en Access por si las moscas) ....
desde ante mano Grax..
Te aconsejaria hacer tu consulta en una vista de access y luejo llamarla desde vb

nos vemos..
__________________
* Antes de preguntar lee las FAQ, y por favor no hagas preguntas en las FAQ
Sitio http://www.geoavila.com twitter: @GeoAvila