pavlo писал(а) 01. Июня 2007 :: 07:40:

Как-то более подробно опиши проблему, нифига не понял.
Что значит "компонента загружена в About видится" и т.д. ?

Ты пытаешься загрузить компоненту уже после того, как она загружена?

Может наличие 1С++ проверять попыткой создать объект из классов 1С++?
А то -- повторная загрузка классов и сливай воду...
Сам делаю

Процедура приОткрытии()
	попытка
		миф = СоздатьОбъект( "MetaInfoClasses" );
	исключение
		Если ( ЗагрузитьВнешнююКомпоненту( "1CPP.dll" ) <> 1 ) Тогда
			Сообщить( "1С++ не загружена." );
		КонецЕсли;
	конецпопытки;

 

Хотя для ОЛЕ могут быть особенности.

сори что не указал была 2.0.2.1 (по моему так) сейчас поставил 2.0.3.3 вы правы не падает, НО к базе не подключается если нужно могу более полный кусок кода привести

Я просто не пойму в настройках операционной системы в обязательном порядке DSN строка прописана должны быть в объектах ODBC?
А возвращает вот что при ПолучитьОписаниеОшибки():

State IM002, native 0, message [Microsoft][Диспетчер драйверов ODBC] Источник данных не найден и не указан драйвер, используемый по умолчанию

может что то я не понимаю в работе ODBC куда и в какой последовательности?

                 ОЛЕ_DSN="base";
                 ОЛЕ_UID="sa";
                 ОЛЕ_PWD="_password_";
                 Попытка
                       БазаОле.CreateObject("ODBCRecordSet");
                 Исключение 
                       regPath = "";
                       Попытка
                             WshShell      = CreateObject("Wscript.Shell");
                             regPath      = 7}\\InprocServer32\\");
                       Исключение
                             Попытка
                                   WshShell      = CreateObject("Wscript.Shell");
                                   regPath      = \InprocServer32\");
                             Исключение 
                                   regPath = "";
                             КонецПопытки;
                       КонецПопытки;
                                       
                       Если regPath = "" Тогда
                             regPath = "1CPP.dll";
                       КонецЕсли;
                       
                       Если Не(БазаОле.ЗагрузитьВнешнююКомпоненту(regPath)=1) Тогда
                             ЗаписьВПротокол1СРР("Ошибка загрузки 1CPP.dll в рознице!");
                             Сообщ("Ошибка загрузки 1CPP.dll в рознице!");
                             Возврат 0;
                       КонецЕсли;
                 КонецПопытки;       
     SS            = БазаОле.CreateObject("ODBCRecordSet");
     SS_local = CreateObject("ODBCRecordSet");      


ну и т.д.

База мне казалось понятно, что сикуль и аутификация сикульная
DSN={NAME_BASE}; DRIVER=SQL Server; UID={login}; PWD={password};
"текст запроса" все что выше видишь, это и есть дале просто запрос в базу пошел - это имхо не важно.