@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 OLEDB
atabase Password=offbyte;Jet OLEDB:Engine Type=5;Jet OLEDB
atabase 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 OLEDB
on'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
