Startseite > Tipps & Tricks > Wizhook-Objekt > FullPath
Team-Moeller.de - Datenbankentwicklung und mehr ...

FullPath

FullPath

Access-Versionen

Diese Funktion ist in folgenden Access-Versionen verfügbar: 2000, 2002, 2003, 2007, 2010

Funktion

Wandelt eine relative Pfadangabe in einen absoluten Pfad um.

Deklaration

Function FullPath(RelativePath As String, FullPath As String) As Integer

Argumente

RelativePath   Relativer Pfad
FullPath   Hier wird der absolute Pfad zurückgegeben.

Rückgabewert

True, wenn ein absoluter Pfad zurückgegeben werden kann.
False, wenn kein absoluter Pfad zurückgegeben werden kann,
z.B. wenn als relativer Pfad nichts übergeben wird.

Code-Beispiel

Dim strRelPfad As String
Dim strAbsPfad As String

strRelPfad = Nz(Me!txtRelPfad, "")

WizHook.Key = 51488399
If WizHook.FullPath(strRelPfad, strAbsPfad) = True Then
  MsgBox strAbsPfad, vbInformation
Else
  MsgBox "Aktion fehlgeschlagen", vbCritical
End If 

Hinweise

Ausgangspunkt für die Umwandlung ist immer das "CurDir".

Es sind die (aus HTML) bekannten Kennzeichen für übergeordnete Ordner möglich ("../").

Bei der Ermittlung des absoluten Pfad wird nicht geprüft, ob der Ordern wirklich vorhanden ist.

Nach oben

 

Downloads: Beispieldatenbank / Hilfedatei / Doku als PDF-Datei

Microsoft MVP - Thomas Möller


02.10.2020:
TM-AbhängigeObjekte
Version 4.03 bereitgestellt.


06.11.2019:
TM VBA-Inspector:
Lösung für Installationsproblem dokumentiert.


06.05.2017:
TM-VBALineNumbers
Version 1.29.01 bereitgestellt.


27.03.2016:
TM VBA-Inspector:
Installationsroutine überarbeitet.


23.05.2014:
TM-RebuildDatabase
Version 1.75 bereitgestellt.


Powered by CMSimple - Template by CMSimple-Styles.com - Autor:Thomas Möller