You have multiple accounts
Choose the account you want to sign in with.

Para obtener una versión de este artículo para Microsoft Visual C++ .NET, vea 307402.


Para obtener una versión de este artículo para Microsoft Visual C# .NET, vea 307283.


Para obtener una versión de este artículo para Microsoft Visual J# .NET, vea 320628.

EN ESTA TAREA

Resumen

Los programadores suelen necesitar crear bases de datos mediante programación. En este artículo se describe cómo utilizar ADO.NET y Visual Basic .NET para crear una base de datos de Microsoft SQL Server mediante programación.

Pasos para crear el ejemplo

  1. Cree un nuevo proyecto de aplicación para Windows en Visual Basic .NET. Se agregará Form1 al proyecto de forma predeterminada.

  2. Coloque un botón Command en Form1 y cambie su propiedad Name a btnCreateDatabase y su propiedad Text a Crear base de datos.

  3. Copie y pegue la línea de código siguiente en la sección de declaraciones generales de Form1:

    Imports System.Data.SqlClient
  4. Copie y pegue el código siguiente después de la región "Código generado por el Diseñador de Windows Forms":

    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. Cambie la cadena de conexión para que señale a SQL Server y asegúrese de que el argumento Database está establecido en Master o está en blanco.

  6. Presione F5 o CTRL+F5 para ejecutar el proyecto y, a continuación, haga clic en Crear base de datos.

Notas adicionales

  • Este código crea una base de datos personalizada con determinadas propiedades.

  • La carpeta que contendrá los archivos .mdf y .ldf creados ya deberá existir antes de ejecutar el código. En caso contrario, se generará una excepción.

  • Si desea crear una base de datos similar a la base de datos modelo de SQL Server y en la ubicación predeterminada, cambie la variable str en el código:

    str = "CREATE DATABASE MyDatabase"

Referencias

Para obtener información adicional acerca del comando CREATE DATABASE de Transact-SQL, vea los Libros en pantalla de SQL Server o MSDN Online Library:

http://msdn.microsoft.com/library/default.asp?url=/library/en-us/tsqlref/ts_create_1up1.aspPara obtener más información acerca de los objetos ADO.NET y su sintaxis, vea la documentación de Microsoft .NET Framework SDK o MSDN Online:

Acceso a datos con ADO.NET
http://msdn2.microsoft.com/en-us/library/e80y5yhx(vs.71).aspxPara obtener información más general acerca de ADO.NET o Visual Basic .NET, vea los siguientes grupos de noticias de MSDN:

microsoft.public.dotnet.framework.adonet

microsoft.public.dotnet.languages.vb

¿Necesita más ayuda?

Ampliar sus conocimientos
Explorar los cursos
Obtener nuevas características primero
Unirse a Microsoft Insider

¿Le ha sido útil esta información?

¿Cuál es tu grado de satisfacción con la calidad del lenguaje?
¿Qué ha afectado a tu experiencia?

¡Gracias por sus comentarios!

×