Problemas com Soma de Campos do Banco de Dados

[leonardopch 0]

galera estou com o seguinte problema...quando vou calcular o valor total de um campo no banco de dados ele nao esta somando os centavos...por exemplo...entro com um valor de R$100,50 no formulario...só que na hora de gravar o valor total no banco ele grava 10050,00...estou utilizando banco de dados Mysql e o campo é do tipo Double(13,2)...o codigo é o seguinte:

 

 

<%

IF (CStr(Request("form")) = "insert") THEN

 

Call Conecta

 

Set RECORDSET = Server.CreateObject("ADODB.Recordset")

sql1 = "SELECT * FROM dim order by iddim desc"

Set RECORDSET = conexao.execute(sql1)

 

valor = Replace(Request.Form("valor"),",",".")

 

IF RECORDSET.EOF AND RECORDSET.BOF THEN

total = 0

ELSE

total = RECORDSET("total")

END IF

 

n_total = total + valor

 

sql2 = "Insert into dim(valor,total) values('"&valor&"','"&n_total&"')"

conexao.execute(sql2)

response.Write("ok")

 

END IF

%>

 

entrando com um valor de 100,50 por exemplo ele esta gravando da seguinte forma no banco:

valor : 100,50

total : 10050,00

[leonardopch 0]

ninguem pra ajudar???

[Mário Monteiro 179]

é porque o tatal voce nao esta tratando como fez com o valor