如何在代理环境下发送邮件？——C#实现Socket代理方式的邮件发送

素颜马尾好姑娘i 2022-05-15 09:08 452阅读 0赞

前一阵子做项目的时候遇到一个功能需求：当程序异常或者重大事件时候，发送邮件通知管理员。按理说这是一个很简单的需求，但是在开发当中遇到了一个问题：因为客户那里的网络拓扑是一个需要设置代理才可以访问外网smtp服务器的网络环境，所以程序在直连外网时候好使，拿到内网就不能用了。于是我在网上找了很多关于使用C\#程序发邮件的例子，但很少有关于使用代理方式，特别是支持审核代理方式发送的案例，我分别使用了SMTPClient对象，CDO对象来进行开发，发现.net framework提供的smtpclient对象不支持代理方式发送，cdo里面有些关于代理的设置，但是没有关于访问代理时候的用户名、密码、端口设置的地方，于是问题被搁置下来。后来也请求过微软方面的支持，也没有给出什么好的方案【想让我用webservice，因为那个支持代理的审核，但是既然我能在内网使用foxmail，outlook通过设置代理属性后正常的收发邮件，那为什么还要使用什么webservice呢？看来微软的这些所谓的专家也有很菜的方面】。既然高级的方式使用不了，于是考虑回到原点——使用socket方式发送邮件。废话少说吧，先把代码贴出来大家分享：

1.先声明一个TCPClient对象，用于Socket发送

1.  privateTcpClientsendTcp=null;

2.写几个方法用于与SMTP服务器的交互

1.  privatevoidMailSocketAlternation(string\[\]mailto,stringsubject,stringmsg,stringattachpath)
2.  \{
3.  boolcheck=false;
4.  NetworkStreamstream=sendTcp.GetStream();
5.    
    
6.  \#region发送Hello握手 
7.    
    
8.  stringhostName=Dns.GetHostName();
9.    
    
10. check=SendCommand(refstream,"EHLO"\+hostName,"EHLO","250");
11.   
    
12. intround=0;
13. //失败重试 
14. while(!check&&round<5)
15. \{
16. round++;
17.   
    
18. check=SendCommand(refstream,"EHLO"\+hostName,"EHLO","250");
19. \}
20.   
    
21. \#endregion 
22.   
    
23. \#region请求审核登录 
24.   
    
25. check=SendCommand(refstream,"AUTHLOGIN","AUTHLOGIN","334");
26.   
    
27. round=0;
28. while(!check&&round<5)
29. \{
30. round++;
31. check=SendCommand(refstream,"AUTHLOGIN","AUTHLOGIN","334");
32. \}
33.   
    
34. \#endregion 
35.   
    
36. \#region身份验证 
37.   
    
38. check=SendCommand(refstream,Convert.ToBase64String(Encoding.Default.GetBytes(clsParam.Param.SendMailAccount)),"用户名","334");
39.   
    
40. round=0;
41. while(!check&&round<5)
42. \{
43. round++;
44. check=SendCommand(refstream,Convert.ToBase64String(Encoding.Default.GetBytes(clsParam.Param.SendMailAccount)),"用户名","334");
45. \}
46.   
    
47. if(!check)
48. \{
49. thrownewException("邮件帐户身份验证失败!");
50. \}
51.   
    
52. check=SendCommand(refstream,Convert.ToBase64String(Encoding.Default.GetBytes(clsParam.Param.SendMailPWD)),"密码","235");
53.   
    
54. round=0;
55. while(!check&&round<5)
56. \{
57. round++;
58.   
    
59. check=SendCommand(refstream,"EHLO"\+hostName,"EHLO","250");
60. intround0=0;
61. while(!check&&round0<5)
62. \{
63. round0++;
64. check=SendCommand(refstream,"EHLO"\+hostName,"EHLO","250");
65. \}
66.   
    
67. check=SendCommand(refstream,"AUTHLOGIN","AUTHLOGIN","334");
68.   
    
69. check=SendCommand(refstream,Convert.ToBase64String(Encoding.Default.GetBytes(clsParam.Param.SendMailAccount)),"用户名","334");
70.   
    
71. check=SendCommand(refstream,Convert.ToBase64String(Encoding.Default.GetBytes(clsParam.Param.SendMailPWD)),"密码","235");
72. \}
73.   
    
74. if(!check)
75. \{
76. thrownewException("邮件帐户身份验证失败!");
77. \}
78.   
    
79. \#endregion 
80.   
    
81. \#region发件人 
82.   
    
83. check=SendCommand(refstream,"MAILFROM:<"\+clsParam.Param.SendMailAccount+">","MAILFROM","250");
84.   
    
85. round=0;
86. while(!check&&round<5)
87. \{
88. round++;
89. check=SendCommand(refstream,"MAILFROM:<"\+clsParam.Param.SendMailAccount+">","MAILFROM","250");
90. \}
91.   
    
92. \#endregion 
93.   
    
94. \#region收件人 
95.   
    
96. check=SendCommand(refstream,"RCPTTO:<"\+mailto\[0\]+">","RCPTTO","250");
97.   
    
98. round=0;
99. while(!check&&round<5)
100. \{
101. round++;
102. check=SendCommand(refstream,"RCPTTO:<"\+mailto\[0\]+">","RCPTTO","250");
103. \}
104.   
    
105. \#endregion 
106.   
    
107. \#region抄送人 
108.   
    
109. if(mailto.Length>1)
110. \{
111. for(inti=1;i<mailto.Length;i++)
112. \{
113. check=SendCommand(refstream,"RCPTTO:<"\+mailto\[i\]+">","RCPTTO","250");
114.   
    
115. round=0;
116. while(!check&&round<5)
117. \{
118. round++;
119. check=SendCommand(refstream,"RCPTTO:<"\+mailto\[i\]+">","RCPTTO","250");
120. \}
121. \}
122. \}
123.   
    
124. \#endregion 
125.   
    
126. \#region密送人 
127.   
    
128. //这里看大家是否需要了,可以偷偷给自己发一份，呵呵
129.   
    
130. \#endregion 
131.   
    
132. \#region请求发送邮件体 
133.   
    
134. check=SendCommand(refstream,"DATA","DATA","354");
135.   
    
136. round=0;
137. while(!check&&round<5)
138. \{
139. round++;
140. check=SendCommand(refstream,"DATA","DATA","354");
141. \}
142.   
    
143. \#endregion 
144.   
    
145. \#region发送邮件头 
146.   
    
147. StringBuildermailhead=newStringBuilder();
148. mailhead.Append("Subject:"\+subject)
149. .Append("/nDate:"\+DateTime.Now.ToString("yyyy-MM-ddHH:mm:ss.fff"))
150. .Append("/nFrom:"\+"上报软件<"\+clsParam.Param.SendMailAccount+">")
151. .Append("/nTo:"\+mailto\[0\]);
152.   
    
153. if(mailto.Length>1)
154. \{
155. mailhead.Append("/nCc:");
156.   
    
157. for(inti=1;i<mailto.Length;i++)
158. \{
159. mailhead.Append(mailto\[i\]+";");
160. \}
161. \}
162.   
    
163. mailhead.Append("/nBcc:[a@b.com/n/n][a_b.com_n_n]"); //这个地方大家随便改，注意这只是头，而不是真正的接收者，客户端只会解释，而不会发送，发送的是完全由RCPT TO控制的
164.   
    
165. \#endregion 
166.   
    
167. \#region发送邮件内容 
168.   
    
169. check=SendCommand(refstream,mailhead.ToString()
170. \+msg
171. \+"/n/r/n./r/n","信已发出,服务器","250",false);
172.   
    
173. round=0;
174. while(!check&&round<5)
175. \{
176. round++;
177.   
    
178. check=SendCommand(refstream,mailhead.ToString()
179. \+msg
180. \+"/n/r/n./r/n","信已发出,服务器","250",false);
181. \}
182. 
183. \#endregion 
184. \}
185.   
    
186. privateboolSendCommand(refNetworkStreamnetstream,stringcontent,stringrehead,stringreflag)
187. \{
188. returnSendCommand(refnetstream,content,rehead,reflag,true);
189. \}
190.   
    
191. privateboolSendCommand(refNetworkStreamnetstream,stringcontent,stringrehead,stringreflag,boolisNewLine)
192. \{
193. boolretBool=false;
194.   
    
195. try
196. \{
197. WriteToNetStream(refnetstream,content,isNewLine);
198. stringcome=ReadFromNetStream(refnetstream);
199. AddLog(rehead+"应答:"\+come+"/r/n");
200. retBool=CheckForError(come,reflag);
201. \}
202. catch
203. \{
204. retBool=false;
205. \}
206.   
    
207. returnretBool;
208. \}
209.   
    
210. privatevoidWriteToNetStream(refNetworkStreamNetStream,stringCommand)
211. \{
212. WriteToNetStream(refNetStream,Command,true);
213. \}
214. 
215. privatevoidWriteToNetStream(refNetworkStreamNetStream,stringmessage,boolisNewLine)
216. \{
217. stringstringToSend=isNewLine?message+"/r/n":message;
218.   
    
219. byte\[\]arrayToSend=Encoding.Default.GetBytes(stringToSend.ToCharArray());
220. NetStream.Write(arrayToSend,0,arrayToSend.Length);
221. \}
222.   
    
223. privatestringReadFromNetStream(refNetworkStreamNetStream)
224. \{
225. byte\[\]temp=newbyte\[512\];
226. NetStream.Read(temp,0,temp.Length);
227.   
    
228. returnEncoding.Default.GetString(temp);;
229. \}
230.   
    
231. privateboolCheckForError(stringstrMessage,stringcheck)
232. \{
233. if(strMessage.IndexOf(check)==-1)
234. \{
235. returnfalse;
236. \}
237. else
238. \{
239. returntrue;
240. \}
241. \}

3.再包一层方法

1.  privateboolSendMail(stringsubject,stringmsg,stringattachpath)
2.  \{
3.  boolretbool=false;
4.    
    
5.  try
6.  \{
7.  this.btnSendTestMail.Enabled=false;
8.    
    
9.  string\[\]mails=this.txtNoticeMailAddress.Text.Split(";".ToCharArray(),StringSplitOptions.RemoveEmptyEntries);//收件人用;隔开
10.   
    
11. if(clsParam.Param.IsProxy)
12. \{
13. switch(clsParam.Param.ProxyType)
14. \{
15. caseMailProxyType.HTTP:
16.   
    
17. \#regionHTTP方式处理 
18.   
    
19. if(sendTcp==null)
20. \{
21. stringauthstr=clsParam.Param.ProxyUID+":"\+clsParam.Param.ProxyPWD;
22.   
    
23. stringauthproxy="CONNECT"\+clsParam.Param.SendMailSmtpAdd+":"\+clsParam.Param.SendMailSmtpPort
24. \+"HTTP/1.0/r/nProxy-Authorization:Basic"
25. \+Convert.ToBase64String(Encoding.Default.GetBytes(authstr))+"/r/n/r/n";//代理服务器审核
26.   
    
27. booltestproxyflag=true;//测试时候使用，设置成false可以不使用代理的Socket方式发邮件
28.   
    
29. if(testproxyflag)
30. \{
31. sendTcp=newTcpClient(clsParam.Param.ProxyIP,clsParam.Param.ProxyPort);
32. \}
33. else
34. \{
35. sendTcp=newTcpClient(clsParam.Param.SendMailSmtpAdd,clsParam.Param.SendMailSmtpPort);//注释1 
36. \}
37.   
    
38. NetworkStreamstream=sendTcp.GetStream();
39.   
    
40. //发送代理验证 
41. if(testproxyflag)
42. \{
43. WriteToNetStream(refstream,authproxy,false);//注释2 
44. \}
45.   
    
46. //获取验证反馈 
47. stringresponse=ReadFromNetStream(refstream);
48.   
    
49. AddLog("连接应答:"\+response+"/r/n");
50.   
    
51. boolcheck=false;
52.   
    
53. if(testproxyflag)
54. \{
55. check=CheckForError(response,"HTTP/1.0200")||
56. CheckForError(response,"HTTP/1.1200");
57.   
    
58. if(check)
59. \{
60. AddLog("邮件代理连接成功/r/n");
61. \}
62. else
63. \{
64. thrownewException("邮件代理连接失败/r/n");
65. \}
66.   
    
67. stringreceive=ReadFromNetStream(refstream);//这个一定要有,自己在这里走了点弯路
68.   
    
69. AddLog("远端服务器连接应答:"\+receive+"/r/n");
70.   
    
71. check=CheckForError(receive,"220");
72.   
    
73. if(check)
74. \{
75. AddLog("远端服务器连接成功/r/n");
76. \}
77. else
78. \{
79. thrownewException("远端服务器连接失败/r/n");
80. \}
81. \}
82. else
83. \{
84. check=CheckForError(response,"220");//注释3 
85.   
    
86. if(check)
87. \{
88. AddLog("邮件服务器连接成功/r/n");
89. \}
90. else
91. \{
92. thrownewException("邮件服务器连接失败/r/n");
93. \}
94. \}
95. \}
96.   
    
97. try
98. \{
99. //发送邮件 
100. MailSocketAlternation(mails,subject,msg,attachpath);
101. \}
102. catch(Exceptionex)
103. \{
104. sendTcp.Close();
105. sendTcp=null;
106.   
    
107. throwex;
108. \}
109. finally
110. \{
111. if(sendTcp!=null)
112. \{
113. try
114. \{
115. NetworkStreamstream=sendTcp.GetStream();
116.   
    
117. WriteToNetStream(refstream,"QUIT");
118.   
    
119. AddLog("QUIT应答:"\+ReadFromNetStream(refstream)+"/r/n");
120. \}
121. catch(Exceptionex)
122. \{
123. throwex;
124. \}
125. finally
126. \{
127. sendTcp.Close();
128. sendTcp=null;
129. \}
130. \}
131. \}
132.   
    
133. \#endregion 
134.   
    
135. break;
136. caseMailProxyType.SOCKS4: //此种方式我软件没让他支持，如果大家想用可以使用CDO的方法试一下，我也没有试是否可行，但是Socket的方式肯定是可以的，只是要有一些变化，如果有人感兴趣可以给我留言。使用CDO需要在项目里引用Microsoft CDO for Windows 2000 Library和Microsoft ActiveX Data Objects 2.8 Library两个COM
137.   
    
138. \#regionSOCKS4方式处理--暂时不予支持 
139.   
    
140. //CDO.MessageoMsg=newCDO.Message(); 
141.   
    
142. //oMsg.From=clsParam.Param.SendMailAccount; 
143. //oMsg.To=mails\[0\]; 
144. //oMsg.Subject=subject; 
145.   
    
146. //oMsg.HTMLBody=msg; 
147.   
    
148. //if(File.Exists(attachpath)) 
149. //\{ 
150. //oMsg.AddAttachment(attachpath,"",""); 
151. //\} 
152.   
    
153. //CDO.IConfigurationiConfg=oMsg.Configuration; 
154. //ADODB.FieldsoFields=iConfg.Fields; 
155.   
    
156. //oFields\["http://schemas.microsoft.com/cdo/configuration/sendusing"\].Value=2; 
157. //oFields\["http://schemas.microsoft.com/cdo/configuration/smtpauthenticate"\].Value=1; 
158. value=0代表Anonymous验证方式（不需要验证） 
159. value=1代表Basic验证方式（使用basic(clear-text)authentication. 
160. Theconfigurationsendusername/sendpasswordorpostusername/postpasswordfieldsareusedtospecifycredentials.） 
161. Value=2代表NTLM验证方式（SecurePasswordAuthenticationinMicrosoftOutlookExpress） 
162. //oFields\["http://schemas.microsoft.com/cdo/configuration/smtpserver"\].Value=clsParam.Param.SendMailSmtpAdd; 
163. //oFields\["http://schemas.microsoft.com/cdo/configuration/sendemailaddress"\].Value=clsParam.Param.SendMailAccount;//sendermail 
164. //oFields\["http://schemas.microsoft.com/cdo/configuration/sendusername"\].Value=clsParam.Param.SendMailAccount; 
165. //oFields\["http://schemas.microsoft.com/cdo/configuration/sendpassword"\].Value=clsParam.Param.SendMailPWD; 
166.   
    
167. //oFields\["http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout"\].Value=5; 
168. //oFields\["http://schemas.microsoft.com/cdo/configuration/languagecode"\].Value=0x0804; 
169.   
    
170. 代理设置 
171. oFields\["http://schemas.microsoft.com/cdo/configuration/urlproxyserver"\].Value="182.1.1.200"; 
172. oFields\["http://schemas.microsoft.com/cdo/configuration/proxyserverport"\].Value=8080; 
173.   
    
174. //oFields.Update(); 
175. //oMsg.BodyPart.Charset="gb2312"; 
176. //oMsg.HTMLBodyPart.Charset="gb2312"; 
177.   
    
178. //oMsg.Send(); 
179. //oMsg=null; 
180.   
    
181. \#endregion 
182.   
    
183. break;
184. caseMailProxyType.SOCKS5: //同Socket4的注释
185.   
    
186. \#regionSOCKS5方式处理--暂时不予支持 
187.   
    
188. \#endregion 
189.   
    
190. break;
191. \}
192. \}
193. else
194. \{ //这种方式我也列出来，方便大家参考，如果能直连外网，这个方式最简单
195. \#region标准方式发送邮件 
196.   
    
197. System.Net.Mail.MailMessagemail=newSystem.Net.Mail.MailMessage();
198. SmtpClientSmtpServer=newSmtpClient();
199. SmtpServer.Credentials=newSystem.Net.NetworkCredential(clsParam.Param.SendMailAccount,clsParam.Param.SendMailPWD);
200. SmtpServer.Port=25;
201. SmtpServer.Host=clsParam.Param.SendMailSmtpAdd;
202. SmtpServer.EnableSsl=false;
203.   
    
204. mail.From=newMailAddress(clsParam.Param.SendMailAccount,"上报软件",System.Text.Encoding.Default);
205.   
    
206. mail.To.Add(mails\[0\]);
207.   
    
208. if(mails.Length>1)
209. \{
210. for(inti=1;i<mails.Length;i++)
211. \{
212. mail.CC.Add(mails\[i\]);
213. \}
214. \}
215.   
    
216. mail.Bcc.Add("a@b.com");
217.   
    
218. if(File.Exists(attachpath))
219. \{
220. mail.Attachments.Add(newAttachment(attachpath));
221. \}
222.   
    
223. mail.IsBodyHtml=false;
224. mail.BodyEncoding=Encoding.Default;
225. mail.SubjectEncoding=Encoding.Default;
226. mail.DeliveryNotificationOptions=DeliveryNotificationOptions.OnFailure;
227.   
    
228. mail.Subject=subject;
229. mail.Body=msg;
230.   
    
231. SmtpServer.Send(mail);
232.   
    
233. \#endregion 
234. \}
235.   
    
236. AddLog("邮件发送成功");
237.   
    
238. retbool=true;
239. \}
240. catch(Exceptionex)
241. \{
242. AddLog("发送邮件异常:"\+ex.Message);
243.   
    
244. retbool=false;
245. \}
246. finally
247. \{
248. this.btnSendTestMail.Enabled=true;
249. \}
250.   
    
251. returnretbool;
252. \}

4.下面我们测试一下

1.  privatevoidbtnSendTestMail\_Click(objectsender,EventArgse)
2.  \{
3.  if(SendMail("【系统自动邮件】系统运行情况通知","这是一封测试邮件",null))
4.  \{
5.  MessageBox.Show("测试邮件发送成功!","",MessageBoxButtons.OK,MessageBoxIcon.Information);
6.  \}
7.  else
8.  \{
9.  MessageBox.Show("测试邮件发送失败!","",MessageBoxButtons.OK,MessageBoxIcon.Error);
10. \}
11. \}

程序写的匆忙，注释少了一些，不过应该还方便看出思路，上面我分别列出了三种发送邮件的方式，其中Socket的方式又可以采用三种代理方式来搞定（我只列出了一种HTTP方式的，另两种可以和我联系）。关于SMTP交互的方式，我参考了[RFC821][]的文档，如果E文不好，可以参考[中文的][Link 1]，对于发送方法还借鉴了微软社区的[这篇文章][Link 2]。另外，对于通过审核代理方式可以参考这篇[网文][Link 3]，关于CdoConfiguration Module可以参考这篇[资料][Link 4]。在Socket方法里我没有实现附件的功能，因为我那里不需要，如果大家想用，可以留言联系。

希望这些代码可以对一些有相同问题困扰的Coder们有所帮助，有问题大家留言探讨。

原文链接：http://blog.csdn.net/luyifeiniu/article/details/3320651

[a_b.com_n_n]: mailto:a@b.com/n/n
[RFC821]: http://www.faqs.org/rfcs/rfc821.html
[Link 1]: http://www.cngr.cn/article/54/66/2006/2006071930221.shtml
[Link 2]: http://www.microsoft.com/china/community/program/originalarticles/techdoc/sendmail.mspx
[Link 3]: http://www.vcsoft.org/bbs/viewthread.php?tid=19
[Link 4]: http://msdn.microsoft.com/en-us/library/ms526288%28EXCHG.10%29.aspx