Comparar valores TextBox X Banco de dados

[marcelo de souza dias]

Olá a todos, estou começando o estudos da plataforma .net.

Gostaria de saber como comparar dois valores um digitado por usuario e outro contido no banco de dados.

- Fiz a conexão com o banco de dados:

Dim strConexao As String
    Dim strSQL As String
    

    strSQL = "Select Log_id as Codigo, Log_Usuario as Usuario, Log_Nome as Nome from Tab_Login"
    strConexao = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source = (NOME DO BANCO)"

    Dim objConexao As New OleDbConnection(strConexao)
    Dim objCommand As New OleDbCommand(strSQL, objConexao)
    Dim dr As OleDbDataReader

    objConexao.Open()
    dr = objCommand.ExecuteReader()


gostaria de verificar se o usuario e a senha estão corretos 

If ( tUsuario.tex == (campo da tabela Log_usuario )

' INSTRUÇÕES .....

End If

estou com problema na hora de comparar os valores e verificar se a conexão com o banco esta OK

Muito obrigado

[Denis Bittencourt Muniz]

Vamos lá:

Dim strConexao As String
Dim strSQL As String


strSQL = "Select Log_id as Codigo, Log_Usuario as Usuario, Log_Nome as Nome from Tab_Login"
strConexao = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source = (NOME DO BANCO)"

Dim objConexao As New OleDbConnection(strConexao)
Dim objCommand As New OleDbCommand(strSQL, objConexao)
Dim dr As OleDbDataReader

objConexao.Open()
dr = objCommand.ExecuteReader()

While ( dr.Read() )

If dr("Usuario") = tUsuario.text Then
'Processamento
Exit While 'achou e já fez processamento
End If

End While

dr.Close() 'fecha leitor de dados
objConexao.Close() 'fecha a conexão com o banco de dados

Lógicamente, a SQL acima poderia ser modificada, onde uma cláusula WHERE faria a busca pelo nome do usuário e você colocaria apenas um If avaliando se houve retorno de registro (achou usuário). Lembre-se do método Read, a cada chama a ele, enquanto este retornar verdadeiro (true), é porque há registro para leitura. Você pode acessar cada campo da sua expressão SQL.

Caso precise de mais ajuda com o cláusula WHERE (o correto e mais viável em seu caso), pode fazer uma nova postagem. Até mais.