powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Can't find project or library
6 сообщений из 6, страница 1 из 1
Can't find project or library
    #33229259
utya
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Подскажите пожалуйста.

Написал кусок кода в отдельной книге, и он работает просто замечательно. И хочу вставить этот кусок в программу одного деятеля. Бросая кнопку и в событии копирую этот код. И при прогоне сразу появляется ошибка.

Compile error: Can't find project or library

Выдает эту ошибку в следующих местах:

Код: plaintext
1.
2.
3.
4.
5.
6.
Set rstFactory = CreateObject("ADODB.Recordset")
   rstFactory.ActiveConnection = cnnToBase
   rstFactory.Open "SELECT N_podrz, Podrz FROM B_podrk" , , adOpenKeyset
   
   Set rstRegion = CreateObject("ADODB.Recordset")
   rstRegion.ActiveConnection = cnnToBase
   rstRegion.Open "SELECT N_terp, Terp FROM B_terp", , adOpenKeyset
выделяет подчеркнутое.

Если закоментирую подчеркнутое. То далее в коде где всетречает trim тоже ругается, хотя в другом модуле, она работает без проблем.

Помогите я в бейсике профан, что где надо подклчить. В referense вроде тоже самое, что и там где все работала нормально.
...
Рейтинг: 0 / 0
Can't find project or library
    #33229287
Фотография big-duke
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
tool-reference есть где-нить слово MISSING ?
ссылка на ado 2.x стоит ?
...
Рейтинг: 0 / 0
Can't find project or library
    #33229311
Фотография Drema
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Можно использовать константы:
adOpenUnspecified = $FFFFFFFF;
adOpenForwardOnly = $00000000;
adOpenKeyset = $00000001;
adOpenDynamic = $00000002;
adOpenStatic = $00000003;


____________________
http://potolook.positic.ru - Шаблоны, подсветка и дополнительные возможности в Outlook®
...
Рейтинг: 0 / 0
Can't find project or library
    #33229495
utya
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
2big-duke
Ничего подобного нет и вообще не находится в tool-reference.

НО Цифорку подставил все заработало.

Спасибо за ответы
...
Рейтинг: 0 / 0
Can't find project or library
    #33244532
dimka@ultra
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
У меня было точно такое же.
При компиляции проекта (Debug -> Compile) Ругался Excel.
Посмотрел в Референсах - всё очень просто - когда-то пытался зачем-то вставить сторонний объект - библиотека и прилинковалась. В ней, судя по всему, и висели определения (а для моего проекта - ПЕРЕопределения) внутриутробных функция trim и проч. хрени. Снял "халочку" с неопознанной библиотеки и всё заработало.

(PS А в базе знаний Микрософта про такую хрень пишут как про макровирус в случае возникновении ошибки у 97 ворда. Мда - переопределение функций - весчь, но "палка с двумя концами". Тьфу-тьфу-тьфу, моя больная эротическая фынтазия.)

С уважением,
Дмитрий.
...
Рейтинг: 0 / 0
Can't find project or library
    #33246548
Drakula76
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
utyaПодскажите пожалуйста.

Написал кусок кода в отдельной книге, и он работает просто замечательно. И хочу вставить этот кусок в программу одного деятеля. Бросая кнопку и в событии копирую этот код. И при прогоне сразу появляется ошибка.

Compile error: Can't find project or library

Выдает эту ошибку в следующих местах:

Код: plaintext
1.
2.
3.
4.
5.
6.
Set rstFactory = CreateObject("ADODB.Recordset")
   rstFactory.ActiveConnection = cnnToBase
   rstFactory.Open "SELECT N_podrz, Podrz FROM B_podrk" , , adOpenKeyset
   
   Set rstRegion = CreateObject("ADODB.Recordset")
   rstRegion.ActiveConnection = cnnToBase
   rstRegion.Open "SELECT N_terp, Terp FROM B_terp", , adOpenKeyset
выделяет подчеркнутое.

Если закоментирую подчеркнутое. То далее в коде где всетречает trim тоже ругается, хотя в другом модуле, она работает без проблем.

Помогите я в бейсике профан, что где надо подклчить. В referense вроде тоже самое, что и там где все работала нормально.
1) Проверь в references, что у тебя подключена библиотека ADO (Microsoft Active Data Object Library 2.x)
2) Проверь там же, что не помечена галкой какая-нибудь библиотека с пометкой "Missing" ("Отсутствует")
...
Рейтинг: 0 / 0
6 сообщений из 6, страница 1 из 1
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Can't find project or library
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]