zudugreen

Então primeiramente queria saber como faço para testar se um site esta navegando , se realmente a pagina abriu e tbm Queria que uma janela ficasse ativa na tela fazendo os testes , quando a conexão cair apareceria off line quando estive comunicando apareceria on line

Boa Tarde estou fazendo um robo para testar a conexão de internet e a navegação porem queria criar uma janela com os resultados on line e também como faço para checar se realmente aquele site esta navegando: fiz esse codigo ele testa a conexão depois abre o navegador: #include <MsgBoxConstants.au3> #include <IE.au3>   Example()   Func Example()    Global $cont = 0   while $cont < 4       Local $iPing = Ping("www.globo.com",5000)       If $iPing Then ; comunicação ok   Local $oIE = _IECreate("www.globo.com", 1) ; Check @extended return value to see if attach was successful           _IEQuit ($oIE)     Else         $cont = $cont +1 EndIf     WEnd   while $cont > 4  MsgBox ($MB_SYSTEMMODAL, "", " Sem Acesso " & $iPing & ".")    WEnd     EndFunc   ;

Valew mano mais o estranho é que esta abrindo primeiro a msbox com a informação de tempo e em seguida abre a janela. queria fazer uma forma que a janela abra e depois apareça a mensagem de tempo. eu coloquei um sleep com a variavel do tempo não esta funcionando ela abre antes. Login () Func Login() Run ("C:\Program Files (x86)\SAP\FrontEnd\SAPgui\saplogon.exe", "", @SW_MAXIMIZE) ;Abrir SapLogon local $timer = TimerInit() Local $sec = TimerDiff($timer) WinWaitActive("[sAP Logon 730]") ;espera o tempo para executar os comandos Sleep($sec) Send("{down}") Send("{down}") Send("{ENTER}")

Ola Pessoal Então eu estou com duvida para fazer o calculo de quanto tempo uma determinada janela abre, quero saber o tempo de resposta a cada janela que for aberta eu fiz esse Código porem ele retorna o valor antes da janela abrir alguém pode me ajudar Run ("C:\Program Files (x86)\SAP\FrontEnd\SAPgui\saplogon.exe", "", @SW_MAXIMIZE) ;esperar a janela abrir e calcular o tempo local $timer = TimerInit() Local $sec = TimerDiff($timer) WinWaitActive("[sAP Logon 730]") MsgBox("Tempo", "Time Difference", $sec)