porcentagem em valor R$

Olá Masters;

Estou precisando acrescentar 1% a determinando valor que vem um xml.

Ex: tenho o seguinte valor recuperado do xml: 24.90

Preciso acrescentar 1% a este valor mais dá um erro.

Veja como estou fazendo:

total_valor = valor_produto + valor_valorproduto * (1 / 100) '----> 1 referente a 1% (porcento)

response.Write(total_valor)

Erro: Microsoft VBScript runtime error '800a000d'

Type mismatch: '[string: "P"]'

/calcularfrete/calcularFrete.asp, line 188