Array de valores perde as casas decimais ao ser recuperado

[Alexandre Zito]

Boa tarde Caros,

Preciso de uma ajuda, tenho uma aplicação na qual preciso submeter valores dentro de um insert conforme aponto abaixo:

arrayCodigo=(Split(Request.Form("selecionado"),","))

arrayDDL=(Split(Request.Form("vDDL"),","))

arrayQTD=(Split(Request.Form("vQTD"),","))

arrayVALOR=(Split(Request.Form("xVAL"),",")) ' variavel de valores

arrayCPL=(Split(Request.Form("vCPL"),","))

i=0

For Each item in arrayCodigo

if arrayQTD(i) = 0 then

Cabecpequenared("PREENCHER A QUANTIDADE !!!!!!")

RESPONSE.End()

END IF

if arrayVALOR(i) = 0 then

Cabecpequenared("PREENCHER o VALOR !!!!!!")

RESPONSE.End()

End if

if arrayDDL(i) = 0 then

Cabecpequenared("PREENCHER o PRAZO !!!!!!")

RESPONSE.End()

End if

sqlCAD = "INSERT INTO dbo.HIS ( dbo.His.hiscod, dbo.His.HisDia, hisQTD,"

sqlCAD = sqlCAD & " dbo.His.HisCPL,dbo.His.Hisval,dbo.His.hisSET,dbo.HIS.hisOBR) Values ("& arrayCodigo(i) &","& arrayDDL(i) &","& arrayQTD(i) & ",'"& arrayCPL(i) & "'," & Transforma(arrayVALOR(i)) &"," & vSET &"," & vOBR &"," & vTIP &")"

response.write sqlCAD

response.end

i=i+1

Conn.Execute ( sqlCAD )

Next

Quando dou um response.write no insert a ser montado, o valor (arrayValor(i)) aparece apenas com o primeiro numero, os demais das casas decimans que deveriam vir EX 1,50, aparecem apenas 1 .

alguém pode me ajudar nesta duvida, estou sem saber como resolver este impasse

A disposição

[webdeveloper]

Não será porque você faz o Split justamente na vírgula?

[Alexandre Zito]

Não será porque você faz o Split justamente na vírgula?

Como assim ?