[Resolvido] como colocar virgulas em um campo buscado por um banco de

Thiago Gurgel · Julho 19, 2008

ola, galera,

gostaria que voces me ajudace um poco,

Tenho uma pagina de tabelas de financeiras, que as taxas, parcelas é buscada de um banco de dados, e quando ela vem acontece um seguinte,

no banco de dados tem os coeficiente, e a forma de parcelamento (1X, 2X...) e quando pego um valor multiplico pelo coeficiente acontece o seguinte,

se o valor é 14,15 ele coloca assim 1415002365... ~e não coloca virgula nenhuma,

Vlw..

segue abaixo o codigo:

CODE

<%@ Language=VBScript %>
<% Response.Expires = 0 %>

<!-- #include file="../adovbs.inc" -->

<!-- #include file="../conexao.asp" -->

<%

'========================================================================

'================= CGI DE LISTAGEM DOS financ ==================

'========================================================================
 
Set rsfinanc = Server.CreateObject("ADODB.RecordSet")

valor = request("valor")

entrada = request("entrada")

If (financeira = "") then

   financeira = "Todos"

   End if

%>
 
<html>
 
<base target="_self">
 
<title>Tabelas de financiamento</title><body leftmargin="2" link="#000000" vlink="#000000" alink="#FF0000">
 
<center>
 
  <p> 

  <form name="form1" method="post" action="lista_financ1.asp">

    <p><strong><font size="2" face="verdana">valor a ser financiado</font></strong> 

      <input name="valor" type="text" id="valor" value="<%=valor%>">

      <strong><font size="2" face="verdana"> </font></strong> <font size="2" face="verdana"><strong>valor 

      da entrada</strong> </font> 

      <input name="entrada" type="text" id="entrada" value="<%=entrada%>">

      <input type="submit" name="Submit" value="calcular">

    </p>

    <p>  </p>

    <p> 

      <label>

      <input type="radio" name="financeira" value="losango">

      losango</label>

      <br>

      <label>

      <input type="radio" name="financeira" value="aymore">

      aymore</label>

      <br>

    </p>

  </form>

  <font size="2" face="verdana">valor a ser financiado: <b><%=(valor-entrada)%></b></strong></font> 

  <table width="301" border="1" cellpadding="5" cellspacing="1" bordercolor="#3454A7" id="AutoNumber1">

    <tr> 

      <td align="center" height="35" colspan="7" bgcolor="#3454A7"><b> <font color="#FFFFFF" face="Verdana">Tabela 

        </font><font face="Verdana, Arial, Helvetica, sans-serif" size="2"></font></b></td>

    </tr>

    <%

	SQL = "SELECT * FROM financ WHERE financeiras = 'aymore'"

rsfinanc.Open SQL, Conexao

If (rsfinanc.RecordCount <> 0) Then 

%>

    <tr> 

      <td width="117"><b><font face="Verdana" size="2">financeiras</font></b></td>

      <td width="103"><b><font size="2" face="Verdana">parcelamento</font></b></td>

    </tr>

    <%

  While Not (rsfinanc.EOF) %>

    <tr> 

      <td><div align="left"><font face="Verdana, Arial, Helvetica, sans-serif" size="2"><strong><font face="verdana"> 

          </font><%= rsfinanc("financeiras") %>  <%= rsfinanc("especie") %></strong></font></div></td>

      <td><div align="center"><font face="verdana" size="2"><strong><%= rsfinanc("parcelamento") %>X 

          de

		   <%= rsfinanc("taxas")*(valor-entrada)%> </strong></font></div></td>

    </tr>

    <%  rsfinanc.MoveNext

  Wend

   If (rsfinanc.RecordCount = 1) Then %>

    <% Else %>

    <% End If

Else %>

    <%

End If

rsfinanc.Close %>

  </table>
 
  <font size="2" face="verdana">valor a ser financiado: <b><%=(valor-entrada)%></b></font> 

  <table width="301" border="1" cellpadding="5" cellspacing="1" bordercolor="#3454A7" id="AutoNumber1">

    <tr> 

      <td align="center" height="35" colspan="7" bgcolor="#3454A7"><b> <font color="#FFFFFF" face="Verdana">Tabela 

        </font></b></td>

    </tr>

    <%

	SQL = "SELECT * FROM financ WHERE financeiras = 'losango'"

rsfinanc.Open SQL, Conexao

If (rsfinanc.RecordCount <> 0) Then 

%>

    <tr> 

      <td width="117"><b><font face="Verdana" size="2">financeiras</font></b></td>

      <td width="103"><b><font size="2" face="Verdana">parcelamento</font></b></td>

    </tr>

    <%

  While Not (rsfinanc.EOF) %>

    <tr> 

      <td><div align="left"><font face="Verdana, Arial, Helvetica, sans-serif" size="2"><strong><font face="verdana"> 

          </font><%= rsfinanc("financeiras") %>  <%= rsfinanc("especie") %></strong></font></div></td>

      <td><div align="center"><font face="verdana" size="2"><strong><%= rsfinanc("parcelamento") %>X 

          de <%= rsfinanc("taxas")*(valor-entrada)%> </strong></font></div></td>

    </tr>

    <%  rsfinanc.MoveNext

  Wend

   If (rsfinanc.RecordCount = 1) Then %>

    <% Else %>

    <% End If

Else %>

    <%

End If

rsfinanc.Close %>

  </table>

</center>
 
</body>

</html>
 
<%

Set rsfinanc = Nothing

Fecha_Conexao

%>

CaBo GeL · Julho 19, 2008

FormatNumber(rsfinanc("financeiras"), 2)

at+

Thiago Gurgel · Julho 21, 2008

FormatNumber(rsfinanc("financeiras"), 2)

at+

cara só que tipo os coeficientes é "1,158265" da quando eu busco eles da tabela do sql , e sai de um formato assim "1.158.265,00" ele não sai como eu quero, só que na tabela esta gravado como no primeiro, isto que eu não estou intendendo.

Pode me ajudar,

?

Obrigado,

Vlw

Thiago Gurgel · Julho 21, 2008

Gente resolvi, coloquei no banco de dados forma REAL

Dai funfo..

mais vlw..

Usei o seu codigo.

=D

T+

Entrar

Arquivado

[Resolvido] como colocar virgulas em um campo buscado por um banco de

Recommended Posts

Thiago Gurgel 0

Compartilhar este post

Link para o post

Compartilhar em outros sites

CaBo GeL 0

Compartilhar este post

Link para o post

Compartilhar em outros sites

Thiago Gurgel 0

Compartilhar este post

Link para o post

Compartilhar em outros sites

Thiago Gurgel 0

Compartilhar este post

Link para o post

Compartilhar em outros sites

Fixar div até atingir uma certa altura

Ajuda com Extends e envio para o banco

PHP+Codeginiter - Orientação para Impressão

Este projeto é apoiado pelas empresas

Fóruns

Tempo Real

Informação importante