Mostrando Valor Do Banco Sem As Casas Decimais

[ju_rezende]

olá pessoal estou com um problma tenho uma campo no banco do tipo moeda, mas quando uso rs("moeda"), me retorna vo valor sem a virgula, e as duas casas decimais

exemplo

no banco está me retorna

2,50 2,5

5,00 5

1,80 1,8

Alguém poderia me ajudar

Obrigada pela atenção de todos

[bareta]

response.write formatnumber(rs("valor"),2)

[Marcos-rj]

<%=FormatCurrency(rs("valor"),2)%>

[ju_rezende]

não está funcionando com nenhum dos dois exemplos,

Continua me retornando 2, 5 , 2,

[Marcos-rj]

Tenta com essa função:

Function FormataValor(Valor)
  Dim sp, sv, v
  sp = Mid(FormatNumber(1000, 0, -1, 0, -1),2,1)
  sv = Mid(FormatNumber(0.1, 1, -1, 0, -1),2,1)
  If isNumeric(Valor) Then
    v = FormatNumber (Valor, 2, -1, 0, -1)
  Else
    v = FormatNumber (0, 2, -1, 0, -1)
  End If
  v = Replace(v, sp, "p")
  v = Replace(v, sv, "v")
  v = Replace(v, "p", ".")
  v = Replace(v, "v", ",")
  FormataValor = v
End Function

<%=FormataValor(rs("valor"))%>

Editado Março 28, 2007 por Marcos-rj

[Claudio Volles]

Esse é bem simples, mas funciona

R<%=Replace(Replace(Replace(Replace(FormatCurrency(RS_IMP_SUM("valor")), ",", "x"), ".", "b"), "b", ","), "x", ".")%>

[ju_rezende]

não consegui entender, como ficaria neste exemplo

<input type="text" name="valor" value="<%=rs3("valor")%>