1С, Подключение к SQL-Server (ORACLE), COMОбъект, ADODB.Connection, ADODB.RecordSet, ADODB, SQL запрос

1С

Процедура КнопкаВыполнитьНажатие(Кнопка)
   Conn = Новый COMОбъект ("ADODB.Connection");
   Conn.Open("Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=Northwind");

   RS = Новый COMОбъект ("ADODB.RecordSet");
   RS.Open("select * from customers", Conn);

   Пока НЕ (RS.EOF) Цикл
       Сообщить(RS.Fields(1).Name());
       Сообщить(RS.Fields(1).Value());
       RS.MoveNext();
   КонецЦикла;

   RS.Close();
КонецПроцедуры

Небольшое описание ADODB

Теги: 1С, SQL-Server, ORACLE, COMОбъект, ADODB.Connection, ADODB.RecordSet, ADODB, SQL запрос

VB6, Visual Basic 6, VSFlexGrid, Динамическое обновление рекордсета (ADODB.Recordset) и источника данных (DataSource) через VSFlexGrid

Visual Basic 6

rcd - рекордсет (ADODB.Recordset)
fg - VSFlexGrid
cn - соединение с базой данных (ADODB.Connection)

fg.Editable = flexEDKbdMouse
fg.DataMode = flexDMBoundBatch
rcd.Open "SELECT * FROM r_Prods", cn, adOpenDynamic, adLockPessimistic

...... (Внести изменения в таблицу)

rcd.UpdateBatch ......(Записать изменения)

rcd.CancelBatch ......(Отменить изменения)

Теги: VB6, Visual Basic 6, VSFlexGrid, Динамическое обновление рекордсета, ADODB.Recordset, источник данных, DataSource