Como acessar um BD Access via arquivo TXT?
Olá pessoal!
Tenho em meu projeto um DataModule com uma ADOConnection e desejo, ao invés de informar a String Connection no Object Inspector, que o sistema ao ser iniciado busque a string de conexão em um arquivo .TXT. Tem Como?
Desde já agradeço.
Tenho em meu projeto um DataModule com uma ADOConnection e desejo, ao invés de informar a String Connection no Object Inspector, que o sistema ao ser iniciado busque a string de conexão em um arquivo .TXT. Tem Como?
Desde já agradeço.
Vega.x
Curtidas 0
Respostas
Theofernandes
09/04/2003
var
f:TextFile;
str : String;
Begin
AssignFile(f, ´C:\ARQUIVOTEXTO.TXT´);
Reset(f);
readln(f, str);
CloseFile(f);
AdoConnection.ConnectionString := str;
f:TextFile;
str : String;
Begin
AssignFile(f, ´C:\ARQUIVOTEXTO.TXT´);
Reset(f);
readln(f, str);
CloseFile(f);
AdoConnection.ConnectionString := str;
GOSTEI 0
Vega.x
09/04/2003
Valeu [b:127aa8d5af]theoernandes[/b:127aa8d5af]!
GOSTEI 0