Object not set Error

E

eramgarden

Contributor
Joined
Mar 8, 2004
Messages
579
Not sure why I get "Object reference not set to an instance of an object"

-- This is what I have:
Created a User Object:
Code: 
Public Class UserFields
    Private intUserLoginNum As Integer = 0
    Private strUserEmail As String = ""

    Public Property UserLoginNum() As String
        Get
            Return intUserLoginNum
        End Get
        Set(ByVal Value As String)
            intUserLoginNum = Value
        End Set
    End Property

    Public Property [b]email_address()[/b] As String
        Get
            Return strUserEmail
        End Get
        Set(ByVal Value As String)
            strUserEmail = Value
        End Set
    End Property


End Class
Trying to assign a value to a property in my Function

Code: 
Dim objUserFields As UserFields
        Dim dr As SqlClient.SqlDataReader
        Dim cnn As New SqlClient.SqlConnection(...)
        Dim cmd As New SqlClient.SqlCommand("usp_rt_get_userEmail", cnn)

        cnn.Open()
        cmd.Parameters.Add("@UserLogin", userLoginId)

        cmd.CommandType = CommandType.StoredProcedure


        Dim dt As New DataTable
        Dim da As New SqlDataAdapter(cmd)
        da.Fill(dt)

        [b]objUserFields.email_address = dt.Rows(0)("email_address") 'I get the error here [/b]
Columns in Datatable are "email_address" and "User_login_id"...

What am I missing??
 
Last edited:
You never instantiated objUserFields

Before your error add the line
Dim objUserFields as New UserFields

This should solve your problem.


eramgarden said:
Sorry that I have to start a new thread but the other one is down below getting burried:

http://www.aspmessageboard.com/forum/ASPPlus.asp?M=816159&T=816150&F=36&P=1

Not sure why I get "Object reference not set to an instance of an object"

-- This is what I have:
Created a User Object:
Code: 
Public Class UserFields
    Private intUserLoginNum As Integer = 0
    Private strUserEmail As String = ""

    Public Property UserLoginNum() As String
        Get
            Return intUserLoginNum
        End Get
        Set(ByVal Value As String)
            intUserLoginNum = Value
        End Set
    End Property

    Public Property [b]email_address()[/b] As String
        Get
            Return strUserEmail
        End Get
        Set(ByVal Value As String)
            strUserEmail = Value
        End Set
    End Property


End Class
Trying to assign a value to a property in my Function

Code: 
Dim objUserFields As UserFields
        Dim dr As SqlClient.SqlDataReader
        Dim cnn As New SqlClient.SqlConnection(...)
        Dim cmd As New SqlClient.SqlCommand("usp_rt_get_userEmail", cnn)

        cnn.Open()
        cmd.Parameters.Add("@UserLogin", userLoginId)

        cmd.CommandType = CommandType.StoredProcedure


        Dim dt As New DataTable
        Dim da As New SqlDataAdapter(cmd)
        da.Fill(dt)

        [b]objUserFields.email_address = dt.Rows(0)("email_address") 'I get the error here [/b]
Columns in Datatable are "email_address" and "User_login_id"...

What am I missing??
Click to expand...
 
Thanks, I just figured it out when I saw your response.
I was missing "new"
from Dim objUserFields As UserFields
 
Back
Top