Uso de Función Sql SUM en Visual 6.0

Estoy haciendo una tabla donde almaceno las facturas, lo que quiero es sumar los campos Precio_Unitario y el campo IVA para después tener el total de la compra...

Estoy haciendo esto pero no me sale... No me doy cuenta adónde le estoy errando!

Me sale un cartel: No se encontró el elemento en la colección que corresponde al nombre o el ordinal pedido.

StrSumaUnitario = "select SUM(Precio_Unitario) from Temporal_Factura where Num_Factura = " & Num_Factura
Set RstSumaUnitario = New ADODB.Recordset
RstSumaUnitario.Open StrSumaUnitario, Base, adOpenStatic, adLockOptimistic
With RstSumaUnitario
              lblparamostrarpreciounitario.Caption = !Precio_Unitario
End With

1 Respuesta

Respuesta
2

Te pongo tu código con los cambios que debes hacer en negrita:

StrSumaUnitario = "select SUM(Precio_Unitario) AS Total from Temporal_Factura where Num_Factura = " & Num_Factura
Set RstSumaUnitario = New ADODB.Recordset
RstSumaUnitario.Open StrSumaUnitario, Base, adOpenStatic, adLockOptimistic
With RstSumaUnitario
              lblparamostrarpreciounitario.Caption = !Total
End With

Obviamente al campo le puedes llamar como quieras, no hace falta que sea Total

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas

Agregar valores con coma a un campo access 2003

Estoy haciendo unos cálculos para agregar el IVA a unos productos... Cuando agrego el registro no me toma las comas... Ej: Un producto tiene valor 10 y cuando le agrego el 10,5%, en vez de 11,05 me lo muestra como 11... Y el 21 % en vez de 12,1 me...
1 respuesta

Conectar con una Consulta Access

Esta es primera vez que le hago una consulta sobre el particular... Mi problema es el siguiente. Tengo una aplicación desarrollada con VB 6.0 y necesito accesar una Consulta de access. La consulta es el resultado de varios registros que se duplican...
1 respuesta

Cargar datos al formulario al perder el foco

Me gustaría saber como hago para llenar los texbox de un formulario desde una base de datos access, tengo declarada la conexión a la BD en un modulo de declaraciones globales 'Conexiones Base de Datos Global Base As New ADODB. Connection Global...
1 respuesta

Problemas con consultas de access

Tengo 2 tablas una que se llama Registros_mex con campo No_exp como llave principal y Id_solicitante como secundaria y Solicitante tienen el campo Id_solicitante como principal al momento de hacer mi select los datos que me arroja es que por cada...
1 respuesta

Bloqueo de Registros de Griselda

Borré el archivo ldb, pero igual tengo bloqueada mi tabla, ¿Hay alguna forma de acceder por access o por vb? Y este es el error que me tira cuando se bloquea: Error 3251 Current recordset does not support updating this may be a limitation of the...
1 respuesta

Como llenar el datagrid

Soy usuario nuevo y tengo el siguiente problema. Tengo 2 datagrid; uno muestra una lista de opciones. Ese lo quiero cambiar por un textbox, el hecho es que el dato que cliqueo en el lo toma un textbox y este valor sirve como parámetro para filtrar...
1 respuesta

Error al llamar datos de una tabla

Tengo el Siguiente código: Private Sub cboObra_Click() cboAnticipoDirigidoA.Text = "" cboLegalizacionNo.Text = "" Set Con = New ADODB.Connection With Con .ConnectionString = "provider = microsoft.ace.oledb.12.0;data source=D:\PROYECTO TYT\TYT.accdb"...
2 respuestas

Como pasar un archivo TXT a SQL o a un Recordset.?

Quisiera saber si me puedes ayudar. Necesito sacar los datos de un archivo TXT, y llevarlos a una tabla de SQL. Los datos dentro del archivo TXT se encuentran separados por Tabulaciones. Utilice el ejemplo que pongo a continuación, pero me muestra...
2 respuestas

El subíndice está fuera del intervalo. Datagrid.

Cómo les va. Tengo el siguiente inconveniente. Estoy queriendo poner unos campos en el datagrid y me tira ese error. Quizá el problema esté en el armado de la cadena por los INNER JOIN... Les paso la cadena y lo que quiero insertar en el datagrid....
1 respuesta

Llenar DataGrid con ADO y SqlServer

Estoy reien comenzando con esto de VB6 y quiero aprender como puedo llenar una grilla con Visual Basic 6, la conexión la quiero hacer con ADO y el motor es SQLServer 2000, para el ejemplo quiero tomar la bdd "pubs" y la tabla "titles" de la bdd que...
1 respuesta