Версия word-a

[Diego__]

Как определить какой word установлен не используя COM модель?
Можно ли это узнать из реестра? Является ли наличие пути HKEY_LOCAL_MACHINE SOFTWARE\\Microsoft\\Office\\12.0\\ Word\\InstallRoot и ключа Path=C:\Program Files\Microsoft Office\Office12\ достаточным критерием того что word есть?

[Aent]

Не уверен, но помнится эти ключи устанавливаются и при иннсталляции
Word Viewer. А что не даёт спросить через GetObject ?

[viter.alex]

Я бы предложил проверять HKCR\Word.Application. Если есть, то приложение установлено.

[SAS888]

А чем не устраивает

MsgBox Application.Version

[viter.alex]

SAS888, видимо тем, что нужно узнать установлен ли Word вообще на компьютере.

[Stilet]

Как по мне CreateOleObject неплохой способ узнать установлен ли ворд.

[SAS888]

Сообщение от viter.alex

нужно узнать установлен ли Word вообще на компьютере.

Тогда встречный вопрос: из какой установленной программы это нужно узнать?
Если через RegEdit, то при чем здесь программирование в VBA Word? Вопрос - в другую ветку!

[Diego__]

Спасибо за ответы.
думаю определять как предложил viter.alex

CLSID clsid;
return SUCCEEDED(::CLSIDFromProgID(L"Word.Application.11", &clsid));

[Diego__]

Был установлен 2007 затем 2003 офисы (включая word), затем удалил только word из 2007. Вышеописанный метод показывает присутствие word-a после его удаления.

Добавил проверку наличия ключа в реестре
HKEY_LOCAL_MACHINE
SOFTWARE\\Microsoft\\Office\\12.0\\ Word\\InstallRoot
вот так работает нормально

[Aent]

Тогда уж:
я бы попробовал читать путь к winword.exe в параметре из ветки
HKEY_CLASSES_ROOT\Applications\Winw ord.exe\shell\edit\command
А затем получил бы версию exe файла как описано здесь:
http://www.planet-source-code.com/vb...=4976&lngWId=1
http://www.vbforums.com/showthread.php?t=505137