Ver Mensaje Individual
  #1 (permalink)  
Antiguo 16/11/2008, 20:19
papurri
 
Fecha de Ingreso: agosto-2008
Ubicación: Frente al pc
Mensajes: 71
Antigüedad: 15 años, 9 meses
Puntos: 2
necesito ayuda para hacer un loguin

hola expertos a todos los expertos presentes..
como dice el titulo necesito ayuda con un loguin que estoy tratando de hacer con vs 6.0 y una base de datos access.en esto soy muy novato. solo llevo unos dias, tambien les cuento que estoy usando ado. agradeceria mucho su ayuda. segun yo el problema es la consulta sql.les doy el codigo. saludos


Private Sub cmdOK_Click()
Set rst = New ADODB.Recordset
Set comando = New ADODB.Command
Set conexion = New ADODB.Connection

conexion.Open "Provider=Microsoft.Jet.OLEDB.4.0;" & "Data Source=c:\info.mdb"

SQL = "SELECT Nombre, pass FROM usuarios WHERE Nombre = '" & txtUserName.Text & "'" _
& " AND pass = '" & txtPassword.Text & "'"
comando.CommandText = SQL

rst.Open comando.CommandText, conexion

If (rst.RecordCount > 0) Then
frmMenuPrincipal.Show
Else
MsgBox "contraseña invalida, intente otra vez!", , "Login"
txtPassword.SetFocus
SendKeys "{Home}+{End}"
End If
End Sub