Criar SQL Server banco de dados programaticamente usando ADO.NET e Visual Basic .NET

Este artigo descreve como usar ADO.NET e o Visual Basic .NET para criar programaticamente um banco de dados do Microsoft SQL Server.

Versão original do produto: ADO.NET, Visual Basic .NET
Número de KB original: 305079

Resumo

Os programadores geralmente precisam criar bancos de dados de forma programática. Este artigo descreve como usar ADO.NET e o Visual Basic .NET para criar programaticamente um banco de dados SQL Server.

Etapas para criar o exemplo

  1. Crie um novo projeto do Aplicativo Windows .NET do Visual Basic. O Form1 é adicionado ao projeto por padrão.

  2. Coloque um botão Comando no Form1 e altere sua Name propriedade para btnCreateDatabase e sua Text propriedade para Create Database.

  3. Copie e cole a seguinte linha de código na seção "declaração geral" do Form1:

    Imports System.Data.SqlClient
    
  4. Copie e cole o seguinte código após a região "Formulário do Windows Designer código gerado":

    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. Altere o cadeia de conexão para apontar para o SQL Server e verifique se o argumento Banco de Dados está definido como Mestre ou em branco.

  6. Pressione F5 ou CTRL+F5 para executar o projeto e clique em Criar Banco de Dados.

Observações adicionais

  • Esse código cria um banco de dados personalizado com propriedades específicas.

  • A pasta que manterá os arquivos .mdf e .ldf criados já deve existir antes de executar o código ou uma exceção será gerada.

  • Se você quiser criar um banco de dados semelhante ao banco de dados Model do SQL Server e no local padrão, altere a variável str no código:

    str = "CREATE DATABASE MyDatabase"
    

Referências