Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- On Error GoTo Erro
- namePdf = doc3.Document.all.tags("font")(8).innerText
- For Each exibirDoc In doc2.Document.all.tags("img")
- ver = exibirDoc.src
- If ver = "https://pan.interfile.com.br/imagens/FileSearch.gif" Then
- exibirDoc.Click
- Exit For
- End If
- Next
Add Comment
Please, Sign In to add comment