Chequear conexion a sql

[[BlueSteel]]

Empezado por oesqueda

Paso una funcion para que revises si esta conectado tu TADOConnection.

Código Delphi [-]Function ConectarDB(var AMsg:string):boolean; begin try ADOConnection.CLOSE; ADOConnection.connectionstring = 'CADENA DE CONEXION'; ADOConnection.OPEN; AMsg := ''; except on e: exception do AMsg := e.message; end; result := ADOConnection.Connected; end;


Pasas la variable AMSG y ahi obtienes el mensaje en caso de no conectarse.

Esta buena esta funciona... tambien me sirve...

Salu2