Créer SQL Server base de données par programmation à l’aide de ADO.NET et visual Basic .NET

  • Article

Cet article explique comment utiliser ADO.NET et Visual Basic .NET pour créer par programmation une base de données Microsoft SQL Server.

Version du produit d’origine : ADO.NET, Visual Basic .NET
Numéro de la base de connaissances d’origine : 305079

Résumé

Les programmeurs ont souvent besoin de créer des bases de données par programmation. Cet article explique comment utiliser ADO.NET et Visual Basic .NET pour créer par programmation une base de données SQL Server.

Étapes de création de l’exemple

  1. Créez un projet d’application Windows Visual Basic .NET. Form1 est ajouté au projet par défaut.

  2. Placez un bouton Commande sur Form1, puis remplacez sa Name propriété par btnCreateDatabase et sa Text propriété par Create Database.

  3. Copiez et collez la ligne de code suivante dans la section « déclaration générale » de Form1 :

    Imports System.Data.SqlClient

  4. Copiez et collez le code suivant après la région « Windows Form Designer code généré » :

    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. Modifiez le chaîne de connexion pour qu’il pointe vers votre SQL Server et assurez-vous que l’argument Base de données est défini sur Master ou vide.

  6. Appuyez sur F5 ou Ctrl+F5 pour exécuter le projet, puis cliquez sur Créer une base de données.

Notes supplémentaires

  • Ce code crée une base de données personnalisée avec des propriétés spécifiques.

  • Le dossier qui contiendra les fichiers .mdf et .ldf créés doit déjà exister avant d’exécuter le code, sinon une exception est générée.

  • Si vous souhaitez créer une base de données similaire à la base de données Model de SQL Server et à l’emplacement par défaut, modifiez la variable str dans le code :

    str = "CREATE DATABASE MyDatabase"

References