Mi problema es el siguiente:
Tengo una tabla en Access 2003. La Base de datos se llama Negocio y la tabla Empleados
Base de Datos NEGOCIO
Tabla EMPLEADOS
Id Nombre Sueldo
1 Emiliano $2500 Id: es autonumerico.
2 Lucas $5500
3 Leandro $2000
El botón de comando cmdListar realiza la siguiente acción (Carga la tabla Empleados en la grilla DGEmpleados) y por otro lado muestra en una etiqueta lblSueldoTotal, la suma de los sueldos de los 3 empleados osea lblSueldoTotal= Total.
Private Sub CargarEmpleados()
Dim cnn As New OleDbConnection
Dim cmd As New OleDbCommand
Dim DA As New OleDbDataAdapter
Dim DT As New DataTable
Try
cnn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Application.StartupPath & "\Negocio.mdb"
cnn.Open()
cmd.Connection = cnn
cmd.CommandText = "Empleados"
cmd.CommandType = CommandType.TableDirect
DA.SelectCommand = cmd
DA.Fill(DT)
cnn.Close()
DGEmpleados.DataSource = DT 'cargamos en la Grilla "DG" todo lo q esta en el DataTable "DT"
Catch e As Exception
MsgBox("error " & e.Message)
End Try
End Sub
Private Sub SumarSueldos()
'FALTA EL CODIGO
End Sub
¿Alguién me ayuda y realizamos el código del procedimiento SumarSueldos? Recuerden tenemos que sumar los valores de la tercera columna de la tabla Empleados. Y dan un valor de 10000.
