Cotação Do Dólar

[Guest - Fabrício -]

Estou precisando colocar a cotação do dólar em um site, alguém sabe uma fonte?

Desde já obrigado!

Fabrício.

[jissa]

Duas Formas que vi por ai... a segunda é muito mais facil...

Testa ká

(1)

Cotação do Dolar em Tempo Real com ASPHTTP [8/1/2003]

Este Script pega a cotação em tempo real direto da Gazeta Mercantil.

<%

Set HttpObj = Server.CreateObject("AspHTTP.Conn")

HttpObj.URL = "http://www.investshop.com.br/mer/include/Dolar.csv"

cotacao = HttpObj.GetUrl

cotacoes = replace(cotacao,"Nome;Compra;Venda;Variacao","") ' Tira a primeira parte que é lixo

' Coloca Valores em uma Array

dim valores()

dim cont, cont_valores

for cont = 1 to len(cotacoes) step 1

if (mid(cotacoes,cont,1) = ";") or (mid(cotacoes,cont,1) = " ") or (mid(cotacoes,cont,1) = Chr(10))then

cont_valores = cont_valores + 1

Redim Preserve valores(cont_valores)

valores(cont_valores) = Cstr(str)

str = ""

else

str = str + mid(cotacoes,cont,1)

end if

next

' Fim Coloca valores em uma Array

' Coloca os valores nas variaveis

DOLAR_COMERCIAL_COMPRA = valores(3)

DOLAR_COMERCIAL_VENDA = valores(4)

DOLAR_COMERCIAL_VARIACAO = valores(5)

DOLAR_PARALELO_COMPRA = valores(7)

DOLAR_PARALELO_VENDA = valores(8)

DOLAR_PARALELO_VARIACAO = valores(9)

DOLAR_TURISMO_COMPRA = valores(11)

DOLAR_TURISMO_VENDA = valores(12)

DOLAR_TURISMO_VARIACAO = valores(13)

PTAX_COMPRA = valores(15)

PTAX_VENDA = valores(16)

PTAX_VARIACAO = valores(17)

' Fim coloca os valores nas variaveis

%>

(2) MAIS FACIL tem a parte de noticias se não quiser tira

<tr>

<td bgcolor="#FFFFFF" bordercolor="#000066" width="248">

<div align="center"><a href="http://www.estadao.com.br/economia" target="index"><img src="http://www.estadao.com.br/economia/ticker/taxasPt0.gif" border="0" width="200" height="70"></a></div>

</td>

<td bgcolor="#FFFFFF" bordercolor="#000066" width="231">

<div align="center"><a href="http://www.estadao.com.br/agestado/" target="_blank"><img src="http://www.estadao.com.br/redacao1/MarqueeD.gif" width="235" height="23" border="0"></a></div>

</td>

</tr>