本文說明如何使用 ADO.NET 和 Visual Basic .NET,以程式設計方式建立Microsoft SQL Server 資料庫。
原始產品版本: ADO.NET Visual Basic .NET
原始 KB 編號: 305079
摘要
程序設計人員通常需要以程序設計方式建立資料庫。 本文說明如何使用 ADO.NET 和 Visual Basic .NET,以程式設計方式建立 SQL Server 資料庫。
建立範例的步驟
建立新的 Visual Basic .NET Windows 應用程式專案。 Form1 預設會新增至專案。
將 [命令] 按鈕放在 Form1 上,並將其 屬性變更為
btnCreateDatabase,並將其Text屬性變更Name為Create Database。將下列程式代碼列複製並貼到 Form1 的「一般宣告」區段中:
Imports System.Data.SqlClient將下列程式代碼複製並貼到區域 「Windows Form Designer 產生的程式代碼」之後:
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,並確定 Database 自變數設定為 Master 或空白。
按 F5 或 CTRL+F5 執行項目,然後按兩下 [ 建立資料庫]。
其他注意事項
此程式代碼會建立具有特定屬性的自定義資料庫。
將保存所建立.mdf和 .ldf 檔案的資料夾必須已經存在,才能執行程式代碼或產生例外狀況。
如果您想要建立類似於 SQL Server 模型資料庫和預設位置的資料庫,請變更程式代碼中的 str 變數:
str = "CREATE DATABASE MyDatabase"