Creare SQL Server database a livello di codice usando ADO.NET e Visual Basic .NET

Questo articolo descrive come usare ADO.NET e Visual Basic .NET per creare a livello di codice un database microsoft SQL Server.

Versione originale del prodotto: ADO.NET, Visual Basic .NET
Numero KB originale: 305079

Riepilogo

I programmatori spesso devono creare database a livello di codice. Questo articolo descrive come usare ADO.NET e Visual Basic .NET per creare a livello di codice un database SQL Server.

Passaggi per creare l'esempio

  1. Creare un nuovo progetto applicazione Windows .NET di Visual Basic. Form1 viene aggiunto al progetto per impostazione predefinita.

  2. Posizionare un pulsante Di comando in Form1 e modificare la proprietà NamebtnCreateDatabase in e la relativa Text proprietà in Create Database.

  3. Copiare e incollare la riga di codice seguente nella sezione "general declaration" di Form1:

    Imports System.Data.SqlClient
    
  4. Copiare e incollare il codice seguente dopo l'area "Windows Form Designer codice generato":

    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. Modificare il stringa di connessione in modo che punti al SQL Server e assicurarsi che l'argomento Database sia impostato su Master o vuoto.

  6. Premere F5 o CTRL+F5 per eseguire il progetto e quindi fare clic su Crea database.

Note aggiuntive

  • Questo codice crea un database personalizzato con proprietà specifiche.

  • La cartella che conterrà i file .mdf e ldf creati deve già esistere prima di eseguire il codice o verrà generata un'eccezione.

  • Se si vuole creare un database simile al database Model di SQL Server e nel percorso predefinito, modificare la variabile str nel codice:

    str = "CREATE DATABASE MyDatabase"
    

Riferimenti