Programmgesteuertes Erstellen SQL Server Datenbank mithilfe von ADO.NET und Visual Basic .NET

  • Artikel
  • 2 Minuten Lesedauer

In diesem Artikel wird beschrieben, wie Sie mithilfe von ADO.NET und Visual Basic .NET programmgesteuert eine Microsoft SQL Server-Datenbank erstellen.

Originalversion des Produkts:   ADO.NET, Visual Basic .NET
Ursprüngliche KB-Nummer:   305079

Zusammenfassung

Programmierer müssen datenbanken häufig programmgesteuert erstellen. In diesem Artikel wird beschrieben, wie Sie mithilfe von ADO.NET und Visual Basic .NET programmgesteuert eine SQL Server-Datenbank erstellen.

Schritte zum Erstellen des Beispiels

  1. Erstellen Sie ein neues Visual Basic .NET Windows Application-Projekt. Form1 wird dem Projekt standardmäßig hinzugefügt.

  2. Platzieren Sie eine Befehlsschaltfläche in Form1, und ändern Sie ihre Name Eigenschaft btnCreateDatabase in und ihre Text Eigenschaft in Create Database.

  3. Kopieren Sie die folgende Codezeile, und fügen Sie sie in den Abschnitt "Allgemeine Deklaration" von Form1 ein:

    Imports System.Data.SqlClient

  4. Kopieren Sie den folgenden Code, und fügen Sie ihn nach dem Bereich "Windows vom Formular-Designer generierten Code" ein:

    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

  5. Ändern Sie die Verbindungszeichenfolge so, dass sie auf Ihre SQL Server verweist, und stellen Sie sicher, dass das Argument Datenbank auf "Master" oder "Leer" festgelegt ist.

  6. Drücken Sie F5 oder STRG+F5 , um das Projekt auszuführen, und klicken Sie dann auf Datenbank erstellen.

Zusätzliche Hinweise

  • Mit diesem Code wird eine benutzerdefinierte Datenbank mit bestimmten Eigenschaften erstellt.

  • Der Ordner, der die erstellten MDF- und LDF-Dateien enthält, muss bereits vorhanden sein, bevor Sie den Code ausführen. Andernfalls wird eine Ausnahme generiert.

  • Wenn Sie eine Datenbank erstellen möchten, die der Modelldatenbank von SQL Server und am Standardspeicherort ähnelt, ändern Sie die Str-Variable im Code:

    str = "CREATE DATABASE MyDatabase"

References