Добро пожаловать в форум, Guest  >>   Войти | Регистрация | Поиск | Правила | В избранное | Подписаться
Все форумы / WinForms, .Net Framework Новый топик    Ответить
 Выяснить версию установленного MS PowerPoint?  [new]
M234
Member

Откуда: Оттуда...
Сообщений: 26653
Как бы мне это сделать понадёжней?
Реестр? Ещё варианты?
Нужно узнать установлен ли MS PowerPoint и какой версии.
18 фев 10, 19:20    [8366773]     Ответить | Цитировать Сообщить модератору
 Re: Выяснить версию установленного MS PowerPoint?  [new]
sews
Member

Откуда: Одесса
Сообщений: 149
M234,

Так подойдет


        Dim u As Object
        Try
            u = CreateObject("PowerPoint.Application", )

            MsgBox(u.Version)


        Catch ex As Exception
            MsgBox("Немае")
        End Try

19 фев 10, 00:09    [8367883]     Ответить | Цитировать Сообщить модератору
 Re: Выяснить версию установленного MS PowerPoint?  [new]
Esofter
Member

Откуда:
Сообщений: 69990
sews
M234,

Так подойдет


        Dim u As Object
        Try
            u = CreateObject("PowerPoint.Application", )//!!!!!!

            MsgBox(u.Version)


        Catch ex As Exception
            MsgBox("Немае")
        End Try



А второй параметр где?
19 фев 10, 01:11    [8368080]     Ответить | Цитировать Сообщить модератору
 Re: Выяснить версию установленного MS PowerPoint?  [new]
sews
Member

Откуда: Одесса
Сообщений: 149
Esofter


Так

А второй параметр где?



MsgBox("Немае") -не установлен
19 фев 10, 01:25    [8368106]     Ответить | Цитировать Сообщить модератору
 Re: Выяснить версию установленного MS PowerPoint?  [new]
Esofter
Member

Откуда:
Сообщений: 69990
sews
Esofter


Так

А второй параметр где?



MsgBox("Немае") -не установлен


u = CreateObject("PowerPoint.Application", )

CreateObject принимает один параметр.
19 фев 10, 01:28    [8368112]     Ответить | Цитировать Сообщить модератору
Все форумы / WinForms, .Net Framework Ответить