putz não sei nada disso =(

Eu tenho uma função simples.
Nada que se comunique com o site dos correios ou coisa do genero, algo mais para estudo da logica.

Margem = 1'KG.
Fixo = 6.80 'Valor do Frete.
Adicional = 1.80 'Valor a ser cobrado a cada quilo excedido.
PesoTotal= 26.50 'Peso de todos produtos juntos.

function CalculaFrete(Margem,Fixo,Adicional,PesoTotal)
Amais = PesoTotal / Margem
FreteAmais = Amais * Adicional
ValorFrete = Fixo FreteAmais
CalculaFrete = FormatNumber(ValorFrete)
end function

response.write CalculaFrete(Margem,Fixo,Adicional,PesoTotal)