Примечание.
Для доступа к этой странице требуется авторизация. Вы можете попробовать войти или изменить каталоги.
Для доступа к этой странице требуется авторизация. Вы можете попробовать изменить каталоги.
В этой статье описывается, как использовать ADO.NET и Visual Basic .NET для программного создания базы данных Microsoft SQL Server.
Исходная версия продукта: ADO.NET, Visual Basic .NET
Исходный номер базы знаний: 305079
Итоги
Программисты часто должны создавать базы данных программным способом. В этой статье описывается, как использовать ADO.NET и Visual Basic .NET для программного создания базы данных SQL Server.
Действия по созданию примера
Создайте проект приложения .NET для .NET для Visual Basic. Форма1 добавляется в проект по умолчанию.
Поместите кнопку Command в Form1 и измените его
Nameсвойство наbtnCreateDatabaseи егоTextсвойствоCreate Database.Скопируйте и вставьте следующую строку кода в раздел "Общее объявление" формы Form1:
Imports System.Data.SqlClientСкопируйте и вставьте следующий код после региона "Созданный код конструктора форм Windows":
Private Sub btnCreateDatabase_Click(ByVal sender As System.Object, _ ByVal e As System.EventArgs) Handles btnCreateDatabase.Click Dim str As String Dim myConn As SqlConnection = New SqlConnection("Server=(local)\netsdk;" & _ "uid=sa;pwd=;database=master") str = "CREATE DATABASE MyDatabase ON PRIMARY " & _ "(NAME = MyDatabase_Data, " & _ " FILENAME = 'D:\MyFolder\MyDatabaseData.mdf', " & _ " SIZE = 2MB, " & _ " MAXSIZE = 10MB, " & _ " FILEGROWTH = 10%)" & _ " LOG ON " & _ "(NAME = MyDatabase_Log, " & _ " FILENAME = 'D:\MyFolder\MyDatabaseLog.ldf', " & _ " SIZE = 1MB, " & _ " MAXSIZE = 5MB, " & _ " FILEGROWTH = 10%)" Dim myCommand As SqlCommand = New SqlCommand(str, myConn) Try myConn.Open() myCommand.ExecuteNonQuery() MessageBox.Show("Database is created successfully", _ "MyProgram", MessageBoxButtons.OK, _ MessageBoxIcon.Information) Catch ex As Exception MessageBox.Show(ex.ToString()) Finally If (myConn.State = ConnectionState.Open) Then myConn.Close() End If End Try End SubИзмените строка подключения, чтобы указать на SQL Server, и убедитесь, что аргумент базы данных имеет значение Master или пусто.
Нажмите клавишу F5 или CTRL+F5, чтобы запустить проект, а затем нажмите кнопку "Создать базу данных".
Дополнительные примечания
Этот код создает пользовательскую базу данных с определенными свойствами.
Папка, в которую будут храниться созданные .mdf и LDF-файлы, уже должны существовать перед запуском кода или создается исключение.
Если вы хотите создать базу данных, аналогичную базе данных модели SQL Server и в расположении по умолчанию, измените переменную str в коде:
str = "CREATE DATABASE MyDatabase"