Feedback for http://stackoverflow.com/questions/15809242/sql-server-stored-procedure-failing-to-correctly-set-context-info-correctly

authenticate.vb

Public Sub Authenticate(username As String, password As String, connString As String)
    Using oConn As New SqlConnection(connString)
        'Check that connection exists and is open
        oConn.Open()
        If oConn.State = ConnectionState.Open Then
            Using sqlCmd As New SqlCommand("EXEC dbo.sGetHashedPW @UserName = @userName", oConn)
                sqlCmd.Parameters.Add("userName", SqlDbType.VarChar).Value = username 
                _pwhash = sqlCmd.ExecuteScalar
                _authenticated = EncryptHash.VerifyHash(password, "SHA512", _pwhash)
                If _authenticated Then
                    _username = username
                    _connString = oConn.ConnectionString
                    Using sessionCmd As New SqlCommand("EXEC dbo.sStartSession", oConn)
                        _hashToken = sqlCmd.ExecuteScalar
                    End Using
                Else
                    clearVariables()
                End If
            End Using
        End If
    End Using
End Sub