jose
24 de Noviembre del 2003

Hola

Estoy haciendo una aplicación que utiliza tecnología ado.net en vb net. Ésta se tiene que conectar al sql server 2000. Pero a la hora de conectarse da una excepcion.
La clase que se conecta es la siguiente
Public Class dbConeccion
Private Shared cnn As SqlConnection
Private Shared strUsuario As String
Private Shared StrContraseña As String

Public Sub dbConeccion()
cnn = New SqlConnection()
End Sub

Private Shared Sub asignarCadenaConexion()
Dim cadenaConeccion As String
Try
cadenaConeccion = "server = MA3\APPNETPRUEBA;database = BDPRL;" & "user id=" & strUsuario & "; password=" & StrContraseña & "; Persist Integrated Security = True;"
cnn.ConnectionString = cadenaConeccion
Catch objSqlEx As SqlClient.SqlException
'ExceptionManager.Publish(objSqlEx)
Catch objEx As Exception
'ExceptionManager.Publish(objEx)
End Try
End Sub

Public Shared Property usuario() As String
Get
Return strUsuario
End Get

Set(ByVal Value As String)
If Value.IndexOf(";") >= 0 Then
' Lanzar una excepción
Else
strUsuario = Value
' asignarCadenaConexion()
End If
End Set
End Property

Public Shared Property Contraseña() As String
Get
Return StrContraseña
End Get
Set(ByVal Value As String)
If Value.IndexOf(";") >= 0 Then
' Lanzar una excepción
Else
StrContraseña = Value
asignarCadenaConexion()
End If

End Set
End Property

Public Shared Function Verificar() As Boolean

Try
cnn.Open()
Catch
Verificar = False
End Try
cnn.Close()
Return True

End Function

End Class

La excepción que me da es esta:

System.NullReferenceException: Object reference not set to an instance of an object.
at WindowsApplication1.dbConeccion.Verificar() in C:Documents and SettingsJp.RVMis documentosVisual Studio ProjectsMdi WindowsApplication1dbConeccion.vb:line 67
at WindowsApplication1.Contraseña.ButtonAceptar_Click(Object sender, EventArgs e) in C:Documents and SettingsJp.RVMis documentosVisual Studio ProjectsMdi WindowsApplication1Contraseña.vb:line 126

Gracias.