Hola gracias pòr la respuesta
si lo que deseo es sumar todos los datos de un campo...
coloque como me dijiste y me sale un error
sabes como correjirlo????
<%
'definicion de variables
Dim basedatos,con1,rs1
'nombre de la bd
basedatos = "bd.mdb"
Set con1 = Server.CreateObject("ADODB.Connection")
Set rs1 = Server.CreateObject("ADODB.Recordset")
con1 ="DRIVER={Microsoft Access Driver (*.mdb)};uid=;pwd=clave;"
con1 = con1 & "DBQ=" & server.mappath(basedatos)
Dim sql
sql = "SELECT SUM(quincena) AS total FROM datos_personales WHERE fondoempleados = Si;"
Const adOpenForwardOnly = 0
Const adLockReadOnly = 1
Const adCmdText = &H0001
Const adUseClient = 3
rs1.Open sql, con1, 3, 3
%>
<% Response.Write(datos_personales.Fields("total "))%>
<%
Set con = Nothing
Set rs = Nothing
%>
y me salio este error
Microsoft OLE DB Provider for ODBC Drivers error '80040e10'
[Microsoft][Controlador ODBC Microsoft Access] Pocos parámetros. Se esperaba 1.
/bdpersonal/total.asp, line 34
gracias por tu colaboracion ojala puedas ayudarme con este error..
LEXUS
<img src="http://www.lexus.com/images/nav/nav_i_logo.gif" width="109" height="47" alt="Lexus" border="0">