主题：邮件host请教

 

想学习邮件发送功能，按照下面代码写了

 

但发送不了，估计是m.houst的问题，从邮箱供应商得到的信息是 'POP3: mail.sjtu.org SMTP: mail.sjtu.org

请问m.host 这句如何写？ 我尝试了m.Host = "mail.sjtu.org"   m.Host = “smtp.sjtu.org"   m.Host = "smtp.sjtu.org" 三种写法

 Dim m As New MailSender
        m.Host = "mail.sjtu.org"  

        m.Account = "GeorgeLiao"
        m.Password = "@@@@"   ‘此处隐藏了真实密码
        m.From = "georgeliao@sjtu.org"
        m.To = "george.liao@yahoo.cn"
        m.Title = "test"
        m.C
        m.AddAttachments("C:\Users\George\Desktop\1.txt") 

        m.SendAsync()

另外补充一个问题：

 

想通过发送附件时采用动态值，窗口有个文本框记录每次选择文件的附件名称（含路径）fjlj, m.addattachments()这个冬天值如写，谢谢帮助。

        Dim wj As WinForm.TextBox = e.Form.Controls("fjlj")
        If wj.value IsNot Nothing Then
        Dim fj As String =wj.value
            m.AddAttachments("fj") '将上报文件作为附件发送
        End If

我把1楼的代码写在一个按钮上，点击后没有任何反应，也没用报错。

bin, 谢谢你! 这个邮件地址不是常见类的，您帮我看看下面的配置介绍，指导我调整代码好吗？谢谢！我增加了端口，甚至修改host的Ip为207.46.58.238(对应下面的pod51003.outlook.com)

 

http://alumni.sjtu.edu.cn/alumni/xiaoyouhui/upgrade/outlook.html

 

Dim m As New MailSender
        m.Host = "pod51003.outlook.com" 
        m.port = 587
        m.Account = "GeorgeLiao"
        m.Password = "@@@@@"
        m.From = "georgeliao@sjtu.org"
        m.To = "georgeliao@sjtu.org"
        m.Title = "test"
        m.C
        m.SendAsync()

邮箱应该是正常的，因为我一直在使用中，我想用自己的这个邮箱给其他人发送邮件，所以没考虑用其他邮箱。谢谢

麻烦你看看7楼链接中的几页配置截图，看看能否再给点指导，谢谢！我上午用了不同的代码在测试，但没有结果。

配置文件中有些信息，我将它用红色表示了，我想请您帮助确定我的代码是否有问题。是不是和那个什么架咩链接有关？

 

1：（接收邮件服务器和发送邮件服务器都是 pod51003.outlook.com ）中的 POP3 如下格式填写完整。

 

2：选择“高级”项，按下图所示配置， 选中“此服务器要求加密连接（ SSL ）（ E ）”、“此服务要求加密连接（ SSL ）（ C ）”（选中后方框内有一个 √ ），特别注意“发送服务器（ SMTP ）（ O ）”后的端口要改成 587 ， 点击“确定”即可

 

3：碰到不能发邮件的问题，请使用“特快传递”按钮发邮件。还可以将pod51003.outlook.com直接改成IP地址：207.46.58.238

 

 

Dim m As New MailSender
        m.Host = "pod51003.outlook.com" 
        m.port = 587
        m.Account = "GeorgeLiao"
        m.Password = "@@@@@"
        m.From = "georgeliao@sjtu.org"
        m.To = "georgeliao@sjtu.org"
        m.Title = "test"
        m.Content = "test"
        m.SendAsync()

此主题相关图片如下：捕获.png

我看到上面的信息是接受邮件服务器（pop3) 和发送邮件服务器（smtp)都是用的pod51003.outlook.com

 

看来只能放弃了