如何在html网页中提交表单直接发送到邮箱?此问题一直困扰了我很久很久,后来了解到jmail组件可以解决此问题,而且现在的付费空间基本都会有此组件。分别建立表单页和asp页面,提交表单后通过asp页面调用jmail组件,实现将表单内容发送到指定邮箱的效果。
具体实现方法:
1.制作一个表单页面form.html(或修改自己网站上的表单页面,因为接下来与*.asp文件进行数据传递,所以对应的参数一定要写对),name="form" method="post" action="s.asp
2.制作一个s.asp页面
3.让这两个文件上传到空间的形同路径下就可以实现提交表单后,表单内容自动发送到指定的邮箱,相应的会出现下面的页面
4.form.html对应的代码如下(将下面的代码复制后粘贴到记事本中,保存为form.html):
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>form</title>
</head>
<body>
<form id="form" name="form" method="post" action="s.asp">
</form>
</body>
</html>
5.s.asp对应的代码如下(将下面的代码复制后粘贴到记事本中,保存为s.asp):
<html>
<head>
<title>send to your email</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="Jmail" content="use jmail send to your email">
<meta name="send to your email" content="use jmail send to your email">
<title>send to your email</title>
</head>
<body>
<%
'下面是定义一些变量,是这些变量从表单页面获取信息
company=Request.Form ("company")
website=Request.Form ("website")
fname=Request.Form ("fname")
lname=Request.Form ("lname")
email=Request.Form ("email")
phone=Request.Form ("phone")
country=Request.Form ("country")
city=Request.Form ("city")
message=Request.Form ("message")
' 下面就是调用从表单页获取的信息,赋值到mess,&是连接符,vbcrlf表示换行回车:
mess = mess & "---------------Webmail表单开始-------------------" & vbcrlf
mess = mess & "Company:" & company & vbcrlf
mess = mess & "Website:" & website & vbcrlf
mess = mess & "First name:" & fname & vbcrlf
mess = mess & "Last name:" & lname & vbcrlf
mess = mess & "Email address:" & email & vbcrlf
mess = mess & "Phone:" & phone & vbcrlf
mess = mess & "Country:" & country & vbcrlf
mess = mess & "City / Locality:" & city & vbcrlf
mess = mess & "Message:" & message & vbcrlf
mess = mess & "---------------Webmail表单结束-------------------" & vbcrlf
' 下面是调用Jmail组件的部分,其中邮箱,密码填写正确的,否则发送不成功
Set JMail=Server.CreateObject("JMail.Message")
JMail.silent = true
JMail.Logging=True
JMail.Charset="gb2312"
JMail.ContentType = "text/plain"
JMail.MailServerUserName = "gewell@163.com" '您的邮件服务器登录名
JMail.MailServerPassword = "123654"
JMail.From = "gewell@163.com"
JMail.FromName = "gewell"
JMail.AddRecipient "gewell@163.com"
JMail.Subject = "WebMail"
JMail.Body = mess
JMail.Send "smtp.163.com"
JMail.Priority=3
Set JMail=nothing
%>
<CENTER>
Success ,Congratulation
</CENTER>
<p align="center">--- < <a href="index.htm">Go back to your website </a>> ---</p>
</body>
</html>
6.将两个文件上传到空间中的相同路径,就可以了
可能此代码对于很多大虾来说太小儿科了,希望能对刚入门的朋友有些帮助