如何实现电子邮件的自动发送？

如何实现电子邮件的自动发送？

<%@import namespace="system.web.uit"%>
dim mail as new mailmessage

' 建立一个mailmessage对象.
mail.to=收件人
mail.form=送件人
mail.subject=主题
mail.bodyformat=格式
mail.body=内容

smtpmail.send(mail)

具体代码如下：

<%@ Import Namespace="System.Web.Util" %>

<html>

<head>

<title>千花飞舞之电子邮件发送</title>

</head>

<body BgColor="White">

<Form runat="server">
<Table Border=1>
  <Tr><Td>收件人：</Td>
  <Td><Input Type="Text" id="mailTo" Size=40 runat="server"/></Td></Tr>
  <Tr><Td>发件人：</Td>
  <Td><Input Type="Text" id="mailFrom" Size=40 runat="server"/></Td></Tr>
  <Tr><Td>主题:</Td>
  <Td><Input Type="Text" id="mailSubject" Size=40 runat="server"/></Td></Tr>
  <Tr><Td>内容:</Td>
  <Td><TextArea id="mailbody" Rows=8 Cols=60 runat="server">
  </TextArea>
  </Td></Tr>
</Table>
<Input Type="Button" Value="立即发送" id="Button1"       OnServerClick="Button1_Click" runat="server"/>
</Form>

<asp:Label id="Label1" runat="server"/>
</body></html>

<script Language="VB" runat="server">

Sub Button1_Click(sender As Object, e As EventArgs)
      Dim mail As MailMessage = New MailMessage

mail.To= mailTo.Value
      mail.From= mailFrom.Value
      mail.Subject= mailSubject.Value
      mail.bodyFormat=mail.format.text
      mail.body= mailbody.Value

' 读取表单的mailto等，分别指定给mail对象的to等属性.

SmtpMail.Send(mail)

' 调用smtpmail发送.

Label1.Text = "恭喜,邮件发送成功!"
   End Sub

</script>

[1]

赞 (0)

相关推荐

  • 如何实现电子邮件的自动发送？

    如何实现电子邮件的自动发送?<%@import namespace="system.web.uit"%>dim mail as new mailmessage ' 建立一个mailmessage对象.mail.to=收件人mail.form=送件人mail.subject=主题mail.bodyformat=格式mail.body=内容 smtpmail.send(mail) 具体代码如下: <%@ Import Namespace="System.Web.

  • 如何用组件实现自动发送电子邮件？

    如何用组件实现自动发送电子邮件?JMailUploadAutoForm.asp<html><body><font face="verdana, arial" size="2"><b><form method="post" action="JmailUploadAutoFormProcess.asp" ENCTYPE="multipart/form-data&quo

  • 一个简单的自动发送邮件系统(一)

    一个简单的自动发送邮件系统     php的另一个强大的特征就是他有能通过html的表单修改变量的能力,通过这些变量,我们可以实现很多任务,包括象:发送wed-based的邮件,把信息输出给屏幕,从数据库中读取和传递数据.下面让我们构建一个小型的自动发送邮件系统,来演示这个能力.     让我们假设有这样一个html的表单: -------------------------------------- <HTML> <HEAD> <TITLE>Request for m

  • Python3利用SMTP协议发送E-mail电子邮件的方法

    Python3利用SMTP协议发送E-mail电子邮件的方法

    前言 本文主要给大家介绍了关于Python3用SMTP协议发送电子邮件的相关内容,在介绍如何使用python程序向指定邮箱发送邮件之前,我们需要先介绍一下有关电子邮件的相关知识. Email的历史比Web还要久远,直到现在,Email也是互联网上应用非常广泛的服务. 几乎所有的编程语言都支持发送和接收电子邮件,但是,先等等,在我们开始编写代码之前,有必要搞清楚电子邮件是如何在互联网上运作的. 假设我们自己的电子邮件地址是me@163.com,对方的电子邮件地址是friend@sina.com,现

  • 电子邮件 退信原因大全

    退信提示:"Invalid User"."User not found"."User unknown" 退信原因:对方用户不存在,由于发件人中的信箱地址有错误,发送服务器无法找到要投递的邮件地址. 解决方法:我们只要确认自己填写的地址是不是有错误,正确无误后再重新投递. 退信提示:"Quota"."Hard limit"."Storage allocation" 退信原因:对方邮箱已经满

  • 在Ruby中利用Net::SMTP类发送电子邮件的教程

    简单邮件传输协议(SMTP)发送电子邮件及路由的e-mail邮件服务器之间的协议处理. Ruby 提供 Net::SMTP 类的简单邮件传输协议(SMTP)客户端的连接,并提供了两个新的方法:new 和 start. new 带两个参数: server name 默认为 localhost port number  默认为熟知的 25 start 方法带有以下这些参数: server - IP SMTP服务器名称,默认为localhost port - 端口号,默认为25 domain - 邮件

  • Django应用程序中如何发送电子邮件详解

    Django应用程序中如何发送电子邮件详解

    前言 在Django应用程序中发送电子邮件最常见的用例是密码重置.帐户激活和发送与您的应用程序相关的一般通知.下面来看看详细的介绍吧. 配置Django发送电子邮件 要配置您的Django应用程序,添加下面的参数到你settings.py: # 主机 EMAIL_HOST = "smtp.sina.com" # 端口 EMAIL_PORT = 25 # 发件人邮箱 EMAIL_HOST_USER = "anshengme@sina.com" # 密码 EMAIL_H

  • Discuz! 6.1 - 发送HTML格式电子邮件

    复制代码 代码如下: --- sendmail.inc.original.php +++ sendmail.inc.mime.php @@ -33,23 +33,23 @@ $email_subject = '=?'.$charset.'?B?'.base64_encode(str_replace("\r", '', str_replace("\n", '', '['.$bbname.'] '.$email_subject))).'?='; $email_messa

  • Python使用poplib模块和smtplib模块收发电子邮件的教程

    poplib模块接收邮件 python的poplib模块是用来从pop3收取邮件的,也可以说它是处理邮件的第一步. POP3协议并不复杂,它也是采用的一问一答式的方式,你向服务器发送一个命令,服务器必然会回复一个信息.pop3命令码如下: 命令 poplib方法 参数 状态 描述 ----------------------------------------------------------------------------------------------- USER user use

  • golang实现通过smtp发送电子邮件的方法

    本文实例讲述了golang实现通过smtp发送电子邮件的方法.分享给大家供大家参考,具体如下: 今天写了一个公司的邮件发送后台服务,php只需要把邮件存入数据库,然后golang写的mailservice就会吧邮件发送出去.这个公司的代码就不发出来的,以为带有公司的业务逻辑,我把代码整理了一下发布出来供大家参考.呵呵 复制代码 代码如下: package main import (     "fmt"     "net/mail"     "net/smt

随机推荐