Pou₧itφ Data Environment Designeru ve VB 6.0
V jednom z p°edchozφm dφlu jsem upozor≥oval na to, ₧e datovΘ prost°edφ si pamatuje cestu k databßzi, kterou jste pou₧ili p°i v²voji aplikace a pokud aplikaci nainstalujete do jinΘho adresß°e, generuje chybu. Je proto nutnΘ cestu k databßzi nastavit programov∞.
Nastavenφ novΘ cesty k databßzi je nejv²hodn∞jÜφ provΘst p°i inicializaci datovΘho stroje. Otev°ete si datovΘ prost°edφ v projektu a ve stromu dvakrßt klikn∞te na znaΦku datovΘho stroje (root node). Otev°e se okno k≤du pro proceduru DataEnvironment_Initialize. Sem napiÜte STOP a spus¥te projekt. A₧ se aplikace stopne, do okna Immediate (CTRL+G) si nechte vypsat °et∞zec p°ipojenφ pomocφ p°φkazu:
?de.Cnn.ConnectionString
M∞lo by se vßm vypsat zhruba n∞co takovΘhleho:
Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Inetpub\wwwroot\serialy\Projekty\de1\de.mdb;Persist Security Info=False
Podstatn² je °et∞zec Data Source - urΦuje cestu k databßzi. Tak₧e cel² °et∞zec vesele zm∞nφme tak, aby si datovΘ prost°edφ bralo databßzi z aktußlnφ adresß°e, kde je ulo₧ena aplikace:
De.Cnn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" + App.Path + "\de.mdb;Persist Security Info=False"
Zp∞tnΘ lomφtko p°ed nßzvem databßze mß svΘ opodstatn∞nφ, proto₧e p°φkaz App.Path sice vrßtφ aktußlnφ cestu, ale bez zp∞tnΘho lomφtka, Φili je ho tam t°eba p°idat. Pokud mßte vÜe korektn∞ zapsßno, demoprojekt by m∞l fungovat stejn∞, jenom si umφ vzφt databßzi z aktußlnφ cesty. Samoz°ejm∞ by bylo vhodnΘ si p°edem oÜßhnout, zda se databßze v∙bec v adresß°i urΦenΘm App.Path nachßzφ (co₧ je obzvlßÜt∞ d∙le₧itΘ p°i psanφ sφ¥ov²ch aplikacφ). DoporuΦuji to ud∞lat v procedu°e Main v modulu, p°i startu aplikace jeÜt∞ d°φve, ne₧ v∙bec n∞jak² po₧adavek na datovΘ prost°edφ poÜlete. Na zßklad∞ v²sledku dotazu na existenci databßze se m∙₧ete rozhodnout, zda pokraΦovat, Φi nikoliv. Mßm vyzkouÜeno, ₧e datovΘ prost°edφ si klidn∞ vezme i cestu ze sφt∞, nemusφte tedy p°edtφm p°ipojovat sφ¥ov² disk.