
BFI_DOPMAT / Чтение записей из БД
.pdfПрограмма читает все записи из таблицы базы данных с помощью объектов
// Command, DataReader на элемент управления DataGridView (сетка данных)
private: System::Void button5_Click(System::Object^ sender, System::EventArgs^ e) {
// Создаем объект Connection и передаем ему строку подключения: auto Подключение = gcnew OleDb::OleDbConnection(
"Data Source=\"x:\\new_BD.mdb\";User " + "ID=Admin;Provider=\"Microsoft.Jet.OLEDB.4.0\";");
Подключение->Open();
//Создаем объект Command, передавая ему SQL-команду auto Команда = gcnew OleDb::
OleDbCommand("Select * From [БД телефонов]", Подключение);
//Выполняем SQL-команду
auto Читатель = Команда->ExecuteReader();
//(CommandBehavior.CloseConnection) auto Таблица = gcnew DataTable();
//Заполнение "шапки" таблицы
Таблица->Columns->Add(Читатель->GetName(0)); Таблица->Columns->Add(Читатель->GetName(1)); Таблица->Columns->Add(Читатель->GetName(2)); while (Читатель->Read() == true)
// Заполнение (ячеек) таблицы Таблица->Rows->Add(Читатель->GetValue(0),
Читатель->GetValue(1), Читатель->GetValue(2)); // Здесь три поля: 0, 1 и 2
Читатель->Close(); Подключение->Close(); dataGridView1->DataSource = Таблица;
}