ExecuteReader: Connection property has not been initialized.

[primagic]

I have the following code:

Protected Sub Page_Load(sender As Object, e As System.EventArgs) Handles Me.Load


        Dim conUsers As SqlConnection
        Dim SqlCommand As SqlCommand
        Dim strConnection As String

       
        strConnection = ConfigurationManager.ConnectionStrings("quickbabysitConnectionString").ConnectionString
        conUsers = New SqlConnection(strConnection)
        SqlCommand = New SqlCommand("SELECT [BookingFee] FROM [ParentsMembership] WHERE ([EmailAddress] = @EmailAddress)")
        SqlCommand.Parameters.AddWithValue("@EmailAddress", Session("UserID"))
        conUsers.Open()
        Dim dtrReader As SqlDataReader = SqlCommand.ExecuteReader()

        If dtrReader.HasRows Then
            'if you retrieve more than one row, you need the next line. If only one row, you can leave it out.
            'I will comment it out because you are returning only one row, especially with "TOP 1"
            'while dtrReader.Read()
            txtFee.Text = dtrReader("BookingFee")
            'end while
        Else
            Response.Write("No customer found for the supplied email.")
        End If

        dtrReader.Close()
        conUsers.Close()
    End Sub

I am getting the error ExecuteReader: Connection property has not been initialized.

Any ideas?

Thanks

 

[MarkSweetland]

SqlCommand = New SqlCommand("SELECT [BookingFee] FROM [ParentsMembership] WHERE ([EmailAddress] = @EmailAddress)"[red],strConnection[/red])



Mark

"You guys pair up in groups of three, then line up in a circle."
- Bill Peterson, a Florida State football coach

 

[primagic]

Thanks. I now get the error:

Value of type 'String' cannot be converted to 'System.Data.SqlClient.SqlConnection'.

I added the line

SqlCommand.Connection = conUsers

after

SqlCommand.Parameters.AddWithValue("@EmailAddress", Session("UserID"))

but now I get the error message

System.Data.SqlClient.SqlException: The parameterized query '(@EmailAddress nvarchar(4000))SELECT [BookingFee] FROM [ParentsM' expects the parameter '@EmailAddress', which was not supplied.

on this line:

Dim dtrReader As SqlDataReader = SqlCommand.ExecuteReader()

 

[primagic]

I probably should say that I took your code out and added the line

SqlCommand.Connection = conUsers

as per my previous message. which works. but then I get the parametized error

My previous message didnt make sense