Executar Script Via Delphi
08/02/2010
0
Uso o Sql Server 2008 Express.
desde já agradeço.
Carlos
Posts
13/02/2010
Perivaldo Martins
13/02/2010
Tiago Melo
03/03/2010
Eleuterio Gonzalez
exemplo no evento create do form
procedure TForm1.FormCreate(Sender: TObject);
var
caminho, arquivo : string;
begin
//nome do banco de dados
arquivo := 'banco.mdb';
//local do banco de dados. aqui extraio a pasta do meu programa, seje onde ele estiver, se o banco estiver lá dentro, ele pegará de lá.
Caminho := ExtractFilePath(Application.ExeName);
//No meu componente de conexao com ADO, essa é a seguinte string de conexão com Access
conexao.ConnectionString := 'Driver={Microsoft Access Driver (*.mdb)};' + 'Dbq='+ arquivo +'; DefaultDir=' + caminho;
//chama conexao com o banco (conecta)
conexao.Open;
end;
Clique aqui para fazer login e interagir na Comunidade :)