Colegas, boa tarde!

Estou precisando de ajuda com relação ao pacote RCurl.

Tomando por exemplo o endereço <http://hidroweb.ana.gov.br/Estacao.asp?Codigo=2254001>, ao acessá-lo via browser pode-se notar dois botões que executam trechos de código em javascript e geram links para o download de arquivos de dados:

* Botão [Arquivo Access] remete ao comando "javascript:criarArq(2254001,2)"

* Botão [Arquivo Texto] remete ao comando "javascript:criarArq(2254001,1)"

Estou tentando usar o RCurl para passar diretamente os parâmetros para criação do link para o "Arquivo Texto". Isto feito, posteriormente pretendo usar o link gerado para download dos dados. Contudo, não estou tendo sucesso e ficarei muito grato por qualquer ajuda.

Abaixo segue o código que tentei aplicar:

### <BEGIN> ###

library(RCurl)

myURL <- 'http://hidroweb.ana.gov.br/Estacao.asp?Codigo=2254001'

### URL resultante da operação via browser:

### myURL2 <- 'http://hidroweb.ana.gov.br/Estacao.asp?Codigo=2254001&CriaArq=true&TipoArq=1'

myCurl <- getCurlHandle(cookiefile = "myCookies.txt",

useragent="Mozilla/5.0",

verbose = T,

autoreferer = T,

followlocation = T)

myParams <- list(Codigo=2254001, CriaArq='true', TipoArq=1)

### Codigo: ID da estação

### CriaArq: true (executa função?),

### TipoArq: 1 (tipo texto) e 2 (Access)

postForm(myURL, .params=myParams, curl=myCurl)

getURL(myURL, curl=myCurl)

### Operação falha, retornando página original!

### Em caso de sucesso embutiria no código um link no formato:

### <a href="ARQ/A20131008-164720-14/CHUVAS.ZIP">

### <END> ###

Éder Comunello <c omunello.eder@gmail.com>
Dourados, MS - [22 16.5'S, 54 49'W]