#include-once
#include <ID3_v3.4.au3>
#include <Array.au3>
#include <File.au3>
#include <MsgBoxConstants.au3>
#include <StringConstants.au3>

;Global $sFileSelectFolder = FileSelectFolder("WHERE ARE THE Catalogues?", "")
;C:\Users\Pete\Desktop\BookLists\MP3 Book List.csv


$sFilePath="C:\Users\Pete\Desktop\BookLists\MP3 Book List.csv"
$aRetArray=""

;MsgBox($MB_SYSTEMMODAL, "", $sFilePath,10)

_FileReadToArray($sFilePath, $aRetArray, Default, "**")
;_ArrayDisplay($aRetArray, "2D array - count", Default, 8)

;***************** Enter Author to Search For

Local $sAnswer = InputBox("Question", "Enter the Author To Search for?", "Brett", "", - 1, -1, 0, 0)
If @error Then Exit

$aResult = _ArrayFindAll($aRetArray, $sAnswer,0,0,0,1)
;_ArrayDisplay($aResult)

$i=0
$String=""

Local $iRows = UBound($aResult, $UBOUND_ROWS)

For $i = 0 To $iRows-1
	$String = $string & $aRetArray[$aResult[$i]][2] &@CRLF
Next

MsgBox($MB_SYSTEMMODAL, "Books by the Author", $String)