pegar valores do dolar

[raphanasc 0]

Ola,Preciso pegar o valor de venda do dolar comercial e paralelo do dia... alguem sabe?

[jrcardozo 4]

veja no laboratório de scripts, caso queira fazer um pode usar xmlhttp pra pegar os dados de algum site. Se tiver algum webservice oferecendo o serviço vai depender de como retornam os dados, normalmente vem por xml

[Ted k' 126]

Amigo tem tópico que ajudei um colega com isso

 

olha o link æ

http://forum.imasters.com.br/index.php?sho...ta%E7%E3o+dolar

[raphanasc 0]

nesse script eu ele ja me retorna o do paralelo, tem como pegar o do comercial também?

[raphanasc 0]

Opa... a idea que vcs me deram me serviu...

dai eu achei um script que usava o ASPHTTP, dei uma alterada pra usar o XMLHTTP, e o script pega tds os dolares (turismo, paralelo e comercial)

segue o codigo ai pra quem quiser!!!

<%'instanciando objetoSet objxml = Server.CreateObject("Microsoft.XMLHTTP") 'abrindo paginaobjxml.open "GET", "http://www.investshop.com.br/mer/include/Dolar.csv", false objxml.send()cotacao = objxml.ResponseTextcotacoes = replace(cotacao,"Nome;Compra;Venda;Variacao","") ' Tira a primeira parte que eh lixo' Coloca Valores em uma ArrayDim valores()Dim cont, cont_valoresFor 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 variaveisDOLAR_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)' Fim coloca os valores nas variaveis'Destruindo o Objeto ASPHTTPSet HttpObj = Nothingresponse.Write("dolar comercial compra:") response.Write(DOLAR_COMERCIAL_COMPRA &"<br />")response.Write("dolar comercial venda:") response.Write(DOLAR_COMERCIAL_VENDA &"<br />")response.Write("dolar paralelo compra:") response.Write(DOLAR_PARALELO_COMPRA &"<br />")response.Write("dolar paralelo venda:") response.Write(DOLAR_PARALELO_VENDA &"<br />")response.Write("dolar turismo compra:") response.Write(DOLAR_TURISMO_COMPRA &"<br />")response.Write("dolar turismo venda:")response.Write(DOLAR_TURISMO_VENDA &"<br />")%>

[Ted k' 126]

Muito bom cara.....

 

Por que você ñ posta lá no Laboratório para ajudar outros usuários?