Centar za edukaciju-BiH



#1 07.01.2012 10:54
miro35 Van mreze
Clan
Registrovan od:05.01.2009
Postovi:608


Predmet:Linkovanje na bazu preko mreže
Imam neke aplikacije koje rade preko mreže.Kod otvaranja nove godine moja aplikacija kreira bazu 2011.Imam u kodu jedan dio koji pronađe koja je putanja do te baze.Ja imam lokalno ovaj kod:
Me.BazaLink = (CurrentProject.path)
E kako ovu putanju dobiti za mrežu
Znači da mi nađe i upiÅ¡e u polje u formi putanju do baze koja je namrežnom računalu:
Me.BazaLink = ?
Miro
↑  ↓

#2 07.01.2012 11:21
zxz Van mreze
Administrator
Registrovan od:03.02.2009
Postovi:10,642


Predmet:Re: Linkovanje na bazu preko mreže
Evo ovo vazi samo ako su tabele linkovane na jednu bazu.
Ako imas link na vise baza jednovremeno onda imas i vise putanja pa bi kod bio malo drugaciji.

PreuzmiIzvorni kôd (Visual Basic):
  1. Function PutanjaLInka()
  2. Dim Db As Database
  3. Dim Rs As Recordset
  4. Dim SQL As String
  5.  
  6. SQL = "SELECT TOP 1 Database FROM MSysObjects " _
  7. & "WHERE Database Is Not Null"
  8.  
  9. Set Db = CurrentDb
  10.  
  11. Set Rs = Db.OpenRecordset(SQL)
  12. If Rs.RecordCount > 0 Then
  13. PutanjaLInka = Rs.Fields(0)
  14. Else
  15. MsgBox "Nema linkovanih tabela"
  16. End If
  17. End Function

Podrska samo putem foruma, jer samo tako i ostali imaju koristi od toga.
↑  ↓

#3 07.01.2012 15:19
zxz Van mreze
Administrator
Registrovan od:03.02.2009
Postovi:10,642


Predmet:Re: Linkovanje na bazu preko mreže
Me.BazaLink = PutanjaLInka
Podrska samo putem foruma, jer samo tako i ostali imaju koristi od toga.
↑  ↓

Stranice (1):1


Sva vremena su GMT +01:00. Trenutno vrijeme: 12: 30 am.