Discussion :

[lisepouliot]

J'ai créer un bouton pour ouvrir un formulaire qui se nomme F_Rendez-vousJR et j'aimerais que lorsque quelqu'un clique sur ce bouton doit saisir son mot de passe personnel afin d'atteindre le formulaire. J'aimerais également être en mesure de pouvoir imprimer un rapport en lien avec les actions faites (ajout, modification, suppression) à l'aide de ces mot de passe. Pouvez-vous m'aider.

[marot_r]

Bonjour.

Si tester le mot de passe n'est pas vraiment difficile, faire un suivi des modifications l'est beaucoup plus.
Est-ce un un "Ça serait bien si je l'avais" ou un "Je ne peux pas vivre sans !" ?

Pour le mot de passe, ci-dessous, une solution simple (à adapter à ta réalité) :

à mettre dans la procédure événementielle associée au bouton entre le sub et le end sub.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
dim mp as string
motPasse=inputbox("Entrer votre mot de passe")
 
dim critere as string: critere="[codeUtilisateur]=""" & Environ$("UserName") & """ and [MotPasse]=""" & MotPasse & """" 'Suppose que tu te sers de l'Id réseau pour identifier tes utilisateurs
dim codeUtilisateur as variant: codeUtilisateur = dfirst("codeUtilisateur", "tblUtilisateur", critere)
 
if not isnull(codeUtilisateur) then
    'Ici le code existant pour ouvrir le formulaire
  else
    msgbox "Mot de passe invalide"
end if

suppose que tu as une table du type :

tblUtilisateur
CodeUtilisateur (CelfPrimaire, Texte, 255 caractères, celui du réseau (ex : AB12345YZW))
MotPasse (texte, 255 caractères)

A+

[marot_r]

Aussi, pour le suivi, Est-ce que tu veux le détail de ce qui a été fait ou seulement que cela a été fait ?

Ex détaillé :

• 2017-05-26 14h10, AB12345YZW, Ajouté enregistrement 123, Champ1="A", Champ2="B"
• 2017-05-26 14h15, AB12345YZW, Modifié enregistrement 123, Champ1="Z", Champ2="B"
• 2017-05-26 14h20, AB12345YZW, Supprimé enregistrement 123, Champ1="Z", Champ2="B"

Ex seulement que cela a été fait.

• 2017-05-26 14h10, AB12345YZW, Ajouté enregistrement
• 2017-05-26 14h15, AB12345YZW, Modifié enregistrement
• 2017-05-26 14h20, AB12345YZW, Supprimé enregistrement

Et une solution alternative assez légère :
Ajouter un champ "Horodateur" qui enregistre seulement qui a fait la dernière modification, ou le dernier ajout. Ne marche pas pour les suppressions.

A+

[lisepouliot]

Lorsque j'ai créer le bouton pour ouvrir mon formulaire que je désire avoir à saisir un mot de passe, ça créer une macro incorporée. Comment je fais pour la détruire afin d'avoir une procédure événementielle.

[bertiny]

En mode création, ouvre simplement les propriétés du bouton. Dans Événement, sur clic, efficaces [Macro incorporée ] puis clique sur les trois points (... ) et choisie procédure évenementielle.

[lisepouliot]

Bonjour.

Si tester le mot de passe n'est pas vraiment difficile, faire un suivi des modifications l'est beaucoup plus.
Est-ce un un "Ça serait bien si je l'avais" ou un "Je ne peux pas vivre sans !" ?

Pour le mot de passe, ci-dessous, une solution simple (à adapter à ta réalité) :

à mettre dans la procédure événementielle associée au bouton entre le sub et le end sub.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
dim mp as string
motPasse=inputbox("Entrer votre mot de passe")
 
dim critere as string: critere="[codeUtilisateur]=""" & Environ$("UserName") & """ and [MotPasse]=""" & MotPasse & """" 'Suppose que tu te sers de l'Id réseau pour identifier tes utilisateurs
dim codeUtilisateur as variant: codeUtilisateur = dfirst("codeUtilisateur", "tblUtilisateur", critere)
 
if not isnull(codeUtilisateur) then
    'Ici le code existant pour ouvrir le formulaire
  else
    msgbox "Mot de passe invalide"
end if

suppose que tu as une table du type :

tblUtilisateur
CodeUtilisateur (CelfPrimaire, Texte, 255 caractères, celui du réseau (ex : AB12345YZW))
MotPasse (texte, 255 caractères)

A+

Ma base données ne sera pas sur un réseau et ma table se somme T_Eleves qui a les champs suivants:

IdEleves (Pas de clé primaire), NomEleve (texte court) et MotdePasse (texte court)

Alors comment puis-je m'y prendre car j'ai essayé ce que tu m'as suggéré et ça fonctionne pas.

[lisepouliot]

Marot_r, ma base données ne sera pas sur un réseau et ma table se somme T_Eleves qui a les champs suivants:

IdEleves (clé primaire), NomEleve (texte court) et MotdePasse (texte court)

Alors comment puis-je m'y prendre pour que lorsque qu'un individu clique sur le bouton que j'ai crée afin d'ouvrir le formulaire F_EnseignantJR lui demande son mot de passe.

Concernant le rapport d'évènement, il faudrait qu'il soit détaillé :

2017-05-26 14h10, AB12345YZW, Ajouté enregistrement 123, Champ1="A", Champ2="B"
2017-05-26 14h15, AB12345YZW, Modifié enregistrement 123, Champ1="Z", Champ2="B"
2017-05-26 14h20, AB12345YZW, Supprimé enregistrement 123, Champ1="Z", Champ2="B"

[marot_r]

Bonjour.

Ma base données ne sera pas sur un réseau

L'ordinateur utilisé pour entrer les données ordinateur ne sera pas connecté à un réseau auprès duquel tes utilisateurs devront s'identifier avant d'avoir accès à l'application ?

Dans ce cas, il te faut faire un formulaire qui contiendra au moins 2 zones de texte :

• NomEleve
• MotDePasse

et un bouton du genre "Se connecter".

Après dans la procédure événementielle associée à l'événement Sur Click du bouton tu mets :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
dim critere as string: critere="[NomEleve]=""" & me.NomEleve & """ and [MotDePasse]=""" & me.MotDePasse & """"
dim idEleve as variant: idEeleve = dfirst("idEleve", "T_Eleve", critere)
 
if not isnull(idEleve) then
    'Ici le code existant pour ouvrir le formulaire
  else
    msgbox "Mot de passe ou nom d'utilisateur invalide"
end if

Pour le log, je reviens plus tard.

A+

[marot_r]

Pour le log, le principe est le suivant :

dans chacun des formulaires utilisés pour modifier tes données :

1. Dans l'événement "Après insertion", enregistrer les valeurs des différents champs dans le log.
2. Dans l'événement "Avant modification", mémoriser les valeurs des différents champs de saisie.
3. Dans l'événement "Après modification", comparer les valeurs mémorisées aux valeurs existantes et enregistrer les différences dans le log.
4. Dans l'événement "Avant suppression", mémoriser l'identifiant (et autres valeurs utiles)
5. Dans l'événement "Après suppression", enregistrer l'identifiant (et autres valeurs utiles) dans le log

Ça c'est la théorie, le code associé peut être un peu délicat écrire et à mettre au point.

Est-ce que T_Eleve est la seule table qui va être modifiée ?

A+

[lisepouliot]

Ma table élèves doit rester intact car elle contient le nom des élèves par contre je me suis créer une T_Utilisateurs avec les champs suivants: IdEleves (clé primaire), NomEleves (texte court) et MotdePasse(texte court). C'est dans cette table que je veux avoir les modifications, suppressions et ajouts.

À l'utilisation du F_EnseignantJR qui contient un F_Rendez-vousJR que les ajouts, modifications ou suppressions s'enregistre dans ma table T_Utilisateurs. Est-ce que je dois créer une requête à l'aide de mes tables T_Rendez-vous, T_EnseignantJR et T_Utilisateurs afin de regrouper tous les champs à enregistrer dans mon rapport d'évènement?

[marot_r]

Bonjour.

Comme je l'ai dit, le suivi se fera au niveau du (ou des) formulaire(s).

Il faut que tu conçoives grosso modo ton interface puis que sur les formulaires concernés tu ajoutes le code pour enregistrer tes modifications.
Plus il y a de tables impliquées, plus cela peut être complexe.

Avant de plonger, je t'invite à faire une scénario de l'utilisation du type :

1. L'utilisateur se connecte.
2. Le système récupère les identifiants pour un usage ultérieur.
3. 
   
   1. L'utilisateur ouvre le formulaire X.
   2. L'utilisateur modifie les données du formulaire X.
      Éventuellement décrire sommairement quelles sont ces modifications.
   3. Le système enregistre les modifications pour les tables Y et Z dont les données sont présentées par le formulaire X.[/INDENT]
4. (Répéter la partie 3 pour chacun des formulaires à surveiller.

Cela va te donner un bonne idée de où mettre ta surveillance.

Tu peux faire cela sur papier même si ton application n'existe pas. Juste pour avoir une idée de où tu t'en vas.

Après on pourra avancer sur comment le faire.

A+