É só colocar antes do SqlConect() when sqlerro:

 

Ex:

When SqlError

   Call SalMessageBox( 'Falha na conexão ao banco!', 'Erro! ', MB_Ok )

   Call SalQuit()

Call SqlConnect( hSqlGeral )

 

Luis Fernando Minoru Saito

Tecnologia de Informação

 

Tel: (55 11) 3078-1755

Cel: (55 11) 7807-7740

HYPERLINK "mailto:[EMAIL PROTECTED]"[EMAIL PROTECTED]

 

SCA Systema Consultores Associados

visite o website HYPERLINK
"http://www.scasystema.com.br/"http://www.scasystema.com.br 

 

   _____  

De: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] Em nome
de hotmail
Enviada em: quarta-feira, 17 de janeiro de 2007 11:43
Para: sqlwin@virtualand.net
Assunto: Re: ENC: [sqlwin] Tamanho do Papel - Windows X QRP

 

Alguem sabe se tenho como exibir uma tela de erro própria e não a do centura
na hora de conectar ao banco de dados?

 

Krause Melo


--
No virus found in this incoming message.
Checked by AVG Free Edition.
Version: 7.5.432 / Virus Database: 268.16.13/632 - Release Date: 16/01/2007
16:36



-- 
No virus found in this outgoing message.
Checked by AVG Free Edition.
Version: 7.5.432 / Virus Database: 268.16.13/632 - Release Date: 16/01/2007
16:36
 

Responder a