网页设计中怎样才能做到把一个表单数据点击提交到邮箱?

网页设计中怎样才能做到把一个表单数据点击提交到邮箱?有谁知道吗?

1.网页可分为静态和动态
通俗的讲静态网页就是以HTML后缀的页面,在服务器上放上什么,浏览者就可以看到什么。动态网页是在静态网页的代码中加入了网络程序语言,常见的ASP,JSP,PHP,.NET等,其基本原理就是浏览者提交信息发送到服务器,程序处理后返回相应的信息,是一种可以互动的交互式操作,如留言板,论坛等。
2.表单提交属于动态网页范畴,可以用不同的程序来做出来,以ASP为例,就是浏览者填写表单后,点击确定,所填写的会发送到服务器,并可以记录在网站后台的数据库中,这些在ASP的学习中是简单的一些道理,如果没有接触过,可能会感觉理解不了。
3.表单的提交只需要在FORM中设置发送到自己的信箱即可。
4.动态网页的制作需要用到XP的组件IIS,否则在本地浏览只能适用于静态网页。
例子如下:
以百度回答问题的这个提交表单为例,需要五个网页文件:
index.asp /显示表单
conn.asp /数据库连接
add.asp /表单处理页面
website.css /样式表
sht.mdb /数据库文件
index.asp
<% option explicit%>
<!--#Include file="ado.asp"-->
<HTML>
<head>
<title>表单示例</title>
<link rel="stylesheet" href="style.css">
<Script Language="JavaScript">
<!--
Function check_Null(){
If (document.form1.title.value==""){
alert("主题不能为空!");
return false;
}
If (document.form1.name.value==""){
alert("姓名不能为空!");
return false;
}
return true;
}
// -->
</Script>
</head>
<body >
<center>
<table border='0' width='80%' >
<form method="post" action="add.asp" name="form1" onSubmit="JavaScript: return check_Null();">
<tr><td> </td><td><textarea name="body" rows=6 cols=80 wrap=soft></textarea></td></tr>
<tr><td> </td><td> </td></tr>
<tr><td></td>
<td valign="middle"><label>
用户名:
<input type="text" name="name" size="10">

<input type="checkbox" name="checkbox" value="checkbox">
</label>
匿名发表
<input type="submit" value=" 提交 " Size="20"></td></tr>
</form>
</table>
<p>
<%
'现在开始显示已有留言
Dim Sql,rs '声明变量
Sql="Select body,name,submit_date From guest "
Sql=Sql & " Order By submit_date desc,id desc" '这里用了两个字段排序
SET rs=db.Execute(Sql) '返回一个Recordset对象
Do While Not rs.Eof '利用循环依次显示所有记录
%>
<table border="0" bordercolor="#8800FF" width="80%">
<tr>
<td colspan=2><hr></td>
</tr>
<tr>
<td width=5% rowspan="2"> </td>
<td width="95%"><%=rs("submit_date")%> <%=rs("name")%></td>
</tr>
<tr>
<td><%=rs("body")%></td>
</tr>
</table>
<%
rs.MoveNext '将记录指针移动到下一条记录
Loop
%>
</center>
</body>
</html>
conn.asp
<%
'这里只是建立数据库连接对象db。
Dim db
Set db=Server.CreateObject("ADODB.Connection")
db.Open "Driver={Microsoft Access Driver (*.mdb)};Dbq="&Server.Mappath("guest.mdb")
%>
add.asp
<!--#Include file="conn.asp"-->
<%
Dim body '声明变量
body=Request.Form("body") '返回留言内容
Dim sqla,name,sqlb,sql
sqla = "Insert Into sth(name"
sqlb = "Values('" & name & "'"
If body<>"" Then '如果留言内容不为空
sqla = sqla & ",body"
sqlb = sqlb & ",'" & body & "'"
End If
sqla = sqla & ",submit_date"
sqlb = sqlb & ",'" & now() & "'" '插入系统时间为留言时间
'下面一句就是将SQL语句的前后两部分组织成一个完整的Inser语句
sql = sqla & ") " & sqlb & ")"
db.Execute(Sql) '插入记录
Response.Redirect "index.asp" '重定向回首页
%>
温馨提示:内容为网友见解,仅供参考
第1个回答  2018-08-05
Dim JMail,email Set JMail = Server.CreateObject("JMail.Message") jmail.Charset = "GB2312"
''邮件文字的代码为简体中文 jmail.ContentType = "text/html" JMail.From = "" ' 发送者地址
JMail.FromName = "" ' 发送者姓名 JMail.Subject = " " ' 邮件主题
JMail.MailServerUserName = "邮箱名" ' 身份验证的用户名 JMail.MailServerPassword = "邮箱密码" ' 身份验证的密码
JMail.Priority = 3 JMail.AddHeader "Originating-IP",
Request.ServerVariables("REMOTE_ADDR") JMail.Logging = true
email="接受邮件地址" email1="接受邮件地址" JMail.AddRecipient(email1)
JMail.AddRecipient(email) JMail.HTMLBody = 邮件内容 JMail.Body = 邮件内容
JMail.Send("stmp.163.com") JMail.Close() Set JMail = Nothing 记得要装
jmail组件就可以了
通俗的讲静态网页是在静态网页的代码中加入了网络程序语言,常见的ASP,JSP,PHP,.NET等,其基本原理就是浏览者提交信息发送到服务器,程序处理后返回相应的信息,是一种可以互动的交互式操作,如留言板,论坛等。
2.表单提交属于动态网页范畴,可以用不同的程序来做出来,以ASP为例,就是浏览者填写表单后,点击确定,所填写的会发送到服务器,并可以记录在网站后台的数据库中,这些在ASP的学习中是简单的一些道理,如果没有接触M中设置发送到自己的信箱即可。
4.动态网页的制作需要用到XP的组件IIS,否则在本地浏览只能适用于静态网页。

例子如下:
以百度回答问题的这个提交表单为例,需要五个网页文件:
index.asp /显示单连接
add.asp /表单处理页面
website.css /样式表
sht.mdb /数据库文件

index.asp
<% option explicit%>
<!--#Include file="ado.asp"-->
<HTML>
<head>
<title>表单示例</title>
<link rel="stylesheet" href="style.css">
<Script Language="JavaScript">
<!--
Function check_Null(){
If (document.form1.title.value==""){
alert("主题不能为空!");
return false;
}
If (document.form1.name.value==""){
alert("姓名不空!");
return false;
}
return true;
}
// -->
</Script>
</head>
<body >
<center>
<table border='0' width='80%' >
<form method="post" action="add.asp" name="form1" onSubmit="JavaScript: return check_Null();">
<tr><td>
</td><td><textarea name="body" rows=6 cols=80
wrap=soft></textarea></td></tr>
<tr><td> </td><td> </td></tr>
<tr><td></td>
<td valign="middle"><label>
用户名:
<input type="text" name="name" size="10">

<input type="c name="checkbox" value="checkbox">
</label
匿名发表
<input type="submit" value=" 提交 " Size="20"></td></tr>
</form>
</table>
<p>
<%
'现在开始显示已有留言
Dim Sql,rs '声明变量
Sql="Select body,name,submit_date From guest "
Sql=Sql & " Order By submit_date desc,id desc" '这里用了两个字段排序
SET rs=db.Execute(Sql) '返回一个Recordset对象
Do While Not rs.Eof '利用循环依次显示所有记录
%>
<table border="0" borde
<td colspan=2><hr></td>
</tr>
<tr>
<td width=5% rowspan="2"> </td
<tr>
<td><%=rs("body")%></td>
</tr>
</table>
<%
rs.MoveNext '将记录指针移动到下一条记录
Loop
%>
</center>
</body>
</html>

conn.asp
<%
'这里只是建立数据库连接对象db。
Dim db
Set db=Server.CreateObject("ADODB.Connection")
db.Open "Driver={Microsoft Access Driver (*.mdb)};Dbq="&Server.Mappath("guest.mdb")
%>

add.asp
<!--#Include file="conn.asp"-->
<%
Dim body '声明变量
body=Request.Form("b
Dim sqla,name,sqlb,sql
sqla = "Insert Into sth(name"qlb = "Values('" & name & "'"
If body<>"" Then '如果留言内容不为空
sqla = sqla & ",body"
sqlb =qlb & ",'" & body & "'"
End If
sqla = sqla & ",submit_date"
sqlb = sqlb & ",'" & now() & "'" '插入系统时间为留言时间

'下面一句就是将SQL语句的前后两部分组织成一个完整的Inser语句
sql = sqla & ") " & sqlb & ")"
db.Execute(Sql) '插入记录
Response.Redirect "in
第2个回答  2018-07-25
通俗的讲静态网页是在静态网页的代码中加入了网络程序语言,常见的ASP,JSP,PHP,.NET等,其基本原理就是浏览者提交信息发送到服务器,程序处理后返回相应的信息,是一种可以互动的交互式操作,如留言板,论坛等。
2.表单提交属于动态网页范畴,可以用不同的程序来做出来,以ASP为例,就是浏览者填写表单后,点击确定,所填写的会发送到服务器,并可以记录在网站后台的数据库中,这些在ASP的学习中是简单的一些道理,如果没有接触M中设置发送到自己的信箱即可。
4.动态网页的制作需要用到XP的组件IIS,否则在本地浏览只能适用于静态网页。

例子如下:
以百度回答问题的这个提交表单为例,需要五个网页文件:
index.asp /显示单连接
add.asp /表单处理页面
website.css /样式表
sht.mdb /数据库文件

index.asp
<% option explicit%>
<!--#Include file="ado.asp"-->
<HTML>
<head>
<title>表单示例</title>
<link rel="stylesheet" href="style.css">
<Script Language="JavaScript">
<!--
Function check_Null(){
If (document.form1.title.value==""){
alert("主题不能为空!");
return false;
}
If (document.form1.name.value==""){
alert("姓名不空!");
return false;
}
return true;
}
// -->
</Script>
</head>
<body >
<center>
<table border='0' width='80%' >
<form method="post" action="add.asp" name="form1" onSubmit="JavaScript: return check_Null();">
<tr><td> </td><td><textarea name="body" rows=6 cols=80 wrap=soft></textarea></td></tr>
<tr><td> </td><td> </td></tr>
<tr><td></td>
<td valign="middle"><label>
用户名:
<input type="text" name="name" size="10">

<input type="c name="checkbox" value="checkbox">
</label
匿名发表
<input type="submit" value=" 提交 " Size="20"></td></tr>
</form>
</table>
<p>
<%
'现在开始显示已有留言
Dim Sql,rs '声明变量
Sql="Select body,name,submit_date From guest "
Sql=Sql & " Order By submit_date desc,id desc" '这里用了两个字段排序
SET rs=db.Execute(Sql) '返回一个Recordset对象
Do While Not rs.Eof '利用循环依次显示所有记录
%>
<table border="0" borde
<td colspan=2><hr></td>
</tr>
<tr>
<td width=5% rowspan="2"> </td
<tr>
<td><%=rs("body")%></td>
</tr>
</table>
<%
rs.MoveNext '将记录指针移动到下一条记录
Loop
%>
</center>
</body>
</html>

conn.asp
<%
'这里只是建立数据库连接对象db。
Dim db
Set db=Server.CreateObject("ADODB.Connection")
db.Open "Driver={Microsoft Access Driver (*.mdb)};Dbq="&Server.Mappath("guest.mdb")
%>

add.asp
<!--#Include file="conn.asp"-->
<%
Dim body '声明变量
body=Request.Form("b
Dim sqla,name,sqlb,sql
sqla = "Insert Into sth(name"qlb = "Values('" & name & "'"
If body<>"" Then '如果留言内容不为空
sqla = sqla & ",body"
sqlb =qlb & ",'" & body & "'"
End If
sqla = sqla & ",submit_date"
sqlb = sqlb & ",'" & now() & "'" '插入系统时间为留言时间

'下面一句就是将SQL语句的前后两部分组织成一个完整的Inser语句
sql = sqla & ") " & sqlb & ")"
db.Execute(Sql) '插入记录
Response.Redirect "in
第3个回答  2018-08-08
.网页可分为静态和动态
通俗的讲静态网页就是以HTML后缀的页面,在服务器上放上什么,浏览者就可以看到什么。动态网页是在静态网页的代码中加入了网络程序语言,常见的ASP,JSP,PHP,.NET等,其基本原理就是浏览者提交信息发送到服务器,程序处理后返回相应的信息,是一种可以互动的交互式操作,如留言板,论坛等。
2.表单提交属于动态网页范畴,可以用不同的程序来做出来,以ASP为例,就是浏览者填写表单后,点击确定,所填写的会发送到服务器,并可以记录在网站后台的数据库中,这些在ASP的学习中是简单的一些道理,如果没有接触过,可能会感觉理解不了。
3.表单的提交只需要在FORM中设置发送到自己的信箱即可
第4个回答  2018-07-25
一般留言、调查问券,都可以发到邮箱中。。
相似回答