Como tratar erro de conexão com SQL

Pessoal, alguem sabe como tratar erro de conexão em SQL sem apresentar erro em tela.
Atualmente utilizo ADO, mas não sei como tratar e se tem como nesse metódo.

Rodrigo, Boa tarde. Blz.

Tem como vc postar o código para eu ver se consigo te ajudar?

Att.,

Caso o servidor esteja fora do ar, ele apresenta erro no metodo open. Queria evitar esse erro em tela para eu tratar via Progress.

Código:

define variable chConnection        as com-handle no-undo.
define variable chCommand           as com-handle no-undo.

create "ADODB.Connection" chConnection.
create "ADODB.Command" chCommand.

/* >>> Com Usuário da Rede */
/* chConnection:Open ("Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=<<banco>>;Data Source=<<nome_host>>" ,,,).  */
/* >>> Com Usuário Informado */
chConnection:Open ("Provider=SQLOLEDB.1;Persist Security Info=False;Initial Catalog=<<banco>>;Data Source=<<nome_host>>" ,"<<usuário>>","<<senha>>",).

chCommand:ActiveConnection = chConnection.

chConnection:Close no-error.         
release object chConnection no-error.
release object chCommand    no-error.

Orraaa Marcos... é isso mesmo!
Não sabia dessa funcionalidade, vou estuda-la!
Se tiver um exemplo pra postar, melhor ainda.

Obrigado,
Rodrigo