Fórum conectar meu banco de dados em ACCESS via código #559854

03/08/2016

0

Boa tarde pessoal!

Como faço para conectar meu banco de dados em ACCESS via código?
Mailson Janoca

Mailson Janoca

Responder

Post mais votado

03/08/2016

O que você tem pronto ?
Onde está localizado seu BD rede ou local ?

Raimundo Pereira

Raimundo Pereira
Responder

Gostei + 1

Mais Posts

03/08/2016

Augusto Angelim

Depende do tipo de conexão!
No caso abaixo fiz uma conexão via ODBC (32 bits)

procedure TForm1.Button1Click(Sender: TObject);
begin
  db := TADOTable.Create(Self);
  //
  db.ConnectionString := 'Provider=MSDASQL.1;Persist Security Info=False;Data Source=spdata';
  db.TableName        := 'Countries';
  //
  DataSource1.DataSet := db;
  //
  db.Active := TRUE;
  //
end;


Tem um exemplo aqui em "Exemplos PSCL" ---> "7 - ScriptComAccessMDB.PSCL" (server no Delphi)
www.minhaweb2.com
Responder

Gostei + 0

03/08/2016

Mailson Janoca

Boa noite

só falta a conexão com o banco de dados e o BD é local .
Responder

Gostei + 0

04/08/2016

Raimundo Pereira

Bom dia,
Nas aplicações que usei BD ACESS, sempre uso o arquivo .UDL para conexão com o banco de dados.

Esse arquivo UDL ficará com o padrão sempre na pasta do EXE da aplicação.

1. Ao carregar sua aplicação você verifica a existência do arquivo UDL, se existir basta conectar

Com isso se precisar alterar o tipo de conexão local para rede basta alterar no arquivo UDL.

Se precisar de um exemplo passe seu email.
Responder

Gostei + 0

04/08/2016

Natanael Ferreira

Para BD Access eu utilizo componentes ADO da palheta dbgo.

Veja um exemplo de conexão em runtime no evento OnCreate do DataModule:

Deixe seu BD Access na mesma pasta do seu exe.

procedure TDM.DataModuleCreate(Sender: TObject);
var
  BD: string;  
begin
  With ADOConnection1 do
  Begin
    Connected := False;

    BD := ExtractFilePath(Application.ExeName) + 'BD.MDB'; //Troque pelo nome do seu BD
 
    ConnectionString := 'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=' + BD +
      ';Persist Security Info=False';

    Connected := True;
  End;
end;
Responder

Gostei + 0

30/08/2019

Marco Antonio

Olá amigos.
tenho um sistema em access dividido em sua partes, back-end que contém as tabelas de dados e um banco de dados front-end que contém todos os demais objetos de banco de dados, como consultas, formulários e relatórios.
Como criar um caminho de rede em código(onde coloco esse código? em um formulário?) para conectar meu banco de dados access.
Desde já Agradeço!
Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar