Criar Alias por codigo
Eu tenho um banco em access com o arquivo: banco.mdb
Como faço criar o alias via codigo ,sem ter q usar o sql explorer ou o painel de controle ?
Obrigado
Como faço criar o alias via codigo ,sem ter q usar o sql explorer ou o painel de controle ?
Obrigado
Anonymous
Curtidas 0
Respostas
Julienmurray
09/04/2003
véio,no baixaqui existe um programinha chamado delphiboy que ensina criar alias em tempo de execução, e se naum me engano no site dele, tem um help com 700 dicas que fala a mesma coisa....
oK?
:twisted: Julien Murray:twisted:
oK?
:twisted: Julien Murray:twisted:
GOSTEI 0
Dor_poa
09/04/2003
Inclua na seção uses: DB
{ se o alias não existir... }
if not Session.IsAlias(´MeuAlias´) then
begin
{ Adiciona o alias }
Session.AddStandardAlias(´MeuAlias´, ´C:\DirProg´, ´MSACCESS´);
{ Salva o arquivo de configuração do BDE }
Session.SaveConfigFile;
end;
Para criar um alias do dBase troque a string ´PARADOX´ por ´DBASE´ ou ´MSACCESS´, e assim vai indo.... No caso acima usei como path o caminho ´C:\DirProg´, mas se você quiser poderá trocar este caminho por ExtractFilePath(ParamStr(0)) para que o alias seja direcionado para o local onde est
{ se o alias não existir... }
if not Session.IsAlias(´MeuAlias´) then
begin
{ Adiciona o alias }
Session.AddStandardAlias(´MeuAlias´, ´C:\DirProg´, ´MSACCESS´);
{ Salva o arquivo de configuração do BDE }
Session.SaveConfigFile;
end;
Para criar um alias do dBase troque a string ´PARADOX´ por ´DBASE´ ou ´MSACCESS´, e assim vai indo.... No caso acima usei como path o caminho ´C:\DirProg´, mas se você quiser poderá trocar este caminho por ExtractFilePath(ParamStr(0)) para que o alias seja direcionado para o local onde est
GOSTEI 0