; ----------------------------------------------- #include ; ----------------------------------------------- Opt("MustDeclareVars", 1) ; ----------------------------------------------- _CreateTextListing() ; ----------------------------------------------- Func _CreateTextListing() Local $sSrcPath = "I:\Live_Rig\Scripts\Development\_RenameAudioData" Local $sSrcWavDataPath = $sSrcPath & "\Audio" Local $sSrcFileListingPath = $sSrcPath & "\FileListing.txt" Local $aWavFileListing = _FileListToArray($sSrcWavDataPath, "*.*") ; ----------------------------------------------- If Not @error Then _FileCreate($sSrcFileListingPath) _FileWriteFromArray($sSrcFileListingPath, $aWavFileListing) EndIf EndFunc ;==>_CreateTextListing ; -----------------------------------------------