查人人中国名人网宝马车钥匙丢了:有关表单的制作及在线提交
来源：百度文库 编辑：查人人中国名人网 时间：2024/05/12 13:58:28
请高手指教！！！多谢！
我的空间支持ASP,没有你们想象得那么复杂了，只要能在线提交就行了，我的空间也支持Jmail在线发信等.数据不需要保存了，直接发到我信箱即可，要保存也是保存在虚拟主机提供商的服务器上吧!多谢了
使用 Adobe LiveCycle Designer
仅支持ASP是不够的，你需要你的服务器支持JMAIL或CDONTS，这样才能提交到你的邮箱啊。
你所说的都很容易办到，不过你没有提及保存在哪里，没说你的数据库类型，所以没人能提供帮助
上面四级魔法师说得对，那个做网络的说法倒是有问题，谁说开发ASP就要花钱了？（首先声明，电费不算）
200rmb
<%action=request.QueryString("action")
if action="send" then
Set jmail = Server.CreateObject("JMAIL.SMTPMail") '创建一个JMAIL对象
jmail.silent = true 'JMAIL不会抛出例外错误，返回的值为FALSE跟TRUE
jmail.logging = true '启用使用日志
jmail.Charset = "GB2312" '邮件文字的代码为简体中文
jmail.ContentType = "text/html" '邮件的格式为HTML的
jmail.ServerAddress = "smtp.163.com" '发送邮件的服务器
jmail.AddRecipient "xxxx@163.com" '修改邮件的收件人
jmail.SenderName = "Vlians" '邮件发送者的姓名
jmail.Sender = "xxxx@163.com" '修改邮件发送者的邮件地址
jmail.Priority = 1 '邮件的紧急程序，1 为最快，5 为最慢， 3 为默认值
jmail.Subject = "用户信息" '邮件的标题
jmail.Body = request.Form("temp") '邮件的内容
'由于没有用到密抄跟抄送，这里屏蔽掉这两句，如果您有需要的话，可以在这里恢复
'jmail.AddRecipientBCC Email '密件收件人的地址
'jmail.AddRecipientCC Email '邮件抄送者的地址
jmail.Execute() '执行邮件发送
jmail.Close '关闭邮件对象
elseif action="" then
%>
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>无标题文档</title>
<style type="text/css">
<!--
body,td,th {
font-size: 12px;
color: #000000;
}
body {
background-color: #FFFFFF;
margin-left: 0px;
margin-top: 0px;
margin-right: 0px;
margin-bottom: 0px;
}
-->
</style></head>
<body>
<table width="790" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td> </td>
</tr>
<tr>
<td><form name="form1" method="post" action="?action=post">
<table width="80%" border="0" cellpadding="0" cellspacing="0" align="center">
<tr>
<td width="30%" height="25" align="right">联 系 人：</td>
<td height="25"><input name="name" type="text" id="name">
*</td>
</tr>
<tr>
<td width="30%" height="25" align="right">电 话：</td>
<td height="25"><input name="tel" type="text" id="tel">
*</td>
</tr>
<tr>
<td width="30%" height="25" align="right">传 真：</td>
<td height="25"><input name="fax" type="text" id="fax">
*</td>
</tr>
<tr>
<td width="30%" height="25" align="right">电子邮件：</td>
<td height="25"><input name="mail" type="text" id="mail">
*</td>
</tr>
<tr>
<td width="30%" height="25" align="right">网 站：</td>
<td height="25"><input name="site" type="text" id="site">
*</td>
</tr>
<tr>
<td width="30%" height="25" align="right">地 址：</td>
<td height="25"><input name="add" type="text" id="add" size="40">
*</td>
</tr>
<tr>
<td width="30%" align="right" valign="top">备注说明：</td>
<td><textarea name="connect" rows="10" id="connect"></textarea></td>
</tr>
<tr>
<td width="30%"> </td>
<td><input type="submit" name="Submit" value="提 交"></td>
</tr>
</table>
</form>
</td>
</tr>
<tr>
<td> </td>
</tr>
</table>
</body>
</html>
<%elseif action="post" then%>
<table width="790" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td> </td>
</tr>
<tr>
<td><form name="form1" method="post" action="?action=send">
<table width="80%" border="0" cellpadding="0" cellspacing="0" align="center">
<tr>
<td width="30%" height="25" align="right">联 系 人：</td>
<td height="25"><font color=red><%=request.Form("name")%></font><input name="name" type="hidden" id="name" value="<%=request.Form("name")%>">
*</td>
</tr>
<tr>
<td width="30%" height="25" align="right">电 话：</td>
<td height="25"><font color=red><%=request.Form("tel")%></font><input name="tel" type="hidden" id="tel" value="<%=request.Form("tel")%>">
*</td>
</tr>
<tr>
<td width="30%" height="25" align="right">传 真：</td>
<td height="25"><font color=red><%=request.Form("fax")%></font><input name="fax" type="hidden" id="fax" value="<%=request.Form("fax")%>">
*</td>
</tr>
<tr>
<td width="30%" height="25" align="right">电子邮件：</td>
<td height="25"><font color=red><%=request.Form("mail")%></font><input name="mail" type="hidden" id="mail" value="<%=request.Form("mail")%>">
*</td>
</tr>
<tr>
<td width="30%" height="25" align="right">网 站：</td>
<td height="25"><font color=red><%=request.Form("site")%></font><input name="site" type="hidden" id="site" value="<%=request.Form("site")%>">
*</td>
</tr>
<tr>
<td width="30%" height="25" align="right">地 址：</td>
<td height="25"><font color=red><%=request.Form("add")%></font><input name="add" type="hidden" id="add" value="<%=request.Form("add")%>">
*</td>
</tr>
<tr>
<td width="30%" align="right" valign="top">备注说明：</td>
<td><textarea name="connect" disabled="disabled" rows="10" id="connect"><%=request.Form("connect")%></textarea>
<%tempstr="联系人：<font color=red>"&request.form("name")&"</font><br>"
tempstr=tempstr+"电话：<font color=red>"&request.form("tel")&"</font><br>"
tempstr=tempstr+"传真：：<font color=red>"&request.form("fax")&"</font><br>"
tempstr=tempstr+"邮件：<font color=red>"&request.form("mail")&"</font><br>"
tempstr=tempstr+"网址：<font color=red>"&request.form("site")&"</font><br>"
tempstr=tempstr+"地址：<font color=red>"&request.form("add")&"</font><br>"
tempstr=tempstr+"说明：<font color=red>"&request.form("connect")&"</font><br>"
%><input name="temp" type="hidden" id="temp" value="<%=tempstr%>">
</td>
</tr>
<tr>
<td width="30%"> </td>
<td><input type="submit" name="Submit" value="提 交"> <input type="button" name="history" onClick="javascript:window.history.go(-1);" value="返回"></td>
</tr>
</table>
</form>
</td>
</tr>
<tr>
<td><font color=red>请确认信息，如果正确，请点击提交按钮</font></td>
</tr>
</table>
</body>
</html>
<%end if%>
******
按注释修改内容