Also...This line has a typo (missing a $)

 Code:
$strWks = ReadProfileString(strComps,"computers",$objComp)

Should be...
 Code:
$strWks = ReadProfileString($strComps,"computers",$objComp)