Создание пустого файла базы данных в VB
Я не нашел в VB подходящего для начинающих способа создания пустого файла базы данных. Поэтому, если у вас установлен Access, сделайте это лучше с его помощью. Если же нет, то вот инструкция для VB без особых пока пояснений.
Создайте проект с кнопкой. В окне Solution Explorer щелкните правой клавишей мыши по пункту References и добавьте (Add Reference) ссылку на новую библиотеку (25.2.2). Для этого в закладке COM появившегося окна Add Reference выберите библиотеку Microsoft ADO Ext. 2.7 for DDL and Security, а затем нажмите Select и OK. В проект добавилось новое пространство имен ADOX, объект которого Catalog и выполнит создание пустого файла при помощи своего метода Create. Введите код:
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim Кат As ADOX.Catalog = New ADOX.Catalog
Кат.Create _
("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Базы\Контакт.mdb;Jet OLEDB:Engine Type=5")
End Sub
Смысл третьей строчки вам станет отчасти ясен несколько позже (24.5.9). Сейчас вам в ней необходимо указать желаемые адрес и имя создаваемого файла. У меня это C:\Базы\Контакт.mdb. Указанная в адресе папка должна существовать заранее.
Запустите проект, нажмите кнопку. Файл создан. Второй раз нажимать на кнопку, сами понимаете, не надо. Закройте проект.
