Fill dataset with the results from Store Procedure : Sql Server Store Procedure « Database ADO.net « VB.Net

1. VB.Net
2. Database ADO.net
3. Sql Server Store Procedure

Fill dataset with the results from Store Procedure

 
Imports System
Imports System.Data
Imports System.Data.SqlClient
Imports System.Windows.Forms

Module Module1
    Sub Main()

        ' Create a connection object
        Dim dbConn As New SqlConnection( _
                       "server=(local); database=pubs; integrated security=true")
        Dim cmd As New SqlCommand()

        cmd.CommandText = "spRetrieveAuthor"
        cmd.CommandType = System.Data.CommandType.StoredProcedure
        cmd.Connection = dbConn
        cmd.Parameters.Add(New SqlParameter("@au_id", SqlDbType.Char, 11, "au_id"))

        Dim da As New SqlDataAdapter(cmd)
        Dim ds As New DataSet("Author")
        da.SelectCommand.Parameters(0).Value = "172-32-1176"
        da.Fill(ds)

        If Not ds Is Nothing Then
            MessageBox.Show("Hi, author: " & _
                                   ds.Tables(0).Rows(0)("au_lname").ToString())
        End If


    End Sub
End Module
           
         
  

Related examples in the same category