Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Как определить установлен ли Access? 
:(
    Опции темы
Alca
Дата 3.3.2008, 16:45 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Завсегдатай
Сообщений: 3993
Регистрация: 14.6.2006

Репутация: 25
Всего: 50



Как определить установлен ли Access (без поисках в реестре)?

Это сообщение отредактировал(а) Alca - 3.3.2008, 16:46


--------------------
PM WWW ICQ Skype Jabber   Вверх
mrbrooks
Дата 3.3.2008, 17:29 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


трололомен
****


Профиль
Группа: Завсегдатай
Сообщений: 4259
Регистрация: 4.10.2006
Где: Дол Гулдур

Репутация: 167
Всего: 306



А просто интересно чем же реестр не устраивает? 
Можно тогда просто в программных файлах поискать MSACCES.EXE  smile 
PM MAIL   Вверх
Alca
Дата 3.3.2008, 18:49 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Завсегдатай
Сообщений: 3993
Регистрация: 14.6.2006

Репутация: 25
Всего: 50



Код

//---------------------------------------------------------------------------
//установлено ли приложение
bool bIsApplicationInstalled() {
    Variant vApp;

    try {
        vApp = Variant::CreateObject("Access.Application");
        return true;
    } catch (EOleSysError &E) {
        if (E.ErrorCode == - 2147221005) {  //ошибка: недопустимая строка с указанием класса
            MessageBox(0, "Приложение не установлено", "", MB_OK);
            return false;
        } else {
            //не гарантировано, что результат правильный,
            //т.к. может быть другая причина невозможности запустить приложение
            MessageBox(0, "Неизвестная ошибка", "", MB_OK);
            return false;
        }
    }
}
//---------------------------------------------------------------------------
//для Word, Excel, Access
void __fastcall TfrmMain::btnIsAppInstalledClick(TObject *Sender) {
    if (bIsApplicationInstalled() == true) {
        MessageBox(0, "Приложение установлено", "", MB_OK);
    }
}
//---------------------------------------------------------------------------



--------------------
PM WWW ICQ Skype Jabber   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "С++ Builder"
Rrader

Запрещается!

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами

  • Литературу по С++ Builder обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Настоятельно рекомендуем заглянуть в DRKB (Delphi Russian Knowledge Base) - крупнейший в рунете сборник материалов по Дельфи


Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Rrader.

 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | C++ Builder | Следующая тема »


 




[ Время генерации скрипта: 0.2013 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.