Título: AYUDA!! POCOS PARAMETROS SE ESPERABA 1... Publicado por: JoseCheO en 20 Diciembre 2011, 16:25 pm Dim txtnombre As String
Dim txtclave As String Dim cn As DataEnvironment1 Private Sub entrar_Click() txtnombre = Text1.Text txtclave = Text2.Text Set cn = New DataEnvironment1 cn.rsusuarios.Open "select * from usuario where nombre='" & txtnombre & "' and clave= '" & txtclave & "'" If cn.rsusuarios.EOF = True Then MsgBox "CLAVE O USUARIO INCORRECTO", vbCritical Else Unload Me frmMenuP.Show 1 End If End Sub Private Sub salir_Click() End End Sub ESTE ES UN FORMULARIO PARA VALIDAR EL USUARIO Y CLAVE PARA ACCEDR AL SISTEMA!! AYUDA ME MANDA ESE ERROR Y AL DEPURAR SE POSICIONA EN cn.rsusuarios.Open "select * from usuario where nombre='" & txtnombre & "' and clave= '" & txtclave & "'" |