doc/docxファイルがWord2013で読み取り専用で開かない…

こんなスクリプトでWordファイルをWord2013で読み取り専用で開くようにしていたのに、突然Word2010で開くようになってしまった。

Dim strDOCFileName
Dim objDOCApp
If WScript.Arguments.Count <> 1 Then WScript.Quit
strDOCFileName = WScript.Arguments(0)
Set objDOCApp = WScript.CreateObject("Word.Application")
objDOCApp.Visible = True
Call objDOCApp.Documents.Open(strDOCFileName,,True)
Set objDOCApp = Nothing
WScript.Quit

"Word.Application.15"とかしてみたけどダメ…

何かした記憶は全くないので調べてみた。
複数のバージョンの Office がインストールされている場合の Office オートメーションについてというのを発見。
「その他の注意点」になにやら怪しいことが書かれている。
2010を最後にインストールしたということは無いのだが…
Office2013をクイック修復してみたところ以前のようにスクリプトでWord2013が起動するようになった

原因は不明だが復旧方法が判ったのでメモメモ。

なにやらこんなとこにも怪しいことが。

そのコンピューター上で Word 2010 によって Word 2010 自体の自動登録が行われるためです。

むっむっ、もしかして昨日Office2010の更新プログラムをインストールしたせいか