在Visual Basic中发送短信和电子邮件

Question

我正在开发一个大学项目，我正在为用户提供向其客户发送短信和电子邮件的工具。

如何在VB或VB.NET中执行此操作????

Answer 1

没有完成短信，但这里是使用Mail.MailMessage的电子邮件

Dim mlItem As New Mail.MailMessage
mlItem.From = New Mail.MailAddress("me@mydomain.com", "Me")
mlItem.To.Add(New Mail.MailAddress("you@yourdomain.com", "You"))
mlItem.Subject = "My Email"
mlItem.Body = "How are you?"


Dim mlClient As New Mail.SmtpClient("smtpserver")
mlClient.DeliveryMethod = Mail.SmtpDeliveryMethod.Network
mlClient.UseDefaultCredentials = False
mlClient.Credentials = New NetworkCredential("username", "password", "fqdn")
mlClient.Send(mlItem)

mlClient = Nothing
mlItem = Nothing

Answer 2

我有一个.NET library，会通过Twilio（我工作的地方）用2行代码发送短信：

Dim twilio As New TwilioApi("youraccountsid", "yourauthtoken")
twilio.SendSmsMessage("555-111-1111", "555-222-2222", "Sending SMS in .NET with Twilio is easy!")

Answer 3

发送电子邮件非常简单，只需查看System.Net.Mail命名空间即可。 SmtpClient类的This文档有一个简单的示例。

设置发送短信的最简单方法可能是使用电子邮件 - 短信网关，这样你也可以发送电子邮件。
否则，here'是一个SMS网关，它有一些示例代码，用于从VB.Net通过它们发送SMS。 （注意，我不了解该供应商，只是他们在他们的网站上有样本。）。