Comando para verificar se há conexão com a internet

---

Comando para verificar se há conexão com a internet

---

Muitas vezes, antes de enviarmos um comando que faça acesso a Internet, é conveniente verificar se a conexão está ativa, para não exibir uma mensagem "pouco amigável" para  o usuário. O código abaixo faz esta verificação:
ResConnection = InternetConnected()
IF ResConnection = True THEN
//Executa a sua rotina
ELSE
Info("Não existe conexão com a Internet. O programa não pode continuar")
END

---

http://www.pedrosoinformatica.com.br/

---

---