powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / ADO.NET, LINQ, Entity Framework, NHibernate, DAL, ORM [игнор отключен] [закрыт для гостей] / ADO и 1С 7.7
2 сообщений из 2, страница 1 из 1
ADO и 1С 7.7
    #35176770
pupil*
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Подскажите, пожалуйста, в чем ошибка. Необходима обработка для переноса данных. Использую интерфейс ADO. Но при использовании метода Command появляется ошибка Значение не представляет агрегатного объекта. Код такой:
Перем Conn, Comm;
Процедура Выполнить()
Если МонопольныйРежим()=1 Тогда
Предупреждение("Невозможно выполнить запрос в монопольном режиме!",10);
Возврат;
КонецЕсли;
Path="D:\Операции";
Conn = CreateObject("ADODB.Connection");
Попытка
Conn.Open("Provider=Microsoft.Jet.OLEDB.4.0;" +
"Data Source=" + Path + ";" +
"Extended Properties=""DBASE IV;"";");
Исключение
Предупреждение("Невозможно установить соединение с базой данных!");
КонецПопытки;

Comm = CreateObject("ADODB.Command");
Comm.ActiveConnection=Conn;
Comm.CommandType = 1;
param=Comm.CreateParameter("@parameter",3,1,4,425);
Comm.Parameters.Append(param);
Comm.CommandText="SELECT * FROM Oper WHERE ParentID=@parameter";
Гр=Comm.Execute;

Соединение осуществляется. Ошибка появляется на строчке Comm.ActiveConnection=Conn;
Может существуют ограничения помимо монопольного режима? Заранее благодарна
...
Рейтинг: 0 / 0
ADO и 1С 7.7
    #35212234
про ADO не скажу, но с DAO работает вот так:
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
ДАО = СоздатьОбъект("DAO.DBEngine.36");
БД  = ДАО.OpenDatabase(КаталогИБ() + "test.mdb");
ТЗ = БД.OpenRecordset("SELECT code as Id FROM tab1");
ТЗ.movefirst();
пока ТЗ.eof()= 0  Цикл
  Код = ТЗ.fields("Id").value;
  ...
  ТЗ.movenext();
КонецЦикла
ТекстЗапроса="Insert into ...";
БД.Execute(ТекстЗапроса);
БД.Close();
...
Рейтинг: 0 / 0
2 сообщений из 2, страница 1 из 1
Форумы / ADO.NET, LINQ, Entity Framework, NHibernate, DAL, ORM [игнор отключен] [закрыт для гостей] / ADO и 1С 7.7
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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