1 1 1 1 1 1 1 1 1 1 Rating 4.50 (2 Votes)

Problemstellung:
Oft wird die Frage gestellt wie man MP3Tags lesen bzw. schreiben kann aus einer MS-Access DB.
Aber wie geht das? Das erfahrt Ihr im Folgenden.

Voraussetzungen:
Das Bsp ist ab A00 lauffähig

Um MP3Tags auszulesen kann man auf API-Funktionen zurückgreifen oder auf externe Dateien.
In diesem Bsp möchte ich eine Lösung mit der Audiogenie DLL vorstellen.
Diese DLL ist für den privaten Gebrauch Freeware und eine Weiterentwicklung des OCX-Controls.
Die DLL muss nicht registriert werden und nur in das WinSystem-Verzeichnis kopiert werden.
Eine andere Möglichkeit wäre das die DLL sich im gleichen Verzeichnis wie die DB befindet.
Wie das geht weiter unten.
Weitere Infos zur Audiogenie DLL hier

Funktionsweise:
Die DLL unterstützt die Formate AAC, APE, FLAC, MP3, MP4, MPEG, OGG, WAV und WMA.
Wobei ich mich in der Bsp.-DB auf das MP3-Format beschränke und auch nur einige
Eigenschaften benutze.

Um eine DLL im Verzeichnis der DB zu nutzen könnt Ihr auf eine API-Funktion zurückgreifen.

Es muss dann nur beim Start der DB die Function "InitDLL" mit dem Dateinamen der DLL
als Parameter aufrufen.

Private Declare Function FreeLibrary Lib "kernel32.dll" (ByVal hLibModule As Long) As Long
Private Declare Function LoadLibrary Lib "kernel32.dll" Alias "LoadLibraryA" _
    (ByVal lpLibFileName As String) As Long
Dim hModLib As Long
Function InitDLL(sFile As String) As Boolean
    If hModLib = 0 Then
        hModLib = LoadLibrary(sFile)     'Systempfad?
        If hModLib = 0 Then hModLib = LoadLibrary(CurrentProject.Path & "\" & sFile)    'Datenbankpfad?
        If hModLib = 0 Then MsgBox "Die benötigte Datei  " & sFile & _
        "  konnte nicht gefunden werden", vbCritical
    End If
    InitDLL = (hModLib <> 0)
End Function
Function FreeDLL()
    If hModLib <> 0 Then Call FreeLibrary(hModLib)
End Function 

Das Klassenmodul "clsAudioGenie" stammt vom Autor der DLL ist so zu übernehmen.

Im Modul "mod_MP3" habe ich eine andere Lösung gewählt zum ermitteln der Titellänge.
Es ginge aber auch mit der DLL.
Wie jetzt die Tags gelesen bzw geschrieben werden könnt Ihr der Bsp-DB entnehmen.
Nätürlich sind Eurer Kreativität keine Grenzen gesetzt. Ihr könnt auch ganze Verzeichnisse
einlesen usw.

Dateien:
(0 Stimmen)

MP3 Tags Lesen und bearbeiten

ab A00

Die Zip-Datei enthält eine Version ab A00

 
Datum 05.02.2018
Dateigröße 335.79 KB
Download 951

Ähnliche Artikel

You have no rights to post comments

Login Form

Neueste Artikel

SQL zu VBA Konverter
26. Oktober 2018
Problemstellung: Nur für 32Bit Office Versionen Gibt es eine Möglichkeit SQL-Code einer Abfrage so zu konvertieren das der Code in VBA genutzt werden kann? Lösung: Bis Access 2010 gibt das Tool...
1.png5.png7.png6.png0.png6.png5.png
Heute61
Gestern206
Diese Woche267
Dieser Monat4688
Total1576065

  • IP: 3.95.233.107
  • Browser: Unknown
  • Version:
  • OS: Unknown

Online

1
Online

19. März 2024

Letzte Kommentare

  • Berechnen von Zeiträumen als Abfragekriterium

    elmard 02.02.2021 21:02
    1000 Dank
    für diese Datenbankanwendung! Eine sehr gute Umsetzung mit den vielen Möglichkeiten des Datums.

    Weiterlesen...

     
  • SQL zu VBA Konverter

    Tommy Admin 03.11.2019 16:33
    RE: SQL zu VBA Konverter
    Hallo Elmard, danke für die Info. :lol:

    Weiterlesen...

     
  • SQL zu VBA Konverter

    elmard 03.11.2019 14:49
    Bei SmartTools neue Version 4.0
    Dieses Tool liegt inzwischen in der Version 4 vor und läuft nun auch von A2013 und A2016 sowie im ...

    Weiterlesen...

     
  • Workshop zur Benutzung des Multi-Column TreeView Control unter MS-Access

    TommyK 27.02.2019 06:52
    Workshop
    Hallo mpegjunkie, danke für Dein Feedback. Schön das Dir Workshop weiter hilft. :D

    Weiterlesen...

     
  • Workshop zur Benutzung des Multi-Column TreeView Control unter MS-Access

    mpegjunkie 26.02.2019 20:10
    Perfekter Workshop
    Hallo Tommy, perfekter Workshop, toll und umfassend erläutert. Jetzt nutze ich diese Controls auch.

    Weiterlesen...