por favor, preciso da ajuda de vocês.
Eu tenho um código para preencher os campos da internet (usuario e senha), porém de um tempo para cá não consigo mais o mesmo resultado e aparentemente não houve nenhuma mudança no site... bom, certamente houve, porém não consigo reparar...
aqui segue a parte do código que funcionava:
Código: Selecionar todos
Set IE = New InternetExplorer
IE.Visible = False
IE.Navigate "http://webprd/siiweb/paginas/detect.jsf"
On Error Resume Next
Do
Loop While IE.Busy Or IE.ReadyState <> READYSTATE_COMPLETE
IE.Document.all("j_username").innerText = "USUARIO"
IE.Document.all("j_password").innerText = "SENHA"
'obtém o forma a qual o controle de login pertence para submetê-lo
IE.Document.forms(0).submit
Aqui o código fonte da página:
Código: Selecionar todos
</div>
<div class="linha">
<div class="coluna" style="width:30%;">
<div class="linha">
<label for="registro">Chave:</label>
<input type="text" name="j_username" class="ui-inputfield ui-inputtext ui-widget ui-state-default ui-corner-all"/>
</div>
<div class="linha">
<label for="senha">Senha:</label>
<input type="password" name="j_password" class="ui-inputfield ui-inputtext ui-widget ui-state-default ui-corner-all"/>
</div>
<div class="linha">
<button type="submit" style="margin-left:44px" class="ui-button ui-widget ui-state-default ui-corner-all ui-button-text-only">
<span class="ui-button-text ui-c">Acessar</span>
</button>
</div>
</div>