Grass, looks to me like this script is VBA and was meant to run in the context of the Microsoft Word application model (like a macro) ... things like this:

$objDoc = Documents.Open($strFilePath + $strFileName)

are a dead give-away ... you'll need to create an instance of Word like this:

$Word = CreateObject("Word.Application")

then prefix the Application object to all the word objects, like this:

$objDoc = $Word.Documents.Open($strFilePath + $strFileName)

-Shawn