Envoit mail masm32

Soyez le premier à donner votre avis sur cette source.

Snippet vu 9 358 fois - Téléchargée 28 fois

Contenu du snippet

Permet d'envoyer un mail grace a winsock

Source / Exemple :


;MASM32

.486
.model flat,stdcall
option casemap:none

include \masm32\include\windows.inc
include \masm32\include\masm32.inc
include \masm32\include\wsock32.inc                                              
include \masm32\include\user32.inc
include \masm32\include\kernel32.inc
includelib \masm32\lib\user32.lib
includelib \masm32\lib\kernel32.lib
includelib \masm32\lib\wsock32.lib
includelib \masm32\lib\masm32.lib 

Mys PROTO :DWORD

.DATA 

SMTP db "195.238.3.128",0               ;IP du srv smtp.infonie.be

HELO db "HELO smtp.infonie.be",13 ,10 ,0
MAIL_FROM db "MAIL FROM:dequi@cavien.fr",13 ,10 ,0  
RCPT_TO db "RCPT TO:personne@quituvxenvoyer.com",13 ,10 ,0  
DONNEES db "DATA",13 ,10 ,0                       
TEXTE db "Hello world !",13 ,10 ,13 ,10 ,0        
FIN_DONNEES db ".",13 ,10 ,0                      

FERME db "QUIT",13 ,10 ,0                 ;fini  la connection 
;smtp

wsadata WSADATA <>                        ;pour la structure du socket
sin sockaddr_in <>
Port dd 25                                        ;port smtp

.DATA?

sock dd ?                                         ;pour la structure du socket
buf db 255 dup (?)                            ;buffer pour le MessageBox

.CODE
start:    

invoke WSAStartup,101h,addr wsadata	          ;initialise le socket			
invoke socket,AF_INET,SOCK_STREAM,IPPROTO_IP                
mov sock,eax
mov sin.sin_family,AF_INET                   ;famille de socket
invoke htons,Port                                 ;port 25
mov sin.sin_port,ax        
invoke inet_addr, addr SMTP                 ;ip du smtp
mov sin.sin_addr, eax   

invoke connect, sock, addr sin ,sizeof sin        ;on se connecte
invoke recv, sock, addr buf, sizeof buf, 0        ;et affiche la reponse

;         HELO SERVER     
invoke Mys, addr HELO                             ;envoit HELO smtp.infonie.be
invoke recv, sock, addr buf, sizeof buf, 0
invoke MessageBox,0,addr buf, addr HELO, MB_OK

;         MAIL TO:
invoke Mys, addr MAIL_FROM                        ;envoit MAIL FROM: 
invoke recv, sock, addr buf, sizeof buf, 0
invoke MessageBox,0,addr buf, addr MAIL_FROM, MB_OK

;         RCPT TO:
invoke Mys, addr RCPT_TO                          ;envoit RCPT TO: 
invoke recv, sock, addr buf, sizeof buf, 0
invoke MessageBox,0,addr buf, addr RCPT_TO, MB_OK

;        DATA
invoke Mys, addr DONNEES                          ;envoit DATA 
invoke recv, sock, addr buf, sizeof buf, 0
invoke MessageBox,0,addr buf, addr DONNEES, MB_OK

invoke Mys, addr TEXTE                            ;envoit le text 

;        DATA
invoke Mys, addr FIN_DONNEES                      ;envoit  .
invoke recv, sock, addr buf, sizeof buf, 0
invoke MessageBox,0,addr buf, addr FIN_DONNEES, MB_OK

;        DATA
invoke Mys, addr FERME                            ;envoit QUIT 
invoke recv, sock, addr buf, sizeof buf, 0
invoke MessageBox,0,addr buf, addr FERME, MB_OK

invoke closesocket,sock                           ;ferme le socket et quit
invoke WSACleanup
invoke ExitProcess,eax

;---------------------------------------

Mys proc SendStr : DWORD                          

push edi
mov edi, SendStr
.WHILE TRUE
.BREAK .IF (byte ptr [edi] == 0 )
invoke send, sock, edi, 1, 0                     
inc edi                                                     
.ENDW  
pop edi
ret
Mys endp

END start

Conclusion :


visite http://www.passionpc.net

A voir également

Ajouter un commentaire Commentaires
Messages postés
2
Date d'inscription
samedi 25 mai 2002
Statut
Membre
Dernière intervention
25 avril 2004

beh
Je n'ai jamais eu cette erreure!
Je te conseil de retélécharger masm32 et de le réinstaler.
pour le télécharger http://www.movsd.com/masmdl.htm.
Messages postés
3
Date d'inscription
dimanche 28 décembre 2003
Statut
Membre
Dernière intervention
18 avril 2004

hello all g besoin d'aide je suis un noob et g un chtit pb...
a chaque fois que j'essaie de compiler une source sa me met ca:

FATAL ERROR CVT 1101: cannot open rsrc.res for reading ...

et je sait pas se qu'il faut faire la , merci d'avance.
Messages postés
4525
Date d'inscription
dimanche 29 septembre 2002
Statut
Modérateur
Dernière intervention
22 avril 2019
9
Pour faire un vrais mail anonyme c'est on ne peut plus simple et sans danger ... tu installe simplement un pipe sur un pc d'un pote ou sur un serveur proxy (le pipe sera un programme qui ecoute sur un port et renvoi les donnees sur un autre) tu te branche sur ce pipe tu lui demande une redirection sur l'hote et t'envoi les donnees et la t'es tranquille l'adresse ip sera soit le serveur proxy soit l'ip du provider du mec et toi personne ne pourra savoir que tu t'es connecté...

Et le top du top c'est de placer plusieurs pipe sur plusieurs machines et de les redirigé les une sur les autre de se connecter a l'hote !

De toute maniere il y autant de facon de tricher que de trouver un tricheur

Part contre je vous conseil pas de vous connecter a partir d'un dial up sur un serveur SMTP car votre IP irait directement s'enregistrer aupres de l'association Mail abuse et tout autre connexion echoura

Et n'oublier pas que votre IP c'est comme un n° de telepone le provider paye pour l'utilisation du n° et par consequant il garde une trace de qui la possede, quand et pendant combien de temps donc fixe ou temporaire garder la bien precieusement !

sue ce b@nne prog
Messages postés
50
Date d'inscription
samedi 1 septembre 2001
Statut
Membre
Dernière intervention
20 septembre 2006

Xavier092 : tient,je savais pas ça mais alors si maintenant tu veut retrouver mon ip comment tu fais? DEUXIEME QUESTION : si je me met derrière un proxy anonyme,on peut toujours la connaitre?
avec les adresses ip,g jamais rien compris....
Messages postés
56
Date d'inscription
mardi 27 août 2002
Statut
Membre
Dernière intervention
4 février 2008
1
en plus moi j'ai une ip fixe , alors c'est du rapide :p
Afficher les 19 commentaires

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.

Du même auteur (Supden2000)