sumar registros
Publicado por andrea (13 intervenciones) el 22/01/2004 21:07:32
Hola... ojala alguien me ayude, necesito sumar una columna de una tabla en sql server 2000, dependiendo de la fecha... y necesito k esa suma total, me la muestre en un label
por ejemplo
fecha_uso nombre total
12-10-03 maria 2000
12-10-03 leticia 450
12-10-03 sebastian 600
12-10-03 yeni 900
13-10-03 andrea 1200
necesito sumar todos los campos de total, siempre y cuando la fecha sea el 12-10-03, y el resultado me lo muestre en un label, lo que pasa es k me dieron este codigo y no me funciona, me sale "la variable with no esta establecida" o algo asi... si alguien me puede ayudar se lo agradeceria mucho...
***este es el codigo k me dieron:***
dim db as DAO.Database
dim rs as DAO.Recordset
dim sql as string
Set db = DbEngine.OpenDatabase("Base Datos")
sql= "SELECT SUM(TOTAL) "
sql=sql & " FROM TABLA "
sql=sql & " GROUP BY FECHA_USO "
sql=sql & " HAVING FECHA_USO='12/10/2003' "
set rs = db.OpenRecordset(sql, dbopendynaset)
if not rs.eof then label1.caption=rs(0)
rs.close
db.close
set rs=nothing
set db=nothing
por ejemplo
fecha_uso nombre total
12-10-03 maria 2000
12-10-03 leticia 450
12-10-03 sebastian 600
12-10-03 yeni 900
13-10-03 andrea 1200
necesito sumar todos los campos de total, siempre y cuando la fecha sea el 12-10-03, y el resultado me lo muestre en un label, lo que pasa es k me dieron este codigo y no me funciona, me sale "la variable with no esta establecida" o algo asi... si alguien me puede ayudar se lo agradeceria mucho...
***este es el codigo k me dieron:***
dim db as DAO.Database
dim rs as DAO.Recordset
dim sql as string
Set db = DbEngine.OpenDatabase("Base Datos")
sql= "SELECT SUM(TOTAL) "
sql=sql & " FROM TABLA "
sql=sql & " GROUP BY FECHA_USO "
sql=sql & " HAVING FECHA_USO='12/10/2003' "
set rs = db.OpenRecordset(sql, dbopendynaset)
if not rs.eof then label1.caption=rs(0)
rs.close
db.close
set rs=nothing
set db=nothing
Valora esta pregunta


0