Count file types with applescript + shell

[bruceR]

Here is a simple applescript to get the count of file types on your hard drive. In my case I get a total of about 4000 files in 1 second.

set makeFind to "mdfind "kMDItemKind == 'FileMaker Document'""

do shell script makefind

set f0 to count of paragraphs of result

set makeFind to "mdfind "kMDItemKind == 'Microsoft Word document'""

do shell script makefind

set f1 to count of paragraphs of result

set makeFind to "mdfind "kMDItemKind == 'Microsoft Excel workbook'""

do shell script makefind

set f2 to count of paragraphs of result

copy ("FMP: " & f0 & " Word: " & f1 & " Excel: " & f2) as string to cell "AS_Result" of current record