none
Multiples usuarios y contraseñas RRS feed

  • Debate general

  • Tengo una tabla llamada Usuario, en ella hay 4 campos, Idusuario, nombre, apellido, contraseña. he creado un formulario para esta tabla tambien llamado Usuario. en la que puse un botón acepar y otro cancelar

    Quiero que al hacer clic en el botón aceptar valide usuario y contraseña de la tabla usuario y una validado, abra un formulario que he llamado Comanda.

    agradecere enormemente me puedan ayudar con el código que debo escribir en el editor Visual Basic, por siento estoy con el Office 2007 por que no tengo edia de como se escribe el código, eclaro que la base que estoy construyendo es en Acces.

    Gracias de antemano por cooperarme.

    lunes, 9 de mayo de 2011 22:26

Todas las respuestas

  • Buenas.... A ver si te puedo ayudar....

    Dim

    cmd As New SqlCommand()

    cmd.Connection = con

    cmd.CommandType = CommandType.StoredProcedure

    cmd.CommandText =

    "select * from TablaDONDE where usuario = @usuario and clave = @password "

     

    'Aqui creas los parametros.

    cmd.Parameters.Add(

    New SqlParameter("@usuario", SqlDbType.NChar))

    cmd.Parameters.Add(

    New SqlParameter("@password", SqlDbType.NChar))

    cmd.Parameters(

    "@usuario").Value = txt_usuario.Text

    cmd.Parameters(

    "@password").Value = txt_clave.Text

    'Aqui creas unas variable para ver el resultado que te devuelve el Procedimientos.

    Dim resul As

    Integer

    'Aqui abres la coneccion. y luego la cierras mas abajo.

    con.Open()

    resul = Val(cmd.ExecuteScalar()) 'Aqui ejecutas en comando(procedimient

    con.Close()

    'Aqui validas de acuerdo si te devuelve alguna valor.

     

    If resul > 0 Then

    Frm_Menu.Show()

    Frm_Menu.ToolStripStatusLabel6.Text = usuario

     

    Me.Close()

     

    Else

    'De lo contrario muestra un Mensaje.

    MessageBox.Show(

    "Usuario Invalido, Intente nuevamente...", "AUTENTICACION", MessageBoxButtons.OK, MessageBoxIcon.Error)

     

    End If

    ''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''

    Espero que te Alla servido de algo.

    * Para este ejemplo use SQL server pero creo que te funcionará para ACCESS 2007.

    Buena Suerte..XD

    martes, 7 de junio de 2011 16:12