VB.NET Sql Parameters Source Code – Insert Statement

VB.NET Sql Parameters Source Code – Insert Statement

Purpose: – Illustrates using Sql Parameters with Insert Statement.

Prerequistes:

1. Install Visual Basic (Express or Standard Edition)
2. Install SQL Server Express
3. Download Northwind Database
4. Attach Northwind Database to Databases in Sql Express

Notes:

• Console Application is used to simplify things, but Windows Forms or Web Forms could also be used
• You can build a library of syntax examples by using same project over and over and just commenting out what you do not want to execute in Module1.vb

Instructions:

1. Use VB 2008 (Express or Standard) Edition
2. Create new project; select Console Application; name of Project could be VBNET_Syntax.
3. Right-click project name in solution explorer; add new folder; name of folder could be DatabaseADONET
4. Right-click folder; add class; class name could be clsSqlInsert.vb
5. Copy code into clsSqlInsert.vb
6. Copy code into Module1.vb
7. Click green arrow to start with debugging

Step 1: Use View Plain to Cut-n-paste code into clsSqlInsert.vb

Imports System
Imports System.Data
Imports System.Data.SqlClient

Public Class clsSQLInsert

    Sub Main()
        Dim thisConnection As New SqlConnection("server=.\SQLEXPRESS;" & _
            "integrated security=sspi;database=Northwind")

        'Create Command object
        Dim nonqueryCommand As SqlCommand = thisConnection.CreateCommand()

        Try
            ' Open Connection
            thisConnection.Open()
            Console.WriteLine("Connection Opened")

            ' Create INSERT statement with named parameters
            nonqueryCommand.CommandText = _
               "INSERT  INTO Employees (FirstName, LastName) VALUES (@FirstName, @LastName)"

            ' Add Parameters to Command Parameters collection
            nonqueryCommand.Parameters.Add("@FirstName", SqlDbType.VarChar, 10)
            nonqueryCommand.Parameters.Add("@LastName", SqlDbType.VarChar, 20)

            ' Prepare command for repeated execution
            nonqueryCommand.Prepare()

            ' Data to be inserted
            Dim names() As String = {"Wade", "David", "Charlie"}
            For i As Integer = 0 To 2
                nonqueryCommand.Parameters("@FirstName").Value = names(i)
                nonqueryCommand.Parameters("@LastName").Value = names(i)

                Console.WriteLine("Executing {0}", _
                   nonqueryCommand.CommandText)
                Console.WriteLine("Number of rows affected : {0}", _
                   nonqueryCommand.ExecuteNonQuery())
            Next i
        Catch ex As SqlException
            ' Display error
            Console.WriteLine("Error: " & ex.ToString())
        Finally
            ' Close Connection
            thisConnection.Close()
            Console.WriteLine("Connection Closed")

        End Try

        Console.ReadLine()

    End Sub

End Class

Step 2: Use View Plain to Cut-n-paste code into Module1.vb

Module Module1

    Sub Main()
        '***** DataBase-ADO-NET *************

       
        Dim mySQLInsert As New clsSQLInsert
        mySQLInsert.Main()

       
    End Sub

End Module

Related posts:

1. C# – Sql Parameters – Insert Statement C# - Illustrates using Sql parameters with Insert Statement...
2. VB.NET Sql Command Delete Statement Source Code Example Example illustrates using VB.NET Sql Command Delete Statement and checking...
3. VB.NET Sql Command Update Statement Source Code Example VB.NET Source Code Example shows how to use Sql Command...
4. C# Sql Command Delete Statement Source Code Example C# Source Code Example that illustrates using Sql Command Delete...
5. VB.NET ASP.NET Sql Command Insert Statement Source Code Example VB.NET ASP.NET Sql Command Insert Statement Source Code Example...

Related posts brought to you by Yet Another Related Posts Plugin.