• Курсы Академии Кодебай, стартующие в мае - июне. «Ознакомиться со списком курсов от команды The Codeby

    1. Цифровая криминалистика и реагирование на инциденты, 2. ОС Linux (DFIR) Старт: 16 мая, 3. Анализ фишинговых атак Старт: 16 мая Устройства для тестирования на проникновение Старт: 16 мая

    Скидки до 10%.

    Эти и другие курсы. Полный список ближайших курсов ...

Обмен даными

  • Автор темы Renat11111
  • Дата начала
R

Renat11111

не выполняются действия в транзакции...... ошибок тоже не выдает. да и правильно вроде бы все

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

Сообщить("Открытие базы-источника...");
Открыта=OLE_ОбъектБазы.Initialize(OLE_ОбъектБазы.RMTrade, "/d"""+"C:\Автохозяйство\Рарус - Автохозяйство ред. 1.10\AVTODB"
+""""+" /n"+"Ренат"+
" /p"+"111"
,"NO_SPLASH_SHOW");
Если Открыта=0 Тогда
Сообщить("Ошибка открытия базы-источника!");
OLE_ОбъектБазы="";
Возврат;
Иначе
Сообщить("База успешна открыта");
Сообщить(OLE_ОбъектБазы.КаталогИБ());
КонецЕсли;

OLE_Документ=OLE_ОбъектБазы.CreateObject("Документ");
OLE_Документ.ВыбратьДокументы(НачДата, конДата);
НачатьТранзакцию();
Пока OLE_Документ.ПолучитьДокумент()=1 Цикл
Состояние("Выборка документов... "+OLE_Документ.ДатаДок);
OLE_ВидДок=СокрЛП(OLE_Документ.Вид());
Сообщить(OLE_ВидДок);









КонецЦикла;
ЗафиксироватьТранзакцию();
 
V

vbs

А у меня аналогичный код (27 релиз) прекрасно работает.
Все, что я изменил = это параметры каталога и пользователя Ole-базы ну и даты свои (может, их проверить ?)
Открыта=OLE_ОбъектБазы.Initialize(OLE_ОбъектБазы.RMTrade, "/d"""+"E:\Int_Skl"
+""""+" /n"+"Администратор"+
" /p"+"111"
,"NO_SPLASH_SHOW");
 
R

Renat11111

Да действительно параметр пользователя надо было поменять на администратор... А можно как ниб инициализировать открытие окна открываемой базы?
 
V

vbs

Вряд ли здесь именно название "Администратор" имеет смысл, но может быть, что-то от полных прав ?
А насчет вопроса - я всегда пользовался подобными обработками под своим именем, а оно у меня везде - "Администратор", так уж сложилось :mellow:
 
E

evgenyatam

если это все на 2003 сервере - попробуйте локально. если нормально откроет - то значит у пользователя сервера прав не хватает. (каких - не знаю)
 
Мы в соцсетях:

Обучение наступательной кибербезопасности в игровой форме. Начать игру!