access mit ado.net

[mavi099]

hallo,

bin ein absoluter newbie, ich hoffe ihr könnt mir helfen meinen horizont zu erweitern

möchte mit meiner anwendung auf eine lokale access2000 datenbank zugreifen, dies ist mein Code:

constructor frmHoseChoice.Create;

var connStr,selStr :System.String;
conn:OleDbConnection;
da:OleDbDataAdapter;
dsataset;
dtataTable;
i:Integer;
rwataRow;
sl:system.String;
pfadA:system.String;
Error:Boolean;
begin
inherited Create;
//
// Erforderlich für die Unterstützung des Windows Forms-Designers
//
InitializeComponent;
//
// TODO: Fügen Sie nach dem Aufruf von InitializeComponent Konstruktorcode hinzu.

//with openfiledialog1 do
// begin
// initialdirectory:=application.ExecutablePath;
// defaultext:='mdb';
// filter:='Access Files (*.mdb)|*.mdb|Alle Dateien (*.*)|*.*';
// if ShowDialog()=System.Windows.Forms.DialogResult.OK then pfadA:= FileName;
//end;


connStr :='Provider=Microsoft.Jet.OLEDB.4.0;'
// + 'DataSource=C:\workdir\delphi\SchlauchmontageProgr amm';
+ 'DataSource=.\HoseDatabase.mdb';
conn:=OleDbConnection.Create(connStr);
ds:=Dataset.Create;
selStr:='SELECT tbHose.HoseType ' +
'FROM tbHose;';
da:=OleDbDataAdapter.Create(selStr,conn);

try
conn.Open;
da.Fill(ds);
conn.Close;
except
on ex:Exception do
begin
MessageBox.Show(ex.Message);
Error:=TRUE;
end;
end;

if not Error then
begin
dt:=ds.Tables['Schlauchliste'];

for I := 0 to dt.Rows.Count - 1 do
begin
rw:=dt.Rows[i];
sl:=rw['Schlauchliste'].ToString;
HoseListBox.Items.Add(sl)
end;
end;

das problem ist, wenn ich diese anwendung ausführe kommt folgende Meldung:
"Installierbares ISAM nicht gefunden",
hab schon rumgegoogelt, aber keine brauchbare antwort gefunden, überall stand
nur, dass der connection-string nicht passt, jedoch kann ich hier keinen fehler finden,
die datenbank liegt eine ebene über dem projekt