Prikazi cijelu temu 15.04.2014 22:37
zxz Van mreze
Administrator
Registrovan od:03.02.2009
Lokacija:Tuzla


Predmet:Re: put za backup podataka
Citat:
za backup podataka koristim slijedecu funkciju
medjutim, kad pozivam call Compact_MDB imam problema sa putanjom ...dbPath1 = "D:\apoteka\2014\podaci"...
naime kad su podaci na particiji C:\,E;\ ili nekoj drugoj moram praviti novu mde sa izmjenom putanje

pitanje je mogu li se u ovom istom modelu koristiti sve particije u jednoj-istoj mde.

neznam sta ti ovo znaci kada su ti podaci na nekoj drugoj particiji i zasto je tako.
ja sam ti samo htio prepraviti tvoju proceduru da mozes pri pozivu mijenjati putanju i jednu i drugu ne ulazeci u sustinu i racunajuci da ce te to zadovoljiti.
imas ovo u kodu:

dbPath = Application.CurrentProject.path'-> putanja aplikacije vjerovatno ali ne i podataka pa i neznam zasto ce ti ako su podaci linkovani iz neke druge baze.
dbPath1 = "D:\apoteka\2014\podaci"
-->Pretpostavljam putanja podataka do baze se podacima ali bez imena baze.
OldDbName = "apoteka2014_be" & ".mdb" 'ime splitovane baze podataka
NewDbName = "apoteka2014_be" & ".mdb" 'ime splitovane baze podataka Neznam zasto novo i staro ime isto i zbog toga i nemozes da uradis kompakt kodom.

DbBackup = Mid(OldDbName, 1, Len(OldDbName) - 4) & "_" & Format(Date, "ddmmyyyy") & ".mdb"
Ovo je ime backup baze
Citat:
CommandBars("Menu Bar"). _
Controls("Tools"). _
Controls("Database utilities"). _
Controls("Compact and repair database..."). _
accDoDefaultAction
ovo je iz komand bara

I sad imas ovo za kopiranje bat+ze odnosno backup
fs.CopyFile dbPath & "\" & OldDbName, dbPath1 & "\" & DbBackup

I ovo ce odraditi ako upises u dbpath napri pozivu procedure putanju do tvoje be baze a u dbpath1 putanju gdje zelis smjestiti backup.

Ovaj kod ti je poprilicno komplikovan ima negdje moj kod koji ima zasebno kompak i backup pa se lakse snalazi.
Podrška samo putem foruma, jer samo tako i ostali imaju koristi od toga.