Fórum Install Shield ADO ? #262587
18/12/2004
0
Fiz um programa que atua no banco de dados do access usando o ADO.
Depois, precisei criar o programa de instalação usando o install shield ( a versão que acompanha o borland delphi 7).
O problema é o seguinte : se o usuário durante a instalação modifica a pasta na qual os arquivos serão instalados, o ADOconnection continuará apontando para o path antigo ( aquele usado durante o desenvolvimento ) .
Tenho que arranjar uma forma de fazer com que o componente ADOconnection ( da palheta ADO) receba o path que o usuário - durante uma instalação - venha a escolher.
O path que eu digo é o caminho de onde o arquivo .mdb se encontra.
Ele aparece na propriedade ADOconnection.connetionstring juntamente com um bucado de outras coisas num string só.
Obs.:
( path = caminho, pasta de origem) .
Depois, precisei criar o programa de instalação usando o install shield ( a versão que acompanha o borland delphi 7).
O problema é o seguinte : se o usuário durante a instalação modifica a pasta na qual os arquivos serão instalados, o ADOconnection continuará apontando para o path antigo ( aquele usado durante o desenvolvimento ) .
Tenho que arranjar uma forma de fazer com que o componente ADOconnection ( da palheta ADO) receba o path que o usuário - durante uma instalação - venha a escolher.
O path que eu digo é o caminho de onde o arquivo .mdb se encontra.
Ele aparece na propriedade ADOconnection.connetionstring juntamente com um bucado de outras coisas num string só.
Obs.:
( path = caminho, pasta de origem) .
Rp
Curtir tópico
+ 0
Responder
Posts
18/12/2004
Bon Jovi
Uma das saídas é vc acessar o mdb a partir do mesmo diretório q estiver o executável:
procedure TDataModule1.ADOConnection1BeforeConnect(Sender: TObject);
var
Caminho: string;
begin
Caminho := ExtractFileDir(Application.ExeName) + ´\arquivo.mdb´;
ADOConnection1.ConnectionString :=
´Provider=Microsoft.Jet.OLEDB.4.0;Data Source=´ + Caminho +
´;Persist Security Info=False´;
end;
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)