IDC资讯中心
[申明：必须自己试验才能看到效果！：)]
asp+中、想传送email，须使用以上两个对象，其中mailmessage用设定email的内容、而smtpmail则是将
email出去，程序框架如下：
<%@import namespace="system.web.uit"%>
dim mail as new mailmessage 建立一个mailmessage对象
mail.to=收件人
mail.form=送件人
mail.subject=主题
mail.bodyformat=格式
mail.body=内容
smtpmail.send(mail)
由于以上两个对象类别收录于system.web.util namespace,所以<%@import namespace="system.web.uit"%>
标记是必要的。先让我们看一下下面的源程序：
<%@ import namespace="system.web.util" %>
<html>
<body bgcolor="white">
<h2>asp+ email发送程序!<hr></h2>
<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>
<hr>
<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
smtpmail.send(mail)
label1.text = "已成功发送!"
end sub
</script>
通过读取表单的mailto、mailform、mailsubject、mailbody，然后分别指定给mail对象的to,form,submit,body属性，最后调用smtpmail送出邮件！
呵呵，写东东还真累！！不过也完工了，大家自己试试吧！
