Test Foro de elhacker.net SMF 2.1

Programación => .NET (C#, VB.NET, ASP) => Programación General => Programación Visual Basic => Mensaje iniciado por: 01munrra en 1 Abril 2016, 14:06 PM

Título: BD Access, error al realizar una consulta
Publicado por: 01munrra en 1 Abril 2016, 14:06 PM
saludos!

en VB estoy haciendo un sistema, donde require de un usuario y una clave para ingresar al sistema, pero cuando ingreso el usuario y su clave, y presiono el boton Aceptar, al hacer la consulta, me esta borrando todos los registro de la tabla de la base de dtos, y no entiendo por que. Aqui el codigo:

Código (vbnet) [Seleccionar]

    Private Sub Button_aceptar_Click(sender As Object, e As EventArgs) Handles Button_aceptar.Click

        orden = "Select * from experto where usuario = '" & Trim(TextBox_usuario_experto.Text) & "'"
        t_experto.CommandText = orden
        registro = t_experto.ExecuteReader
       
        If registro.HasRows = True Then
            registro.Read()

            If registro(0) = Trim(TextBox_usuario_clave.Text) Then
                'Hacer
            Else
                MsgBox("Datos Incorectos", MsgBoxStyle.Critical, "Error")
            End If
        Else
            MsgBox("Datos Incorectos", MsgBoxStyle.Critical, "Error")
        End If

    End Sub


que estoy haciendo mal???
Título: Re: BD Access, error al realizar una consulta
Publicado por: Cj2009z en 21 Abril 2016, 04:22 AM
que tal!, intenta colocar en la secuencia SQL esto: SELECT usuario FROM experto where=.....  en vez de seleccionar todos los registros de dicha tabla.
Título: Re: BD Access, error al realizar una consulta
Publicado por: engel lex en 21 Abril 2016, 04:26 AM
Cita de: Cj2009z en 21 Abril 2016, 04:22 AM
que tal!, intenta colocar en la secuencia SQL esto: SELECT usuario FROM experto where=.....  en vez de seleccionar todos los registros de dicha tabla.

el que va con "=" no es el where es la columna, como el la tiene