PDA

Ver la Versión Completa : Error de Conexión en MSSQL con DBExpress


mongiel
18-06-2015, 00:26:38
Buen día tengo un problema al configurar la conexión, me marca error, alguien me puede indicar donde esta mi error?
Ya he tratado de poner el codigo en create pero y me da el mismo error.

procedure THiloProc1.Execute;
begin
try

SQLConnec1 := TSQLConnection.Create(Nil);
SQLConnec1.DriverName := 'MSSQL';
SQLConnec1.ConnectionName := 'MSSQLConnection';
SQLConnec1.GetDriverFunc := 'getSQLDriverMSSQL';
SQLConnec1.Params.Values['DriverName'] := 'MSSQL';
SQLConnec1.Params.Values['HostName'] := '192.168.6.128';
SQLConnec1.Params.Values['USER_NAME'] := 'sa';
SQLConnec1.Params.Values['PASSWORD'] := 'Int12';
SQLConnec1.Params.Values['DataBase'] := 'PruebaCLZ';
SQLConnec1.VendorLib := 'sqlncli10.dll';
SQLConnec1.LibraryName := 'dbxmss.dll';
SQLConnec1.LoginPrompt := false;
SQLConnec1.Connected := True;
// Label1.Caption := 'Conectado a la base de datos'
except
// Label1.Caption := 'No se pudo conectar.'
end;
end;

Casimiro Notevi
18-06-2015, 01:21:16
¿Qué error es?
:rolleyes:

olbeup
18-06-2015, 08:50:12
Buen día tengo un problema al configurar la conexión, me marca error, alguien me puede indicar donde esta mi error?
Ya he tratado de poner el codigo en create pero y me da el mismo error.

procedure THiloProc1.Execute;
begin
try

SQLConnec1 := TSQLConnection.Create(Nil);
SQLConnec1.DriverName := 'MSSQL';
SQLConnec1.ConnectionName := 'MSSQLConnection';
SQLConnec1.GetDriverFunc := 'getSQLDriverMSSQL';
SQLConnec1.Params.Values['DriverName'] := 'MSSQL';
SQLConnec1.Params.Values['HostName'] := '192.168.6.128';
SQLConnec1.Params.Values['USER_NAME'] := 'sa';
SQLConnec1.Params.Values['PASSWORD'] := 'Int12';
SQLConnec1.Params.Values['DataBase'] := 'PruebaCLZ';
SQLConnec1.VendorLib := 'sqlncli10.dll'; <-- Cambialo por 'oledb'
SQLConnec1.LibraryName := 'dbxmss.dll'; <-- Cámbialo por 'dbexpmss.dll'
SQLConnec1.LoginPrompt := false;
SQLConnec1.Connected := True;
// Label1.Caption := 'Conectado a la base de datos'
except
// Label1.Caption := 'No se pudo conectar.'
end;
end;


Abras declarado la variable SQLConnec1 en algún sitio.

Un saludo.

P.D.: Según el enunciado has puesto MYSQL pero en realidad es para MSSQL