Hallo,
ich habe eine Datenbank, die in Front- und Backend getrennt ist. Die Tabellen des Backends sind mit dem Frontend verknüpft.
Dummerweise speichert Access den kompletten Pfad der Verknüpfung. Da ich die Datenbank weitergebe, suche ich nun nach einem Weg, wie die Verknüpfungen per Programm wieder auf einen bestimmten Pfad aktualisieren kann.
Danke Peter
Hallo Peter,
vielelicht hilft Dir das hier ein wenig weiter …
http://www.kurt-aus-kienitz.de/knowhow/access/Beispi…
Verweise sichern / restaurieren
http://www.kraasch.de/vba039.htm
UNC-Pfad aus Laufwerksbuchstaben ermitteln
http://www.kraasch.de/vba006.htm
Funktion, die für eingebundene Tabellen die Herkunfts-Datenbank zuückgibt:
Function TabellenHerkunftsDB(TableName As String)
'-------------------------------------------------
' Funktion, die für eingebundene Tabellen die
' Herkunfts-Datenbank zuückgibt
'-------------------------------------------------
On Error GoTo Fehler
Dim db As Database
Dim pf As String
Set db = CurrentDb()
pf = db.TableDefs(TableName).Connect
TabellenHerkunftsDB = Right(pf, Len(pf) - \_
(InStr(1, pf, "DATABASE=") + 8))
Ende:
Exit Function
Fehler:
If Err = 5 Then
TabellenHerkunftsDB = "Interne Tabelle!"
Resume Ende
End If
MsgBox Err.Description, 16, "Fehler"
End Function
Quelle: http://www.access-home.de/
gruss
moritzbock
[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]