Erro: String incompatível!

[ukow 1]

Olá!

 

Eu havia montado um relatório que funcionava perfeitamente mas de um dia pro outro o seguinte erro começou a aparecer:

 

Erro de tempo de execução do Microsoft VBScript erro '800a000d'

Tipos incompatíveis: '[string: ""]'

/smart/hitcentre27/relatorio_profaulas.asp, line 184

A linha do erro corresponde á:

resultado = valor * hora

e o código

<%Dim resultado, valor, hora

valor = rsProf("valor")

hora = rsProf("hora")

resultado = valor * hora

%>R$<%if hora > 1 then%><%=formatnumber(resultado,2)%><%end if%>

Alguém saberia como resolver?

Obrigado! :D

[Gilberto Jr 26]

Esse valor seria em moeda corrente tipo real e hora seria valor inteiro?

 

Tipo resultado = 50.00*3 [ 150.00 ]

 

Att;

[Ronaldo Bueno 23]

antes de multiplicar faça o teste se esta vazio. depois de um replace caso o campo for moeda (o que o Gilberto disse acima)

 

if valor = "" or IsNull(valor) then

valor = 0

end if

 

valor = replace(valor,".",",")

[ukow 1]

Esse valor seria em moeda corrente tipo real e hora seria valor inteiro?

 

Tipo resultado = 50.00*3 [ 150.00 ]

 

Att;

 

Sim, o campo valor é em moeda e o campo "hora" é um número inteiro

[Gilberto Jr 26]

 

Sim, o campo valor é em moeda e o campo "hora" é um número inteiro

 

E o procedimento que o Ronaldo passou resolveu né?

 

Att;