Модераторы: stron
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> 1Сv77: Монопольный режим, работа через OLE, выдает ошибку на CreateObject(...)  
:(
    Опции темы
sergey_85
Дата 7.10.2011, 08:31 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 445
Регистрация: 17.4.2007
Где: Россия, Челябинск

Репутация: нет
Всего: 1



Привет!

Есть небольшая БД 1Сv77 (dbf). При входе пароль и юзеров не требует. Через монитор видно, что база блокируется, т.е. монопольный режим.
 
Проблемка следующая...
Создаю простую ert, запускаю 1С, выбираю эту БД, открываю обработку - по кнопке сформировать вып. следующий код
Код

БазаОле=СоздатьОбъект("V77.Application");

КаталогБазыОЛе  = "C:\МояБаза\"; -- я уже работаю в этой БД

РезультатПодключения = БазаОле.Initialize ( БазаОле.RMTrade , "/d" +
                       СокрЛП(КаталогБазыОле), "NO_SPLASH_SHOW");

Если РезультатПодключения = 0 Тогда
     Предупреждение("Не удалось подключится к указанной базе - проверьте вводные!");
 КонецЕсли;

СпрOLE = БазаОле.CreateObject("Справочник.Фирмы");


Соединение с БД не происходит ("РезультатПодключения = 0"), думаю из-за того, что монопольный режим (см. через монитор).

Вопрос как от этого избавиться? =)

Заранее спасибо!


--------------------
A good design always pays off.
PM MAIL   Вверх
rarxxx
Дата 8.10.2011, 13:01 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 44
Регистрация: 27.7.2010

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



Код

Процедура ПодключитьБазу() Экспорт
    
    if Не Константы.Подлючать1с7.Получить() then
        //Возврат false;
    endIf;
    
    v7=Новый COMОбъект("V77s.Application");
    ТекПутьКБазе = Константы.Путь1с7.Получить();
    ТекПользователь = Константы.Пользователь1с7.Получить();
    ТекПароль = Константы.Пароль1с7.Получить();
    Попытка
        strApp = "/D"""+ТекПутьКБазе+""" /N"""+ТекПользователь+""" /P"""+ТекПароль+"""";
        Открыта=v7.Initialize(v7.RMTrade,strApp,"NO_SPLASH_SHOW");
        Если Открыта Тогда
            Сообщить("Подключена база 1с 7.7" + v7.Метаданные().Идентификатор);
            
            Попытка
                Счет7 = v7.CreateObject("Документ.Счет");
            Исключение
                v7 = "";
                Предупреждение("База  1с 7.7 не подключена. База в моноплоном режиме");
            КонецПопытки;
        Иначе
            Предупреждение("Ошибка подключения к базе " + ТекПутьКБазе  + " под пользователем " + ТекПользователь);
            v7 = "";
        КонецЕсли;
        
    Исключение
        Предупреждение("Ошибка подключения к базе " + ТекПутьКБазе  + " под пользователем " + ТекПользователь);
        v7 = "";
    КонецПопытки;
КонецПроцедуры


Код

    Счет7 = v7.CreateObject("Документ.Счет");
    Счет7.Новый();
    Счет7.ДатаДок    = Счет8.Дата;
    Счет7.Комментарий = "Выгружен из 1с 8.1";

PM MAIL   Вверх
sergey_85
Дата 9.10.2011, 22:14 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 445
Регистрация: 17.4.2007
Где: Россия, Челябинск

Репутация: нет
Всего: 1



Товарищи!!!

Вы меня не так поняли, Я работаю на 1Cv77. 

Проблемка в том, что когда я запускаю конфиг. и открываю в ней обработку, то при инициализации OLE она не может еще раз открыть эту же конфиг, т.к. я в монопольном режиме!!!!!

А вот когда я эту обработку запускаю через другую конфиг. (при условии, что первая закрыта), то все ок...

Как же мне выйти из этой ситуации????

Чтобы можно было одновременно работать в одной конфигурации без монопольного режима, напомню что конфига там стандартная, юзеров и паролей при старте не требует...

Заранее благодарю за ответы!!!!!!

Это сообщение отредактировал(а) sergey_85 - 9.10.2011, 22:14


--------------------
A good design always pays off.
PM MAIL   Вверх
sergey_85
Дата 9.10.2011, 22:29 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 445
Регистрация: 17.4.2007
Где: Россия, Челябинск

Репутация: нет
Всего: 1



Вот, что наковырял в google

Код

В 1С 7.7, режим «Монопольно» присутствует только в сетевых версиях 1С. Если же у Вас не сетевая версия, то Вы будете по умолчанию заходить монопольно – Вас об этом даже не спросят.


Как это изменить?


--------------------
A good design always pays off.
PM MAIL   Вверх
rarxxx
Дата 10.10.2011, 09:40 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 44
Регистрация: 27.7.2010

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



действительно не понимаю что ты хочешь... кто в мониторе сидит монопольно ? если ты, то ты заходишь в 1с из конфигуратора(нажав F5), в этом случае ты заходишь монопольно, если хочешь не монопольно заходи с рабСтола ярлык 1с выбираешь и заходишь.
PM MAIL   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "1C: Предприятие, SAP, ERP и учётные системы"
stron

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

1. Обсуждение крэков, кейгенов и других подобных программ

Пробуйте искать сами или обращайтесь в приват к участникам форума.

Темы с подобными вещами будут немедленно удаляться, а нарушители - получать предупреждения.

Также запрещается обсуждение проблем работы этих программ (что куда вписать, куда что скопировать и т.п...)

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

  • Пожалуйста, пользуйтесь поиском перед тем, как задать вопрос - возможно ответ уже есть на форуме.
  • Название темы должно отражать её суть
  • Действия модераторов можно обсудить здесь

С уважением, stron, Pegas.

 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | 1C: Предприятие, SAP, ERP и учётные системы | Следующая тема »


 




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


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

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