#include <Array.au3>
#include <ID3Tag.au3>
Global $sPath, $iTimer, $aRet
While True
	$sPath = FileOpenDialog('Select MP3-File', '', 'MP3-Files (*.mp3)', 3)
	If @error Then Exit
	$iTimer = TimerInit()
	$aRet = _ReadID3Tag($sPath)
	ConsoleWrite($sPath & @CR & 'Error = ' & @error & @CR & Round(TimerDiff($iTimer), 3) & ' msec.' & @CR & @CR)
	_ArrayDisplay($aRet)
WEnd