Kompatibilität

[jensw_2000]

@LkZ

Zitat:

"Provider=Microsoft.Jet.OLEDB.4.0;User ID=Admin;Data Source=C:\Projekts\CHEMIE_datenbank\Data.mdb;Mode=ReadWrite;Extended Properties="";Jet OLEDB:System database="";Jet OLEDB:Registry Path="";Jet OLEDBatabase Password=offbyte;Jet OLEDB:Engine Type=5;Jet OLEDBatabase Locking Mode=1;Jet OLEDB:Global Partial Bulk Ops=2;Jet OLEDB:Global Bulk Transactions=1;Jet OLEDB:New Database Password="";Jet OLEDB:Create System Database=False;Jet OLEDB:Encrypt Database=True;Jet OLEDBon't Copy Locale on Compact=False;Jet OLEDB:Compact Without Replica Repair=True;Jet OLEDB:SFP=False"

Damit setzt du ja voraus, das alle User dein Programm in "C:\Projekts\CHEMIE_datenbank\" installieren.

Wenn du den gesammten Connectionstring speichern willst, dann musst du im TAdoConnection.WillConnect prüfen, ob die data.mdb die im CS angegeben ist, auch wirklich im dem Pfad steht, und falls nicht, den CS ggf. abändern ...
" ExtractfilePath(application.Exename)+'\Data.mdb' "

Warum willst du das überhaupt in die Registry schreiben und dann wieder laden ?


gib doch einfach im TAdoConnection.Willconnect (...) folgendes ein

Connectionstring:=ExtractfilePath(application.Exen ame)+'\Data.mdb' ;
Das passt immer