Anti spam en macro outlook vba

Soyez le premier à donner votre avis sur cette source.

Vue 18 381 fois - Téléchargée 1 380 fois

Description

Comme j'en avais marre de me faire proposer un agrandissement du penis, j'ai développé un programme pour mettre de coté les messages 'douteux'
et classer les autres.
Le principe est de créer des sous-répertoires associés aux expéditeurs de messages de plus de 30 jours et de les y déplacer.
Sont considérés alors comme spam les messages d'expéditeurs qui n'ont pas de sous-répertoire, ils sont alors déplacés dans le répertoire '>>>Douteux'
une liste de mots clés de spam est gérable à partir du répertoire '>>>Douteux' (voir capture d'écran pour comprendre mon propos) si le message contient un des mots clés, c'est direct à la poubelle.
Pour qu'un expéditeur ne soit plus considéré comme un spammeur il suffit de replacer son message dans la boite de réception, au bout de 30 jours son répertoire sera crée ou d'appuyer sur le bouton de nouveau répertoire.
Les mailing list sont gérées par un controle du destinataire du message à partir des messages émis.
Il est possible de désactiver le trie en mettant un mot clé dans le sujet du message (exemple ici peluche). Si ce mot clé est présent, le message n'est plus considéré comme du spam.
Dans le fichier zip il y a un doc qui explique comment installer cela, je ferai une install plus pro dès que j'en aurai le temps.
Je précise enfin que :
Le classement s'effectue aussi dans les messages transmis.
La première fois, le traitement peux être assez long (si vous avez beaucoup de messages).
Qu'il est possible de créer des sous-répertoires pour ranger ses sous-répertoires (RECURSIF, AUTANT DE SOUS-REPERTOIRE QUE L'ON VEUT)
qu'outlook a la sale habitude d'ouvrir des messagebox pour et qu'il faut répondre oui à l'activation des macros et oui a l'autorisation d'accès au carnet d'adresse sous XP (en plus le message est bidon, car on n'accède pas au adresse)

Je cherche du travail : si vous avez un poste d'ingénieur développement sur Lyon ou autre chose dans le genre, mon cv est dans la base vbfrance.

Conclusion :


- version du 16/07/04 : ajout d'une activation par mot de passe dans le sujet
- version du 14/06/04 : ajout d'une gestion par extension de l'émail : créer un répertoire '@free.fr' considère les emetteur avec cette extension comme non-spam (utile si vous travailler avec une société et ne connaissez pas tout les contacts).
- version du 14/05/04 : ajout d'une gestion de mots clés de spam à partir de répertoire présent dans les douteux (voir capture d'écran pour comprendre mon propos)
purge des messages qui sont resté dans douteux plus de 10 jours.
- version du 11/05/04 : ajout messageBox de récap des messages reçus (poubelle direct, spam possible, bon message avec descriptif de celui-ci) d'après l'idée de cuq

- version du 04/05/04 : ajout d'un bouton pour ajouter des nouveau contact (création de répertoire dans la boite de réception et déplacement du message dans celle-ci)

-versions précédentes :
+ parcours récursif, on crée autant de niveau de sous répertoire que l'on le souhaite
+ on verifie que le destinataire du message n'a jamais recue un message de notre part (une façon de gérer les mailing list)

Codes Sources

A voir également

Ajouter un commentaire

Commentaires

shadowmoy
Messages postés
340
Date d'inscription
jeudi 25 juillet 2002
Statut
Membre
Dernière intervention
25 août 2007
-
agrandissement du penis ? looooool :p
juste une question : est-ce que ootlook accepte des plugins ?
si oui il suffirait de creer un plugins qui te permette d'ajouter des contacts et si l'auteur du message n'est pas dans cette liste on le supprime point bar.

avec le carnet d'adresses ca doit etre faisable en vba je pense...
cs_defrance
Messages postés
24
Date d'inscription
jeudi 6 mars 2003
Statut
Membre
Dernière intervention
20 novembre 2011
-
La saisie d'une liste qui peut être long et AMHA la force du système c'est sa capacité d'auto-aprentissage. Pour ajouter un nouvel auteur, il te suffit de lui créer un sous-répertoire ;-)
mcary
Messages postés
4
Date d'inscription
lundi 25 août 2003
Statut
Membre
Dernière intervention
27 août 2011
-
je l'ai inseré dans outlook; mais il me semble qu'il ne se passe rien.

comment voir que ça marche ?
mcary
Messages postés
4
Date d'inscription
lundi 25 août 2003
Statut
Membre
Dernière intervention
27 août 2011
-
j'ai reussi à le faire fonctionner

bon, c bien pour les spams, mais ça prend la maain sur les regles de messages; ce qui n'est pas trop cool
cs_defrance
Messages postés
24
Date d'inscription
jeudi 6 mars 2003
Statut
Membre
Dernière intervention
20 novembre 2011
-
les règles sont effectivement lancées après l'exécution du filtrage, et les messages déplacés dans >>>douteux ne sont plus pris en compte par les règles.
Cela pose un pb pour les mailing-list, et une solution serai d'ajouter une fonction de filtrage aussi sur les destinataires.

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.