Faire un don
ANNONCES

Bienvenue sur notre forum d'entraide informatique :youpie:
Notre équipe est là pour vous aider à régler vos problèmes informatiques.
Postez un message sur le forum pour expliquer votre problème,
vous obtiendrez une assistance efficace, gratuite et rapide (si les délais sont parfois un peu plus longs, c'est que nous avons beaucoup de demandes :ooops: ).

Si devenir "helper" vous tente, les inscriptions à notre école de formation sont ouvertes par intermittence. Suivez les instructions données sur cette page

N'hésitez pas à rendre une petite visite à nos partenaires, ça leur fera plaisir, et à nous aussi :D

Bloquer les envois de Mails avec un mot de passe

Bloquer les envois de Mails avec un mot de passe.

Messagepar calirocky » Sam 11 Nov 2017 11:51

Bonjour a tous/tes,
Ric025 ayant ouvert un sujet dans le Bar du Forum sur HF (https://helper-formation.fr/viewtopic.php?p=186142#p186112 pour ceux qui ont l'accès), relatif a la possibilité d'autoriser l'envoi de mail avec un mot de passe depuis Outlook (Office), ou si vous préférez d'interdire a un quidam quelconque ayant accès physiquement a son PC d'utiliser sa messagerie pour adresser des e-mails a sa place, je lui ai concocté un bout de code en Visual Basic pour Application (VBA) ainsi qu'un tutoriel pour la mise en œuvre.
Supposant que ce petit travail pourrait être utile a d'autres, je vous en mets copie ci-dessous.





Alors voilà.
  1. Pour commencer, tu fais afficher l'onglet Développeur sur Outlook
    • Fichier > Options > Personnaliser le Ruban
    • Onglets principaux, cocher devant Développeur puis OK

    Image
  2. Dans l'onglet Accueil, cliquer sur Nouveau message (Version 2013 Nouveau Courrier version 2016)
  3. Ceci fait, cliquer dans le ruban sur Développeur puis a gauche sur Visual Basic

    Image
  4. L'interface de programmation va s'ouvrir.
  5. Dans la colonne de gauche, tu ouvres complètement Projet 1 pour descendre a
    ThisOutlookSession


    Image
  6. Sur ThisOutlookSession, tu cliques a droite puis Code.
  7. A droite, dans la colonne de gauche de la nouvelle fenêtre, en haut tu cliques sur la flèche a coté de Général pour obtenir Application.
  8. Tu dois arriver a:

    Image
  9. Maintenant, tu copies colle le script ci-dessous entre les lignes Private Sub Application et End Sub
    Code: Tout sélectionner
        Dim strRetourInput As String
        'Affichage InputBox
        strRetourInput = InputBox("Bonjour," & vbCr & " Veuillez entrer votre mot de passe")
        Dim strOrigin As String
        strOrigin = ("Expedi") 'Ici se trouve ton mot de passe original Expedi, et ici tu peux te le changer.
        If strRetourInput <> strOrigin Then
        MsgBox "Password erroné, Recommencer."
            Cancel = True
        Else: strRetourInput = strOrigin
             
        End If
  10. Dans la colonne de gauche en bas tu peux renommer ton projet en 'Password' ou autre nom a ta convenance.

    Image
  11. Tu cliques ensuite sur Enregistrer ou son raccourcis.
Et tu n'as plus qu'a tester.
En complément, il faut savoir que quiconque ayant accès a ton ordinateur et connaissant un peu VBA et Office, peut parfaitement contourner cette fonction.
Donc, on reprends un peu:

  • Tu peux cliquer sur l'onglet Outils puis sur Propriétés de Password.

    Image
  • Tu ouvres l'onglet Protection et la tu lui mets un mot de passe et tu verrouilles l'affichage, puis tu enregistres.

Image

Voilà, plus personne ne peut te changer du moins sans être expert en Crackage.

Image

Inconvénient, chaque fois que tu voudras envoyer un message, il te faudra entrer le mot de passe d'envoi défini ici comme Expedi.

Calirocky
L'expérience est une lanterne attachée dans le dos, qui ne sert qu'a éclairer le chemin parcouru. (Confucius)
Avatar de l’utilisateur
calirocky
Helper
Helper
 
Messages: 213
Enregistré le: Mer 11 Sep 2013 22:44
Localisation: Saône et Loire
Firefox 56.0 64 bits Firefox 56.0 64 bits
Windows 8 64 bits Windows 8 64 bits
Résolution d’écran: 1200 x 675 1200 x 675

Re : Bloquer les envois de Mails avec un mot de passe.

Messagepar didier68 » Lun 13 Nov 2017 15:15

Hello Cali

Même si je n'utilise pas Outlook tu as fait un bon boulot,très intéressant :king:
Image
didier68
Contributeur
Contributeur
 
Messages: 863
Enregistré le: Sam 11 Juil 2009 11:27
Localisation: Alsace
Firefox 56.0 64 bits Firefox 56.0 64 bits
Windows 7 64 bits Windows 7 64 bits
Résolution d’écran: 1600 x 1000 1600 x 1000

Re : Bloquer les envois de Mails avec un mot de passe.

Messagepar calirocky » Lun 13 Nov 2017 17:10

Merci Didier. :hello:
L'expérience est une lanterne attachée dans le dos, qui ne sert qu'a éclairer le chemin parcouru. (Confucius)
Avatar de l’utilisateur
calirocky
Helper
Helper
 
Messages: 213
Enregistré le: Mer 11 Sep 2013 22:44
Localisation: Saône et Loire
Firefox 56.0 64 bits Firefox 56.0 64 bits
Windows 8 64 bits Windows 8 64 bits
Résolution d’écran: 1200 x 675 1200 x 675


Retourner vers Astuces diverses

 


  • Articles en relation
    Réponses
    Vues
    Dernier message

Qui est en ligne

Utilisateurs parcourant ce forum : Aucun utilisateur enregistré et 2 invités

cron