Ver Mensaje Individual
  #8 (permalink)  
Antiguo 12/02/2004, 18:52
Avatar de Franc_
Franc_
 
Fecha de Ingreso: mayo-2002
Ubicación: Lima
Mensajes: 105
Antigüedad: 22 años, 11 meses
Puntos: 0
Hola Amigo, de las consultas todo salio bien, hasta la suma, pero hay un problema, que no se como resolver, la suma, me aparece por la parte de arriba, y no en la parte de abajo de cantidad:
10
10
---
20
se algo de html, pero no he podido colocarlo abajo, no se quizas es otra cosa, haber si me sigues ayudando, te voy a agradecer, te pongo mi ejemplo

<HTML><HEAD><TITLE>Asp</TITLE></HEAD>
<body bgColor=#eceef2>

<CENTER>
<TABLE BORDER="1">
<TD><B>Fecha<B></TD>
<TD><B>No<B></TD>
<TD><B>Nombres y Apellidos<B></TD>
<TD><B>Cantidad<B></TD></tr>
</CENTER>

<%
Dim conexion, registros, basedatos
basedatos = Server.MapPath("Jendyvs.mdb")
Set conexion = Server.CreateObject("ADODB.Connection")
conexion.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & basedatos & ";"
Set registros = conexion.Execute("SELECT * FROM Ejemplo WHERE fecha Between #1/2/2004# And #1/2/2004#")

cant=0
Do While Not registros.EOF
%>

<TR><TD><%= registros.Fields("Fecha").Value %></TD>
<TD><%= registros.Fields("No").Value %></A></TD>
<TD><%= registros.Fields("Nombres").Value %></A></TD>
<TD><div align="right"><%= formatnumber(registros.Fields("Cantidad").Value,2) %></div></td></tr>
<td><% cant = cant + registros.Fields("Cantidad").Value%></td></tr>

<%
registros.MoveNext
Loop

registros.Close
Set registros = Nothing
conexion.Close
Set conexion = Nothing
response.write cant
%>

</TABLE>
</BODY>
</HTML>
__________________
Franc_ ===>>