[MSAccess] Zugriff ohne User nur Pass

[Harry M.]

Danke

Hab das Prob wiefolgt gelöst:

Delphi-Quellcode:

var
  sConnectionStr: AnsiString;
begin
  sConnectionStr := 'Provider=Microsoft.Jet.OLEDB.4.0;';
  sConnectionStr := sConnectionStr + 'Jet OLEDB:Database Password="passwort";';
  sConnectionStr := sConnectionStr + 'Data Source=C:\database.mdb;';
  sConnectionStr := sConnectionStr + 'Persist Security Info=True';
  Form1.ADOTable1.ConnectionString := sConnectionStr;
  Form1.ADOTable1.TableName := 'FieldName';
  Form1.ADOTable1.Active := True;
end;