Udostępnij za pośrednictwem

Programowe tworzenie bazy danych programu SQL Server przy użyciu ADO.NET i programu Visual Basic .NET

W tym artykule opisano sposób programowego tworzenia bazy danych programu Microsoft SQL Server przy użyciu platformy ADO.NET i programu Visual Basic .NET.

Oryginalna wersja produktu: ADO.NET, Visual Basic .NET
Oryginalny numer KB: 305079

Podsumowanie

Programiści często muszą programowo tworzyć bazy danych. W tym artykule opisano sposób programowego tworzenia bazy danych programu SQL Server przy użyciu platformy ADO.NET i programu Visual Basic .NET.

Kroki tworzenia przykładu

  1. Utwórz nowy projekt aplikacji systemu Windows .NET w języku Visual Basic. Formularz1 jest domyślnie dodawany do projektu.

  2. Umieść przycisk Polecenie w formularzu Form1 i zmień jego Name właściwość na btnCreateDatabase i jej Text właściwość na Create Database.

  3. Skopiuj i wklej następujący wiersz kodu do sekcji "ogólna deklaracja" formularza Form1:

    Imports System.Data.SqlClient

  4. Skopiuj i wklej następujący kod po regionie "Wygenerowany kod projektanta formularzy systemu 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

  5. Zmień parametry połączenia, aby wskazywała program SQL Server i upewnij się, że argument bazy danych jest ustawiony na wartość Master lub blank.

  6. Naciśnij F5 lub CTRL+F5 , aby uruchomić projekt, a następnie kliknij pozycję Utwórz bazę danych.

Dodatkowe uwagi

  • Ten kod tworzy niestandardową bazę danych z określonymi właściwościami.

  • Folder, w którym będą przechowywane utworzone pliki .mdf i ldf, muszą już istnieć przed uruchomieniem kodu lub zostanie wygenerowany wyjątek.

  • Jeśli chcesz utworzyć bazę danych podobną do bazy danych modelu programu SQL Server i w domyślnej lokalizacji, zmień zmienną str w kodzie:

    str = "CREATE DATABASE MyDatabase"

Informacje