suporte / componentes asp

O AspPing é um componente para testes ICMP. Tem basicamente a mesma funcionalidade da versão do comando de ping do DOS. Altere o campo seudominio.com.br para o nome do domínio que deseja executar o comando PING. Em Pinger.PingCount é possível alterar o número de testes a serem feitos. Em nosso exemplo, está configurado dois testes sobre o domínio.

Código ASP:

<!-- Início ASP --->

<%
Set Pinger = Server.CreateObject("AspPing.Conn")
Pinger.RemoteHost = "seudominio.com.br"
Pinger.PingCount = 2
Response.Write "<pre>" & Pinger.Ping & "</pre>"
Set Pinger = nothing
%>

<!-- Fim ASP --->