主题：邮件

'''

Dim m As New MailSender

m.Host = e.Form.Controls("TextBox1").text

m.Port = e.Form.Controls("TextBox6").text

m.Account = e.Form.Controls("TextBox2").text

m.Password = e.Form.Controls("TextBox3").text

m.From =  e.Form.Controls("TextBox7").text & "<" & e.Form.Controls("TextBox4").text & ">"

m.AddReceiver(e.Form.Controls("TextBox5").text)

m.Title = "测试"

m.C

m.SendAsync()

MessageBox.Show("测试!")

 一个个甜的话可以正常发送，  但是 变成上面的代码， 就无法收到了， 这是为什么呢？