validar Usuario y contraseña en vb.net 2010 y Firebird 2.1 con un DataReader

Question

Primero que todo muchas gracias a todo aquel que responda a mi pregunta

estoy creando una aplicación que me valida un usuario y una contraseña para esto he creado una clase llamada USUARIO la cual tiene un método Validar_Usuario que hace una conexión a una base de datos firebird 2.1 y me valida el usuario y la contraseña que le asigne al método. El cuestión esta en que cuando le paso parámetros correctos si funciona pero cuando no, no realiza nada de lo que esta en el else, os dejo el código esperando que me puedan ayudar. 

PD: Muchas gracias de ante mano por toda su ayuda.

Imports FirebirdSql.Data.FirebirdClient
Imports System.Configuration
Public Class USUARIO
    Public NOMBREUSUARIO As String
    Public CODIGOUSUARIO As Integer
    Dim CONEXION As New FbConnection
    Public Function ValidarUsuario(User As String, Pass As String) As String
        CONEXION.ConnectionString = Service.My.Settings.CadenaConexion.ToString
        Dim READER As FbDataReader
        Try
            CONEXION.Open()
            Dim COMANDO As New FbCommand("Select * FROM USUARIOS WHERE NOMBRE = @User AND PASSWD = @Pass", CONEXION)
            COMANDO.Parameters.AddWithValue("@User", User)
            COMANDO.Parameters.AddWithValue("@Pass", Pass)
            READER = COMANDO.ExecuteReader
            If READER.HasRows Then
                Do While READER.Read()
                    NOMBREUSUARIO = READER.GetString(1) & " : " & READER.GetInt32(0)
                Loop
            Else
                Console.WriteLine("No puedes Ingresar")
            End If
            READER.Close()
        Catch ex As Exception
            MessageBox.Show("El error fue: " & ex.Message)
        Finally
            CONEXION.Close()
        End Try
        Return NOMBREUSUARIO
    End Function

End Class

Answer 1

porque no usas

READER = COMANDO.ExecuteReader
 If READER.Read Then
    NOMBREUSUARIO = READER.GetString(1) & " : " & READER.GetInt32(0)
  End If
Else
    Console.WriteLine("No puedes Ingresar")
End If

has revisado las vantanas de inmediato o la Command Windows del VS, porque es alli donde escribe el Console.WriteLine()

podrias tambien definir un breakpoint en el codigo para validar que pase por alli la ejecucion

saludos

---

Leandro Tuttini

Blog
Buenos Aires
Argentina

Answer 2

excelente el código me ha funcionado a las mil maravillas 

un millón de gracias