[ mustur @ 22.11.2006. 00:34 ] @
Da bi se napravio link iz VBA na dugu .mdb koristi se komanda DoCmd.TransferDatabase, npr.

DoCmd.TransferDatabase acLink, "Microsoft Access", "D:\Baza.mdb", acTable, "Artikli", "Artikli", False, True

Kako da se linkujem na drugu .mdb kada je ista zaštićena paswordom koji ja znam. Odnosno kako da to ostavrim a da ne moram svaki put prilikom linkovanja da ukucavam password. Da li je moguće automatizovati taj proces iz VBA.

Unapred zahvalan
[ Trtko @ 22.11.2006. 14:26 ] @

curp = ";pwd=" + "mojpasvord"
cursetdef="c:\lokal\test.mfb"
Dim db As Database
Set db = DBEngine.Workspaces(0).OpenDatabase(cursetdef, False, False, curpasword)
DoCmd.TransferDatabase acLink, "Microsoft Access", cursetdef, acTable, "radnik", "radnik", False

Eto kako

Pozdrav , Trtko
[ mustur @ 22.11.2006. 21:14 ] @
To je baš to. Hvala na pomoći.