
BFI_DOPMAT / Удаление записей из БД
.pdfprivate: System::Void button6_Click(System::Object^ sender, System::EventArgs^ e) {
// Создаем объект Connection и передаем ему строку подключения auto Подключение = gcnew Data::OleDb::
OleDbConnection( // Строка подключения:
"Data Source=\"x:\\new_BD.mdb\";User " + "ID=Admin;Provider=\"Microsoft.Jet.OLEDB.4.0\";");
Подключение->Open();
// Создаем объект класса Command, передавая ему SQL-команду удаляем имя Света, которое было в БД
auto Команда = gcnew Data::OleDb::OleDbCommand(
"Delete * From [БД телефонов] Where " + "ФИО Like 'Св%'", Подключение); // Выполнение команды SQL
int i = Команда->ExecuteNonQuery(); // i - количество удаленных записей if (i > 0) MessageBox::Show(
"Записи, содержащие в поле ФИО фрагмент 'Св*', удалены"); if (i == 0) MessageBox::Show(
"Запись, содержащая в поле ФИО фрагмент 'Св*', не найдена"); Подключение->Close();
}