none
Como pegar dados do usuário logado no MySQL RRS feed

  • Pergunta

  • Não consigo implementar o código, para que após o usuário foi encontrado no banco de dados MySQL, que pegue as informações do mesmo, como NOME REAL que esta na tabela "nome", data criação, "dataCriada" e assim por diante

    Código que faz a conexão com o banco de dados:

    'Conectores para Conexão com o banco de dados MySQL'
            Dim conn As MySqlConnection
            Dim comandos As New MySqlCommand
            Dim consulta As MySqlDataReader
            Dim myAdapter As New MySqlDataAdapter
            Dim myData As New DataTable
            conn = New MySqlConnection
            Dim SQL As String
    
            'Faz a conexão com o servidor Mysql'
            conn.ConnectionString = "Server=000.00.000.000;Database=bancoXXX;Uid=appconta;Pwd=XXXXX;CharSet=utf8;Connection Timeout=300;"
            SQL = "SELECT * FROM usuarios"
    
            Try
    
                'Abre conexão
                conn.Open()
    
                comandos.Connection = conn
                comandos.CommandText = SQL
                myAdapter.SelectCommand = comandos
                myAdapter.Fill(myData)
                comandos.CommandText = "SELECT * from usuarios where login='" + Login_User.Text + "'And senha='" + Senha_User.Text + "'"
                comandos.Connection = conn
                consulta = comandos.ExecuteReader()
    
                'Verifica se o login e senha digitado existe no banco de dados'
                If (consulta.HasRows) Then
    
    				MsgBox("Logado com sucesso")
    				
    				'========= OBTER O DADOS DO USUÁRIO LOGADO COMO O "nome" e "dataCriado" na tabela MySQL ========
    
                    conn.Close()
    
                    'Erro no login
                Else
    
                    MsgBox("Dados incorretos")
    
                End If
    
            Catch myerro As MySqlException
    
                MessageBox.Show("Erro ao conectar com o Banco de dados, motivo: " & myerro.Message)
    
            Finally
    
                conn.Dispose()
    
            End Try
    Depois que usuário é encontrado e verificado, preciso puxar as informações do mesmo!

    domingo, 6 de novembro de 2016 01:32

Respostas

Todas as Respostas