Problema con SQLConnection

[fzegarra]

Hola a todos.

Tengo un problema con la conexión a BD sql Server 2005. Estoy intentando ejecutar un store procedure con parametros y en la clase Conexion me da un error en la instrucción:

Public cn As New SqlConnection(ConnectionStrings("CnxSQLServer").Co nnectionString)

"Referencia a objeto no establecida como instancia de un objeto."

Este es el código de la clase:

Código:

Imports System.Data.SqlClient
Imports System.Configuration.ConfigurationManager

Public Class Conexion
   Public cn As New SqlConnection(ConnectionStrings("CnxSQLServer").ConnectionString)

   'propiedad de solo lectura
   Public ReadOnly Property Conecta() As SqlConnection
      Get
         Return cn   'devuelve el objeto con cadena de conexion
      End Get
   End Property
End Class

Y así la utilizo:

Código:

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

Public Class DetPedidos

   Private Sub DetPedidos_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

      ConParametros()

   End Sub

   Private Sub ConParametros()

      Dim loCnx As New Conexion
      Dim loCmd As New SqlCommand("usp_listarDetOrdenPedido", loCnx.Conecta)
      Dim lnReg As Integer = 0

      Dim lsParam As String = "@pleg"

      loCmd.CommandType = CommandType.StoredProcedure
      loCmd.Parameters.Add(lsParam, SqlDbType.Char, 3).Value = "124"

      Dim daDataAdp As New SqlDataAdapter
      daDataAdp.SelectCommand = loCmd
      daDataAdp.Fill(dsDETPEDIDO)
      lnReg = dsDETPEDIDO.Tables(0).Rows.Count

   End Sub
End Class

Espero puedan ayudarme. Gracias de antemano.

ElFer.

[Malenko]

Creo que el problema viene por no abrir la Connexión del SqlConnection. Antes de ejecutar el procedimiento almacenado tendrías que hacer un:

Código:

cn.Open

[fzegarra]

Gracias por tu respuesta, Malenko.

Cuando se ejecuta "Dim loCnx As New Conexion" me lleva a la clase Conexion, que es donde me da el error en la instrucción "Public cn As New SqlConnection(ConnectionStrings("CnxSQLServer").Co nnectionString)
"

SqlConnection, abre la conexión y por lo tanto no es necesario hacer "cn.Open"

Si alguien tiene la respuesta, que me lance un salvavidas.

Saludos,
ElFer.