|
WX - Cotação do Dolar e do Euro Hoje |
Iniciado por adrianoboller, mai., 01 2015 9:12 PM - 3 respostas |
| |
| | | |
|
| |
Membro registado 3.655 mensagems Popularité : +175 (223 votes) |
|
Publicado em maio, 01 2015 - 9:12 PM |
Resultado is string posicaoInicial, nPosicaoFinal is int = 0 ok is boolean = False
ok = HTTPRequest(EDT_UrlEuro) IF ok = True THEN
Resultado = HTTPGetResult(httpResult) posicaoInicial = PositionOccurrence(Resultado,"O euro tá R$ ",firstRank,FromBeginning) + Length("O euro tá R$ ") EDT_ValorEuro = Middle(Resultado,posicaoInicial,4) END
ok = HTTPRequest(EDT_UrlDolar) IF ok = True THEN
Resultado = HTTPGetResult(httpResult) posicaoInicial = PositionOccurrence(Resultado,"O dólar tá R$ ",firstRank,FromBeginning) + Length("O dólar tá R$") EDT_ValorDolar = Middle(Resultado,posicaoInicial,4) END
|
| |
| |
| | | |
|
| | |
| |
Membro registado 3.655 mensagems Popularité : +175 (223 votes) |
|
Publicado em maio, 01 2015 - 9:14 PM |
| |
| |
| | | |
|
| | |
| |
Membro registado 3.655 mensagems Popularité : +175 (223 votes) |
|
Publicado em maio, 01 2015 - 9:14 PM |
| |
| |
| | | |
|
| | |
| |
Membro registado 3.655 mensagems Popularité : +175 (223 votes) |
|
Publicado em maio, 01 2015 - 9:18 PM |
Procedure CotacaoEuroDolar()
Resultado is string posicaoInicial, nPosicaoFinal is int = 0 ValorEuro, ValorDolar is string ok is boolean = False
ok = HTTPRequest("http://eurohoje.com/") IF ok = True THEN
Resultado = HTTPGetResult(httpResult) posicaoInicial = PositionOccurrence(Resultado,"O euro tá R$ ",firstRank,FromBeginning) + Length("O euro tá R$ ") ValorEuro = Middle(Resultado,posicaoInicial,4) END
ok = HTTPRequest("http://dolarhoje.com/") IF ok = True THEN
Resultado = HTTPGetResult(httpResult) posicaoInicial = PositionOccurrence(Resultado,"O dólar tá R$ ",firstRank,FromBeginning) + Length("O dólar tá R$") ValorDolar = Middle(Resultado,posicaoInicial,4) END |
| |
| |
| | | |
|
| | | | |
| | |
|