;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
.386
.model flat, stdcall
option casemap :none ; case sensitive
;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
; Include 数据
;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
include windows.inc
include user32.inc
includelib user32.lib
include kernel32.inc
includelib kernel32.lib
include wsock32.inc
includelib wsock32.lib

.data?
Helo db 128 dup(?)
MailFrom db 128 dup(?)
RcptTo db 128 dup(?)
From db 128 dup(?)
To db 128 dup(?)
Subject db 128 dup(?)
Content db 128 dup(?)
.data
szme db 'ceshimail.f3322.org',0
host db '112.90.137.120',0
fomail db 'qqspy2000@elong.com',0
tomail db '774856095@qq.com',0
biao db '蛮想你',0
nei db '如题',0

szHelo db 'EHLO %s',0dh,0ah,0
szMailFrom db 'MAIL FROM: <%s>',0dh,0ah,0
szRcptTo db 'RCPT TO: <%s>',0dh,0ah,0
szMailData db 'DATA',0dh,0ah,0
szFrom db 'FROM: <%s>',0dh,0ah,0
szTo db 'TO: <%s>',0dh,0ah,0
szSubject db 'Subject: %s',0dh,0ah,0
szContent db '哈哈： %s',0dh,0ah,0
szEndMail db '.',0dh,0ah,0
szQuitMail db 'QUIT',0dh,0ah,0

szErrBind1 db '失败1',0
szok db '成功',0
;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
; 代码段
;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
.code
;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
_Connect proc uses ebx esi edi
local @szBuffer[1024]:byte
local @stSin:sockaddr_in
local hSocket
local @wsaData:WSADATA

invoke WSAStartup,0002h,addr @wsaData
;********************************************************************
; 转换IP地址并建立socket
;********************************************************************
invoke RtlZeroMemory,addr @stSin,sizeof @stSin
invoke inet_addr,addr host
.if eax == INADDR_NONE
ret
.endif
mov @stSin.sin_addr,eax
mov @stSin.sin_family,AF_INET
invoke htons,25
mov @stSin.sin_port,ax

invoke socket,AF_INET,SOCK_STREAM,0
.if eax == INVALID_SOCKET
invoke MessageBox,0,addr szErrBind1,NULL,MB_OK
.endif
mov hSocket,eax
;连接
invoke connect,hSocket,addr @stSin,sizeof @stSin

;发送 Helo ：
invoke wsprintf, addr Helo, addr szHelo, addr szme
invoke lstrlen, addr szHelo
invoke send, hSocket, addr Helo, eax, 0



;mail from:<jixiuf@gmail.com>
invoke wsprintf, addr MailFrom, addr szMailFrom, addr fomail
invoke lstrlen, addr MailFrom
invoke send, hSocket, addr MailFrom, eax, 0

invoke RtlZeroMemory,addr @szBuffer,sizeof @szBuffer
invoke recv,hSocket,addr @szBuffer,sizeof @szBuffer,NULL
invoke MessageBox,0,addr @szBuffer,addr MailFrom,MB_OK

;rcpt to:<jixiuf@qq.com>
invoke wsprintf, addr RcptTo, addr szRcptTo, addr tomail
invoke lstrlen, addr RcptTo
invoke send, hSocket, addr RcptTo, eax, 0

invoke RtlZeroMemory,addr @szBuffer,sizeof @szBuffer
invoke recv,hSocket,addr @szBuffer,sizeof @szBuffer,NULL
invoke MessageBox,0,addr @szBuffer,addr RcptTo,MB_OK
;DATA
invoke lstrlen, addr szMailData
invoke send, hSocket, addr szMailData, eax, 0

invoke RtlZeroMemory,addr @szBuffer,sizeof @szBuffer
invoke recv,hSocket,addr @szBuffer,sizeof @szBuffer,NULL
invoke MessageBox,0,addr @szBuffer,addr szMailData,MB_OK
;From
invoke wsprintf, addr From, addr szFrom, addr fomail
invoke lstrlen, addr From
invoke send, hSocket, addr From, eax, 0

invoke RtlZeroMemory,addr @szBuffer,sizeof @szBuffer
invoke recv,hSocket,addr @szBuffer,sizeof @szBuffer,NULL
invoke MessageBox,0,addr @szBuffer,addr From,MB_OK
;To
invoke wsprintf, addr To, addr szTo, addr tomail
invoke lstrlen, addr To
invoke send, hSocket, addr To, eax, 0
;Subject
invoke wsprintf, addr Subject, addr szSubject, addr biao
invoke lstrlen, addr Subject
invoke send, hSocket, addr Subject, eax, 0
;Content
invoke wsprintf, addr Content, addr szContent, addr nei
invoke lstrlen, addr Content
invoke send, hSocket, addr Content, eax, 0
;EndMail
invoke lstrlen, addr szEndMail
invoke send, hSocket, addr szEndMail, eax, 0

invoke RtlZeroMemory,addr @szBuffer,sizeof @szBuffer
invoke recv,hSocket,addr @szBuffer,sizeof @szBuffer,NULL
invoke MessageBox,0,addr szEndMail,addr @szBuffer,MB_OK
;Quit
invoke lstrlen, addr szQuitMail
invoke send, hSocket, addr szQuitMail, eax, 0

invoke MessageBox,0,addr szok,NULL,MB_OK

invoke closesocket, hSocket
invoke WSACleanup
ret

_Connect endp


start:
invoke GetModuleHandle,NULL
invoke _Connect
invoke ExitProcess,NULL
;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
end start

[培训]传播安全知识、拓宽行业人脉——看雪讲师团队等你加入！