//
界尾 strtmp ="--" ;
strtmp +=boundary ;
strtmp +="--/r/n./r/n" ;
if (send (m_socket ,(cstringa )strtmp ,strtmp .getlength (),0) == socket_error )
if (!checkresponse ("250" ))
// 退出
strtmp ="quit/r/n" ;
if (send (m_socket ,/*"quit/r/n"*/ (cstringa )strtmp ,strtmp .getlength (),0) == socket_error )
if (!checkresponse ("221" ))
releasesocket ();
return
true ; }
bool
cmail ::checkresponse (const
char * recvcode ) ;
if (recv (m_socket ,buf ,1024,0) == socket_error )
return
recvcode [0] == buf [0] && /
recvcode [1] == buf [1] && /
recvcode [2] == buf [2] ? true : false ; }
catch (...)
} 我寫了乙個郵件傳送程式在vc6.0上面能夠成功執行,現在移植到vs2008上面要使用unicode編碼,跟蹤後一直執行到
// 界尾
都是正常的能夠收到250訊息,但是傳送
// 退出
訊息時收不到
221 回應我用抓包工具找到伺服器發回來的211bye但是為什麼程式
還是出問題呢,是不是最後校驗的時候出了問題了還是怎麼回事,希望高手能夠指點,謝謝！
delphi傳送郵件程式
unit unit1 inte ce uses windows,messages,sysutils,variants,classes,graphics,controls,forms,dialogs,idmessage,idbasecomponent,idcomponent,idtcpconnecti...
ABAP程式傳送郵件
1.變數定義 類 cl bcs business communication service,傳送郵件主要用到的功能類,包括建立傳送請求,新增傳送內容,新增傳送位址,到最終的傳送指令發出.send requesttype ref to cl bcs.類 cl document bcs,用來放置傳送的...
ASP JMAIL郵件傳送程式
dim mailserver,mailserverloginname,mailserverloginpass,mailuserdomain,frommail 參 數 設 置 郵件底部的廣告 mailfoot 義大利健康睡眠系統 set jmail server.createobject jmail....