![]() |
Datenbank: access • Version: 2000 • Zugriff über: ADO
access mit ado.net
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; ds:Dataset; dt:DataTable; i:Integer; rw:DataRow; 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 |
Alle Zeitangaben in WEZ +1. Es ist jetzt 04:19 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz