Статьи → C++Builder → Базы данных
Подключение приложения C++ Builder к базе данных Excel через ADO
Подключение приложения C++ Builder к базе данных Excel через ADO.
Пример подключения приложения C++ Builder к базе данных Excel через ADO используя OLE интерфейсы:
#include "utilcls.h"
#include "sysvari.h"
#include "ComObj.hpp"
AnsiString sql = "SELECT [справочник отделений$].* From [справочник отделений$] ";
Variant cnn = CreateOleObject("ADODB.Connection");
Variant rst = CreateOleObject("ADODB.Recordset");
cnn.OlePropertySet("Provider","MSDASQL.1");
cnn.OlePropertySet("Open","Driver={Microsoft Excel Driver (*.xls)};
DBQ=D:\\ADO\\справочники.xls; ReadOnly=False;");
rst.OleProcedure("Open" ,sql.c_str(), cnn, 1, 3, 1);
Variant Fields = rst.OlePropertyGet("Fields","Otd");
ListBox1->Clear();
while(rst.OlePropertyGet("EOF")== 0)
{
ListBox1->Items->Add(Fields.OlePropertyGet("OriginalValue"));
}
rst.OleProcedure("MoveNext");
if(rst.OlePropertyGet("EOF")== 1) break;
}
Формирование SQL запросов в книге Excell:Строка AnsiString sql = "SELECT [справочник отделений$].* From [справочник отделений$] "; формирует запрос к данным, находящимся на листе «справочник отделений».
Вы меня спросите: «Как же они формируются ?»
На что я вам отвечу: «Очень просто!»
Чтобы определить в запросе рабочий ...
Добавлена: 15 Сентября 2007
Создание таблицы в Word с помощью C++Builder
Создание в Word листа, по типу конверта:
Variant World = CreateOleObject("Word.Application");
World.OlePropertyGet("Documents").OleFunction("Add");
World.OlePropertySet("Visible", true);
Variant Dialog = World.OlePropertyGet("Dialogs").OleFunction("Item", 173);
String remindex="111",remstreet="222";
Dialog.OlePropertySet("AddrText", OleVariant(remindex+'\n'+remstreet));
Dialog.OleProcedure("Show");
В общем, как работать с Word при помощи OLE-интерфейсов?К Word’у, как и к другим OLE-ориентированным приложениям, в основном, прилагаются VBA справки, в которых изложена иерархия объектов Word, их методы и свойства, с помощью которых и осуществляется управление распределёнными приложениями.
Давайте рассмотрим на каком-нибудь простом примере, как сформировать в Worde, скажем, таблицу.
Для начала откроем Word, и включим запись макроса. (Сервис–>макрос->начать запись)
НИЧЕГО ЛИШНЕГО НЕ РИСУЕМ И НИГДЕ НЕ КЛАЦАЕМ!!!
И рисуем только таблицу. Затем останавливаем запись макроса (Сервис–>макрос->остановить запись). Далее входим в режим VBA (ALT+F11), и смотрим ...
Добавлена: 2 Сентября 2007
