Servidor on-line

Olá,

Aguém conhece alguma função que verifique
se o servidor está on-line e/ou o SQL Server rodando?

Exite uma função que uso para o Firebird que verifica se uma porta está aberta.

Alguém conheçe outro método?

Obrigado.