| Startseite > Tipps & Tricks > Wizhook-Objekt > SplitPath |
|
|
|
SplitPathSplitPath
Diese Funktion ist in folgenden Access-Versionen verfügbar: 2000, 2002, 2003, 2007, 2010
Zerlegt einen Dateipfad in die Bestandteile Laufwerk, Verzeichnis, Dateiname und -endung
Sub SplitPath(Path As String, Drive As String, Dir As String, File As String, Ext As String)
- - -
Dim strDatei As String
Dim strLW As String Dim strPfad As String Dim strDateiName As String Dim strSuffix As String 'Werte übernehmen strDatei = SysCmd(acSysCmdAccessDir) & "MSACCESS.EXE" 'Pfad zerlegen WizHook.Key = 51488399 WizHook.SplitPath strDatei, strLW, strPfad, strDateiName, strSuffix 'Ausgabe MsgBox "Eingabe: " & strDatei & vbCrLf & vbCrLf & _ "Ausgabe: " & vbCrLf & _ "Laufwerk: " & strLW & vbCrLf & _ " Pfad: " & strPfad & vbCrLf & _ " Datei: " & strDateiName & vbCrLf & _ " Suffix: " & strSuffix
Die Funktion ist unabhängig von der Existenz des übergebenen Dateipfades. Die Funktion ist sehr robust. Wenn nur ein Teil des Dateipfades übergeben wird nur dieser zerlegt.
|
02.10.2020: 06.11.2019: 06.05.2017: 27.03.2016: 23.05.2014: |
|
|
|
