Parsingfunktion - Dateiendung lesen

30.12.2003

Mit Hilfe der Parsingfunktion Dateiendungen lesen.

Die Funktion GetFileExtension liefert nur das Datei-Suffix (im Beispiel exe) zurück. Dies ist zum Beispiel sinnvoll, wenn eine bestimmte Datei-Operation nur auf eine definierte Dateimenge anzuwenden ist, oder nur bestimmte Dateien in eine Datenbank eingetragen werden sollen.

Sie benötigen hierzu auch die Funktion ReverseInStr aus dem Tipp
Stringmanipulation - Parsen - Textmanipulation (Link siehe unten)

Public Function GetFileExtension(strPath As String) As String

Dim intPos As Integer

intPos = ReverseInStr(strPath, ".")
GetFileExtension = Right(strPath, Len(strPath) - intPos)

End Function

Weitere Tipps & Tricks

30.12.2003

Stringmanipulation - Parsen - Textmanipulation

Parsingfunktionen

Tipp/Trick

Dienstleistungen

Als starker Partner an Ihrer Seite unterstützen wir Sie in folgenden Breichen:

Access-Programmierung

Benötigen Sie Unterstützung bei der Programmierung von Access-Anwendungen? Wir bieten die gesamte Bandbreite von der Access-Programmierung auf Stundenbasis bis zur Durchführung eines Software-Projektes als Auftragsarbeit an. Kontaktieren Sie uns für ein kostenloses Erstgespräch.

Software-Beratung

Haben Sie ein Software-Projekt und Sie wissen nicht, ob Access die richtige Plattform ist? Wir haben über 20 Jahre Erfahrung beim Erstellen von Windows-, Web und mobilen Anwendungen. Kontaktieren Sie uns für eine kostenlose Erstberatung.