Asp con formato de decimales

Franc_ · #1 (**permalink**) 11/02/2004, 17:02

Una pregunta, como puedo hacer para que mi consulta la columna de cantidad, me salga con formato de 2 decimales, con coma y a la derecha, asi por ejemplo 1,245.30, antes me salia 1245.3, y pegado a la izquierda, gracia por la ayuda.

<%
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 ORDER BY Ejemplo.Fecha")
Do While Not registros.EOF
%>

<TR><TD><%= registros.Fields("Fecha").Value %></TD>
<TD><%= registros.Fields("Nombres").Value %></A></TD>
<TD><%= registros.Fields("Cantidad").Value %></A></TD></TR>

jorel · #2 (**permalink**) 11/02/2004, 19:44

hola franc con esta funcion puedes darle formato a esa cantidad

http://www.devguru.com/Technologies/...matnumber.html

formatnumber(RS("cantidad"),2)

Franc_ · #3 (**permalink**) 12/02/2004, 13:27

Gracias amigo por la respuesta, pero disculpa mi ignorancia, me da errror, creo que lo estoy colocando en un sitio que no es, soy nuevo en esto, tengo pocos dias, asi que no se si lo podrias dar la respuesta con el ejemplo mismo que puse..., disculpa la molestia.

jorel · #4 (**permalink**) 12/02/2004, 13:37

que tal,,, prueba asi,

<TD><%= formatnumber(registros.Fields("Cantidad").Value,2) %></A></TD>

y creo que Cantidad debe ser de tipo numerico en tu bd,, si no funciona postea el tipo de error...ok

Franc_ · #5 (**permalink**) 12/02/2004, 14:29

Hola amigo, gracias por la rapidez, l consulta me salio con 2 decimales, pero con el sgte formato: 16.556,30, y deberia ser asi: 16,556.30. no se si sera mi base de datos, CANTIDAD, esta configurado:
tamaño de campo=Simple
Formato=fijo
Decimales=2.

Aprovechando tu rapidez en las respuestas te quieria hacer otra consulta como hago para sumar la columna de CANTIDAD hice esto, pero nada:
("SELECT SUM(CANTIDAD) FROM ejemplo")

oo aproposito como podria haceer para debajo de la columna me aparezca la suma total
10
20
30
---
60,
algo asi, queria sumarlo aparte pero no se si es que se puede, gracias por la molestia....

Franc_ · #6 (**permalink**) 12/02/2004, 14:43

Y otra amigo, prque los numeros se pegan a la izquierda
1,520.10
520.30
20.40
deberian ser a la derecha

jorel · #7 (**permalink**) 12/02/2004, 17:03

Que tal franc

asi deberia de funcionarte y presentartelo en formato 12,000.50

formatnumber(registros.Fields("Cantidad").Value,2)

cantidad cambialo por entero largo asi:

tamaño de campo=Entero largo
Formato=fijo
Decimales=2

puedes guarar la suma de cantidades en una variable cant asi:

cant = 0
Do While Not registros.EOF
%>

<TR><TD><%= registros.Fields("Fecha").Value %></TD>
<TD><%= registros.Fields("Nombres").Value %></TD>
<TD><div align="right"><%= registros.Fields("Cantidad").Value %></TD></div></TR>
<% cant = cant + registros.Fields("Cantidad").Value%>

registros.MoveNext
Loop

y para justificar a la derecha eso lo haces con html con la etiqueta <div align="right"><%%></div>

y para que veas el resultado de cant asi

response.write cant

ok

Franc_ · #8 (**permalink**) 12/02/2004, 18:52

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>

jorel · #9 (**permalink**) 12/02/2004, 19:49

la variable de cant la debes de presentar fuera y abajo del loop

usa algun editor de html como el frontpage o el dremweaver para que formes la tabla como la quieres luego veas sus etiquetas y sepas como distribuirlas, asi lo hago yo por que a veces entre tanta columna y fila de las tablas que revuelvo mucho

registros.MoveNext
Loop

<tr><td><% response.Write cant%>%></td></tr>

ok

Franc_ · #10 (**permalink**) 16/02/2004, 14:41

Muchas gracias amigo

tammybeia · #11 (**permalink**) 27/02/2008, 14:06

ola soy nueva aqui y me gustaria ke me gustaria saber como puedo quitar decimales se que lo normal es

round(numero, decimales) y eso me funciona pero cuando son con decimales periodicos o semiperiodicos no em sirve como lo puedo hacer estoy programando en asp.

Shiryu_Libra · #12 (**permalink**) 27/02/2008, 14:09

tammybeia, bienvenida al foro

un poco lleno de polvo el post que intentas revivir.... puedes detallar mas tu problema para buscarle solucion??

tammybeia · #13 (**permalink**) 27/02/2008, 14:18

te voy a dar un ejemplo

tab.fields("hh") = 12,1245215

round(tab.fields("hh"),1)

eso me da como resultado 12,1 verdad

pero en el caso de que:

tab.fields("hh") = 19,454545454545
tab.fields("hh") = 19,333333333333

no me deja y eso solo me pasa cuando hay numeros decimales periodicos o numeros decimales semiperiodicos

ojala me hayas entendido!!!

Shiryu_Libra · #14 (**permalink**) 27/02/2008, 14:26

entonces lo que buscas es algo que aunque lo redondee, ponga solamente 1 decimal?

Cita:

dec=1
decimal=12,18192365
response.Write formatnumber(round(decimal,dec),dec)

te entendi bien??