Extracting titleblock text to a flat file

As a long time Acad user, I have a custom command that will extract all attributes from a titleblock and place the information in a flat text file. This is used for searching for Drawings.

Is there a macro/procedure out there on how to accomplish this in SW R2009

Thank you

SolidworksDrawings And Detailing