2017-04-04 84 views
-2
Dim mailmsg As New System.Net.Mail.MailMessage() 
    mailmsg.From = New MailAddress("[email protected]") 
    mailmsg.To.Add("to.domain.com") 
    mailmsg.Subject = "Mail From .Net Application" 
    mailmsg.IsBodyHtml = True 
    mailmsg.Body = "Hi this is a mail from .net appl i have used same code......" 
    mailmsg.Priority = MailPriority.Normal 
    Dim client As New System.Net.Mail.SmtpClient() 

    client.UseDefaultCredentials = False 
    client.Credentials = New System.Net.NetworkCredential("[email protected]", "password") 
    client.Port = "587" 
    client.Host = "smtp.gmail.com" 
    client.EnableSsl = True 
    Dim userstate As Object = mailmsg 

    client.Send(mailmsg) 

如果我的smtp有问题,你们可以检查我的代码吗?然后我 想添加一些代码的附件文件谁能帮助?如何在vb.net中创建自动发送电子邮件?

+3

欢迎来到StackOverflow。这个网站是不是* plz给我的codez *问题。请参加[导览]并阅读[帮助]页面,尤其是[问]。谢谢。 –

+0

https://www.google.co.uk/search?client=ubuntu&channel=fs&q=send+email+in+v.net&ie=utf-8&oe=utf-8&gfe_rd=cr&ei=5O7iWMGcBKWN8Qe8-biwDg#channel=fs&q=send +电子邮件+在+ vb.net&* – ADyson

回答

0

MAILMESSAGE的对象有一个附件属性,你可以使用这样的:

mailmsg.Attachments.Add(new Attachment(PathToAttachment)) 

你确定你使用了正确的端口为谷歌的SMTP?我认为这是端口465.

要测试邮件功能而不用担心smtp问题,您可以尝试使用像smtp4dev这样的工具,它可以为您提供本地smtp服务器目标。在这里看到:https://github.com/rnwood/smtp4dev

+0

是的,他们有两个端口587和465 –

+0

感谢btw我会尝试代码:) –

+0

尝试检查防火墙(Windows防火墙将是第一个开始的地方)。如果我的答案有效,请将其标记为已接受的答案。 –