Login password access

Dis moi les pseudos des autres personnes et je te donnerais la solution si tu ne m'as pas menti

Mauvaise réponse

Juste 2 petites questtion : 1 - cela fait combien de temps que tu utilises ACCESS
2 - tu es as quel niveau d'etudes

Tu es gentil de lui répondre nano_info

Non, pas d'autres questions.

Il te demande de faire cela ton tuteur de stage.

Bien sur c'est moi je me demultiplie comme toi

Tu es arrogante à mon goût.

Mais ce n'est pas trop grave.

Veux-tu un exemple pour ton application login et mot de passe?

C'est ton tuteur qui t'a demandé de faire cela.

Il peux pas le faire lui même

Oui appliquer le login et le mot de passe, je sais faire.

J'ai déjà repondu à la question que tu me poses mais tu n'as même pas fait attention (etudes)

Une université sur Paris en gestion et management

En fait tu t'en fou ce que je fais.

Tu veux ta réponse.

La voila.

Voici un exemple que j'ai pris de quelqu'un :

Pour exécuter ce code, il faut activer la référence : Microsoft DAO 3.x Object Library

Le formulaire login/mot de passe permettra à un utilisateur de s'identifier et à la base de le reconnaître et de décider de lui donner
ou non la permission d'accéder à la base. Pour ce faire, on aura besoin d'une table T_User et d'un formulaire " F_Connexion "

Table T_Users (TRIGRAMME, NOM, PRENOM, GROUPE, PASWD) tous les champs sont de type texte. Un enregistrement exemple
de cette table : T_User(SED, SEBASTIEN, DULOT, Administrateur, root)

L'évènement on_click du bouton Connexion :
Private Sub connexion_Click()
Me.Requery
Dim sql, User_id, User_groupe As String
Dim rs As DAO.Recordset
Static i As Byte
sql = "SELECT * FROM T_USERS WHERE TRIGRAMME = \'" & Me.txt_user & "\' AND PASWD =\'"& Me.txt_pass & "\';"
Set rs = CurrentDb.OpenRecordset(sql)
If Not rs.EOF Then
DoCmd.OpenForm "F_Autre_Formulaire", acNormal, , , , acWindowNormal
DoCmd.close acForm, "F_CONNEXION"
User_id = rs("TRIGRAMME").value
User_groupe = rs("GROUPE").value
Else
MsgBox "(Identifiant, Mot de Passe) incorrect ", vbInformation, "Connexion"
i = i + 1
End If
If i = 3 Then
Msgbox "Vous avez dépassé le nombre de tentatives autorisés", vbCritical
DoCmd.Quit
End If
End Sub

J'etais en trian de faire quelque chose.

Je vais bientôt partir du travail.

D'ici 20 minutes

Cela dépend mais le Vendredi je pars plus tôt

Que veux dire "mntr"

Etr que veux dire "mnt"

Tu es en Angleterre à ce que je suppose.

ACCESS c'est un logiciel que je connais bien

France (Paris).