edemail.asp

来自「1、全面展示宾馆的自然情况和服务内容； 2、介绍宾馆信息,帮助客人了解宾馆相」· ASP 代码 · 共 95 行

ASP
95 行
字号 
<%
if session("admin_name")="" then
    response.redirect "../index.asp"
end if
%>
<% 
	dim conn
	dim connstr
	dim db
	db="../../DataBase/etwldbs.mdb"
	Set conn = Server.CreateObject("ADODB.Connection")
	connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(db)
	conn.Open connstr
set rs=server.CreateObject("adodb.recordset")
sql="select * from email where id="&request("id")
rs.open sql,conn,1,1
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<script LANGUAGE="JavaScript">
function check()
{
 if (document.form1.title.value=="")
  {
   alert("请输入新闻标题！")
   document.form1.title.focus()
   document.form1.title.select()
   return
  }
   document.form1.submit()
}
</script>
<style type="text/css">
<!--
.style1 {
	color: #FFFFFF;
	font-weight: bold;
}
-->
</style>
</head>

<link rel="stylesheet" type="text/css" href="../style.css">
<body bgcolor="#FFFFFF" marginheight=0 marginwidth=0 leftmargin=5>
<SCRIPT language=javascript>
  var upfile_obj;
  function OnUpFile()
  {
   upfile_obj.src=upfile_obj.lowsrc;
   upfile_obj.src=document.forms["form1"].upfile.value;
  }
</SCRIPT>
<CENTER><form name="form1" method="post" action="edsave.asp?id=<%=request("id")%>">
  <TABLE width="75%" border="0" align="center" cellpadding="4" cellspacing="1" bgcolor="#336699">
    <TR> 
      <TD height=30 colspan=2 background="../images/pics/tile_sub.gif" bgcolor="#e8f4ff"><span class="style1">修改邮件信息</span></TD>
  </TR>
    <TR bgcolor="#FFFFFF"> 
      <TD width="17%">发件人地址：</td>
      <TD width="83%"><input name="femail" type="text" id="femail" value="<%=rs("femail")%>" size="30"></TD>
  </TR>
    <TR bgcolor="#FFFFFF">
      <TD>发件人姓名：</td>
      <TD><input name="fname" type="text" id="fname" value="<%=rs("fname")%>" size="30"></TD>
    </TR>
    <TR bgcolor="#FFFFFF"> 
      <TD>企业邮局地址：</td>
      <TD><input name="smtp" type="text" id="smtp" value="<%=rs("smtp")%>" size="30"></TD>
  </TR>
    <TR bgcolor="#FFFFFF">
      <TD>邮箱密码：</td>
      <TD><input name="pwd" type="password" id="pwd" value="<%=rs("pwd")%>" size="30"></TD>
    </TR>
    <TR bgcolor="#FFFFFF">
      <TD>标题</td>
      <TD><input name="title" type="text" id="title" value="<%=rs("title")%>" size="30"></TD>
    </TR>
    <TR bgcolor="#FFFFFF"> 
      <TD>邮件内容：</TD>
      <TD>
      <font color=#ff6600>
      <textarea name="content" cols="70" rows="20" id="content"><%=rs("content")%></textarea> 
      </font></TD>
    </TR>
    
    <TR height="30"> 
      <TD colspan="2" align="center" background="../images/pics/tile_sub.gif" bgcolor="#e8f4ff" > 
        <input type="button" value=" 提　交" onclick="check()">
    <input type="reset" name="Submit2" value=" 重　置">
  </TR>
</TABLE>
</FORM>
</BODY>
</HTML>

edemail.asp - 源码说明

本页面展示了「1、全面展示宾馆的自然情况和服务内容； 2、介绍宾馆信息,帮助客人了解宾馆相关信息； 3、为客户提供宾馆所在地旅游景点的详细信息； 4、向客户全面提供宾馆客服信息； 5、实现网上在线定房」中的 edemail.asp 源码文件，采用 ASP 编程语言编写，共 95 行代码。您可以在线阅读完整代码内容，也可以返回资源详情页下载完整源码包进行本地学习和开发。

虫虫下载站收录了大量与服务相关的技术资源，包括源代码、技术文档、电路图等，是电子工程师和嵌入式开发者的专业学习平台。

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?