Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.

Ispis linka do tabele u bazi

[es] :: Access :: Ispis linka do tabele u bazi

[ Pregleda: 177 | Odgovora: 2 ] > FB > Twit

Postavi temu Odgovori

Autor

Pretraga teme: Traži
Markiranje Štampanje RSS

blingaro
Igor Malinkov
Uprava prihoda
Beograd

Član broj: 187756
Poruke: 83
87.116.162.*



+2 Profil

icon Ispis linka do tabele u bazi13.05.2024. u 16:51 - pre 10 dana i 6h
Imam jednu FE bazu koju koristi više korisnika na svojim računarima. FE baze je po potrebi linkovan na zasebne BE tabele (kod svakog korisnika u odabranom folderu). Kako da mi u formi (Forma1) ispiše putanju do trenutno linkovane BE tabele na koju je nakačen FE baze?

Za putanju do baze koja se koristi imam kod

Function AppName() As String
AppName = CurrentDb.Name
End Function

Hteo bih da mi se putanja do trenutno aktivne BE baze ispiše u zadatom polju (Putanja do tabele), npr. C:\Users\Aleksa\AccessBaze\BazaBe.accdb
Prikačeni fajlovi
 
Odgovor na temu

djux66
Beograd

Član broj: 66577
Poruke: 77
*.amres.ac.rs.

Sajt: www.mmveriga.co.rs


+9 Profil

icon Re: Ispis linka do tabele u bazi14.05.2024. u 13:08 - pre 9 dana i 9h
Code:
Function LinkedDatabase() As String
    LinkedDatabase = Nz(DLookup("[MSysObjects]![Database]", "MSysObjects", "[MSysObjects]![Type] = 6"), "")
End Function

 
Odgovor na temu

blingaro
Igor Malinkov
Uprava prihoda
Beograd

Član broj: 187756
Poruke: 83
87.116.167.*



+2 Profil

icon Re: Ispis linka do tabele u bazi14.05.2024. u 17:50 - pre 9 dana i 5h
Citat:
djux66
Code:
Function LinkedDatabase() As String
    LinkedDatabase = Nz(DLookup("[MSysObjects]![Database]", "MSysObjects", "[MSysObjects]![Type] = 6"), "")
End Function


Majstore djux66, hvala.
 
Odgovor na temu

[es] :: Access :: Ispis linka do tabele u bazi

[ Pregleda: 177 | Odgovora: 2 ] > FB > Twit

Postavi temu Odgovori

Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.