dbExpress com SQL Server 2000

Delphi

29/06/2004

Olá pessoal...

estou migrando minha aplicação que atualmente uiliza SQL Server 2000 com BDE para SQL Server 2000 com dbExpress...

porém logo no início encontrei alguns problemas....


Como faço para identificar o HostName, com um nome diferente do nome do nome da máquina, e o ApplicationName, com o nome de minha aplicação...


estou fazendo da seguinte forma...

var
SQLConnection: TSQLConnection;
begin
SQLConnection := TSQLConnection.Create(self);
try
try
SQLConnection.DriverName := ´MSSQL´;
SQLConnection.GetDriverFunc := ´getSQLDriverMSSQL´;
SQLConnection.KeepConnection := True;
SQLConnection.LibraryName := ´dbexpmss.dll´;
SQLConnection.LoginPrompt := False;
SQLConnection.Name := ´SQLConnection´;
SQLConnection.Params.Values[´Hostname´] := ´Server1´;
SQLConnection.Params.Values[´User_Name´] := ´usuario´;
SQLConnection.Params.Values[´password´] := ´senha´;
SQLConnection.Params.Values[´database´] := ´master´;
SQLConnection.Params.Values[´program_name´] := ´xxx´;
SQLConnection.VendorLib := ´oledb´;
SQLConnection.Open;
showmessage(´conectado!´);
except
on erro: exception do begin
showmessage(´erro: ´+erro.message);
end;
end;
finally
SQLConnection.Free;
end;


O código acima realiza a conexão perfeitamente, porém os parâmetros setados para HostName e ApplicationName, não foram identificados no SQL Server 2000.

Alguém saberia como resolver este problema?


Danielnascimento

Danielnascimento

Curtidas 0
POSTAR