| Код | void OnSend() { m_sFrom = _T("[email protected]"); m_sServer = _T("100.100.100.100"); m_sText = _T("Приветик!"); m_sTo = _T("[email protected]"); UpdateData(TRUE);
CString Serv = "HELO " + m_sServer + "\r\n"; CString From = "MAIL FROM:<" + m_sFrom + ">\r\n"; CString To = "RCPT TO:<" + m_sTo + ">\r\n"; CString Text = m_sText + "\r\n\r\n.\r\n"; char *MailMessage[] = { Serv.GetBuffer(1), From.GetBuffer(1), To.GetBuffer(1), "DATA\r\n", Text.GetBuffer(1), "QUIT\r\n", NULL };
WSADATA Wsa; WSAStartup(0x0101,&Wsa); SOCKET s = socket(AF_INET,SOCK_STREAM,0);
SOCKADDR_IN sin; sin.sin_addr.s_addr = inet_addr(m_sServer); sin.sin_family = AF_INET; sin.sin_port = htons(25);
if(connect(s,(LPSOCKADDR)&sin,sizeof(sin)) == SOCKET_ERROR) MessageBox("Error connect to server :(","Error"); else MessageBox("OK","Message");
int iLength = 0; int iEnd = 0; char sBuff[255] = ""; int iMsg = 0;
do { iLength = recv(s,(LPSTR)sBuff+iEnd, sizeof(sBuff)-iEnd,0); iEnd += iLength; sBuff[iEnd] = '\0'; send(s,(LPSTR)MailMessage[iMsg],strlen(MailMessage[iMsg]),0); iMsg++; //MessageBox(sBuff); }while(MailMessage[iMsg]);
closesocket(s); WSACleanup(); }
|
Сообщение отправляется! Когда читаеш письмо через браузер то все супер! А когда через Outlook - читается как "оПХБЕРХЙ!" почему???
|