Problema com formatCurrency e com menu list

[Ivan.Teles 23]

Problema com FormatCurrency

tenho esse select SELECT SUM(Valor) AS Total FROM tblLacamentos WHERE idCategoria = "& id &"

quando tendo um formatCurrency(rs("Total"),2) ele ta erro:

(0x800A000D)
Tipos incompatíveis: 'FormatCurrency'

Já tentei converter com cdbl antes de tantar formatar porem o erro é esse:

(0x800A005E)
Uso inválido de Null: 'cdbl'

O que devo fazer?

Seria por causa do SUM? se for como formatar após somar?

 

Problema com menu list

tenho um menu list onde as opções vem de uma tabela so que quero que no menu, umas das opções venha selecionada de acordo com o registro de outra tabela, mas não esta ocorrendo.

O que deve ser?

<% do while not rsC.eof %>
<option value="<%= rsC("id")%>" <%If rsC("id") = CStr(rsL("idCategoria")) Then Response.Write("selected=""selected""") : Response.Write("")%>><%= rsC("categoria")%></option>
<% rsC.movenext
 loop %>

[Schneider 0]

Cara, pra dar esse erro é bem provável que tua variavel valor esteja chegando vazia nas funções FormatCurrency() e cDbl(). Tenda dar um response.write nela praver se esta com algum valor.

 

no select não precisa colocar o &" no final quando a variavel for numerica:

 

SELECT SUM(Valor) AS Total FROM tblLacamentos WHERE idCategoria = "& id

testa aí cara..... falow!