asp.net发送电子邮件的实现(通过一个邮箱向另一个邮箱发送)
2010-08-02 15:56
597 查看
最近程序开发有用到在WEB页面中,通过一个邮箱(第三方)向另一个邮箱发送邮件的技术实现,我用的是vs2008 .net3.5 vb.net,具体实现代码如下:
代码中"bodystr &= body"前面的语句和后面的语句是为了设置正文的显示样式,可以在前面添加公司或网站标志,后面添加联系方式等等.
函数调用如下:
这个在顺平生活网(http://www.sp0312.com)中进行了实现!
'发送电子邮件(从spxxxx@sina.cn邮箱) 'acceptor 接收人的电子邮件地址 'title 电子邮件标题 'body 电子邮件正文内容 'replyto 需要回复的电子邮件地址(有的网站可能不支持此项,把sender自动设为回复地) Public Function EmailSend(ByVal acceptor As String, ByVal title As String, ByVal body As String, ByVal replyto As String) As Integer Try '生成电子邮件主体内容 Dim myEmail As System.Net.Mail.MailMessage = New System.Net.Mail.MailMessage myEmail.Subject = title '设置标题 myEmail.ReplyTo = New System.Net.Mail.MailAddress(replyto) '设置回复地址 myEmail.From = New System.Net.Mail.MailAddress("sp0312@sina.cn") '设置发送人地址 myEmail.IsBodyHtml = True '打开正文html代码开关 myEmail.To.Add(New System.Net.Mail.MailAddress(acceptor)) '设置收信人地址 '添加网站LOGO标志 Dim bodystr As String = "<table width=800 bgcolor=#0066FF border=0 cellpadding=5 cellspacing=1 align=center>" bodystr &= "<tr><td bgcolor=White width=180><a href="网站URL地址" mce_href="网站URL地址" target='_blank' title='网站名称'><img src="网站logo.gif图片url地址" mce_src="网站logo.gif图片url地址" border='0' /></a>" bodystr &= "</td>" bodystr &= "<tr><td bgcolor='White'><p style="line-height: 30px; text-indent: 30px; font-size: 14px; color: #666666" mce_style="line-height: 30px; text-indent: 30px; font-size: 14px; color: #666666">" bodystr &= body bodystr &= "</p></td></tr><tr><td bgcolor='White'><p style="line-height: 30px; text-indent: 30px; font-size: 14px; color: #666666" mce_style="line-height: 30px; text-indent: 30px; font-size: 14px; color: #666666">如果有什么需要帮助的,请通过以下方式联系我们: <br>" bodystr &= " 电话:000-00000000<br> </p></td></tr></table>" myEmail.Body = bodystr '设置邮件正文内容 '发送电子邮件 Dim sm As System.Net.Mail.SmtpClient = New System.Net.Mail.SmtpClient sm.Host = "smtp.sina.cn" '发送者邮件所在SMTP服务器,可以从邮件所在网站查到 sm.Port = 25 '一般都使用此端口 sm.UseDefaultCredentials = True '允许使用验证,注意必须放在下面语句的前面 sm.Credentials = New System.Net.NetworkCredential("邮箱登录名", "邮箱密码") sm.Send(myEmail) Return 1 Catch ex As Exception Return -1 End Try End Function
代码中"bodystr &= body"前面的语句和后面的语句是为了设置正文的显示样式,可以在前面添加公司或网站标志,后面添加联系方式等等.
函数调用如下:
i = EmailSend("对方电子邮件地址","您的好友给您送了礼物!", "正文内容", "我的电子邮件地址") if i<0 then '显示错误 else '成功发送 end if
这个在顺平生活网(http://www.sp0312.com)中进行了实现!
相关文章推荐
- asp.net实现一个用户进行注册的时候同时发送一个邮件到注册人的邮箱,通过发送的邮箱链接来激活该帐号
- asp.net实现一个用户进行注册的时候同时发送一个邮件到注册人的邮箱,通过发送的邮箱链接来激活该帐号
- 另外一个ASP.NET 实现邮件发送和接受的功能(Sockets)
- 使用asp.net通过gmail发送电子邮件
- 使用MailMessage和SmtpClient类实现asp.net的邮件发送(有详细注释并已测试通过)
- 另外一个ASP.NET 实现邮件发送和接受的功能(Sockets)
- asp.net 读取一个文本文件,并输出到网页显示 通过 一般处理程序实现
- MVC使用ASP.NET Identity 2.0实现用户身份安全相关功能,比如通过短信或邮件发送安全码,账户锁定等
- asp.net实现邮箱验证功能,通过邮箱链接激活该帐号
- c#Asp.Net简单实现发送电子邮件的功用
- c#Asp.Net简单实现发送电子邮件的功用
- asp.net实现邮箱验证功能,通过邮箱链接激活该帐号
- Asp.net实现电子邮件及附件的发送
- 用Asp.net实现发送电子邮件
- asp.net发送邮件,使用MD5加密解密,实现用户注册完成后发送流水号(账号)到对方邮箱,jeasyUI验证,combobox的使用完成 实例下载
- ASP.NET 3.5 中实现发送email电子邮件
- 在ASP.NET Core中通过EF Core实现一个简单的全局过滤查询
- asp.net 实现邮箱验证(注册的时候发送邮件激活链接的那种)
- vb.net——通过邮箱动态发送验证码实现完美注册
- asp.net实现发送电子邮件