Nota
L'accesso a questa pagina richiede l'autorizzazione. È possibile provare ad accedere o modificare le directory.
L'accesso a questa pagina richiede l'autorizzazione. È possibile provare a modificare le directory.
Questo articolo descrive come usare ADO.NET e Visual Basic .NET per creare un database di Microsoft SQL Server a livello di codice.
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 un database SQL Server a livello di codice.
Passaggi per creare l'esempio
Creare un nuovo progetto applicazione Windows .NET di Visual Basic. Form1 viene aggiunto al progetto per impostazione predefinita.
Posizionare un pulsante Comando in Form1 e modificarne la
Name
proprietà inbtnCreateDatabase
e la relativaText
proprietà inCreate Database
.Copiare e incollare la riga di codice seguente nella sezione "dichiarazione generale" di Form1:
Imports System.Data.SqlClient
Copiare e incollare il codice seguente dopo l'area "Codice generato da Progettazione Windows Form":
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
Modificare il stringa di connessione in modo che punti a SQL Server e assicurarsi che l'argomento Database sia impostato su Master o vuoto.
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 creati e ldf deve esistere già 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"