Connect to SQL Azure Using ADO.NET

Sample code using ADO.NET to connect to a database in Microsoft SQL Azure Database is very similar to connecting to an instance of SQL Server on your premises

Using this Example

To use this example in Visual Studio with your SQL Azure server, do the following steps:

1. Open Visual Studio and create a new console application.
2. Replace the code in the program file with the code from this example.
3. Replace <ProvideUserName> with the name of an SQL Azure Database login that has been assigned the dbmanager role. Note: if you use the login@server username format, the server portion of the name must match the first part of the server's fully qualified name. For example, if your server is servername.database.windows.net, your login name will look like loginname@servername. For more information about SQL Azure Database roles.
4. Replace <ProvidePassword> with the password associated with the login. Note: We recommend using a strong password when creating a login.
5. Replace <ProvideServerName> with the fully qualified domain name of your SQL Azure server. For example: servername.database.windows.net
6. Replace <ProvideDatabaseName> with the name of the database you want the code to create.
7. Run the code.

' Sample Code

Option Explicit On

Option Strict On

Imports System

Imports System.Collections.Generic

Imports System.Linq

Imports System.Text

Imports System.Data.SqlClient

Imports System.Data

Module Program

    ' Provide the following information

    Private ReadOnly userName As String = "<ProvideUserName>"

    Private ReadOnly password As String = "<ProvidePassword>"

    Private ReadOnly dataSource As String = "<ProvideServerName>"

    Private ReadOnly sampleDatabaseName As String = "<ProvideDatabaseName>"

    Sub Main()

        ' Create a connection string for the master database

        Dim connString1Builder As New SqlConnectionStringBuilder()

        With connString1Builder

            .DataSource = dataSource

            .InitialCatalog = "master"

            .Encrypt = True

            .TrustServerCertificate = False

            .UserID = userName

            .Password = password

        End With

        ' Create a connection string for the sample database

        Dim connString2Builder As New SqlConnectionStringBuilder()

        With connString2Builder

            .DataSource = dataSource

            .InitialCatalog = sampleDatabaseName

            .Encrypt = True

            .TrustServerCertificate = False

            .UserID = userName

            .Password = password

        End With

        ' Connect to the master database and create the sample database

        Using conn As New SqlConnection(connString1Builder.ToString())

            Using command As SqlCommand = conn.CreateCommand()

                conn.Open()

                ' Create the sample database

                Dim cmdText As String

                cmdText = String.Format("CREATE DATABASE {0}", _

                                        sampleDatabaseName)

                command.CommandText = cmdText

                command.ExecuteNonQuery()

                conn.Close()

            End Using

        End Using

        ' Connect to the sample database and perform various operations

        Using conn As New SqlConnection(connString2Builder.ToString())

            Using command As SqlCommand = conn.CreateCommand()

                conn.Open()

                ' Create a table

                command.CommandText = "CREATE TABLE T1(Col1 int primary key, Col2 varchar(20))"

                command.ExecuteNonQuery()

                ' Insert sample records

                command.CommandText = "INSERT INTO T1 (col1, col2) VALUES (1, 'string 1'), (2, 'string 2'), (3, 'string 3')"

                Dim rowsAdded As Integer = command.ExecuteNonQuery()

                ' Query the table and print the results

                command.CommandText = "SELECT * FROM T1"

                Using reader As SqlDataReader = command.ExecuteReader()

                    ' Loop over the results

                    While reader.Read()

                        Console.WriteLine("Col1: {0}, Col2: {1}", _

                                          reader("Col1").ToString().Trim(), _

                                          reader("Col2").ToString().Trim())

                    End While

                End Using

                ' Update a record

                command.CommandText = "UPDATE T1 SET Col2='string 1111' WHERE Col1=1"

                command.ExecuteNonQuery()

                ' Delete a record

                command.CommandText = "DELETE FROM T1 WHERE Col1=2"

                command.ExecuteNonQuery()

                ' Query the table and print the results

                Console.WriteLine("After update/delete, the table has these records...")

                command.CommandText = "SELECT * FROM T1"

                Using reader As SqlDataReader = command.ExecuteReader()

                    ' Loop over the results

                    While reader.Read()

                        Console.WriteLine("Col1: {0}, Col2: {1}", _

                                          reader("Col1").ToString().Trim(), _

                                          reader("Col2").ToString().Trim())

                    End While

                End Using

                conn.Close()

            End Using

        End Using

        Console.WriteLine("Press Enter to continue...")

        Console.ReadLine()

    End Sub

End Module