⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 smscontactmod.asp

📁 机票预定系统 各个模块的设计-ticket reservation systems detailed design system modules of the design
💻 ASP
字号:
<!--#include file="include/conn.asp"-->
<!--#include file="CheckSystem.asp"-->
<%
SetLimit=session("Limit")
call checklimit(SetLimit,"5")'调用验证管理员权限的函数
response.Clear()
%>
<%
if Request.ServerVariables("REQUEST_METHOD")="POST" then
	MyAction=request.form("MyAction")'标志变量,判断是更新还是添加
	myActionStr=request.form("myActionStr")
	Mem_Mobile=request.form("Mem_Mobile")
	Mem_Name=request.form("Mem_Name")
	Id=request.form("Id")
	
	set rs=server.createobject("adodb.recordset")
	if MyAction<>"AddNew" then	'执行修改
		sql="select * from SmsContact where id="&id
		rs.open sql,conn,1,3
	else
		sql="select * from SmsContact"
		rs.open sql,conn,1,3
		rs.addnew
	end if
	rs("Mem_Mobile")=Mem_Mobile
	rs("Mem_Name")=Mem_Name
	rs("createtime")=now()
	rs.update
	rs.close:set rs=nothing
	response.write"<script language=javascript>alert('记录已经"&myActionStr&"成功!');window.location.href='SmsContact.asp';</script>"
end if
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>后台管理机票系统</title>
<link href="include/css.css" rel="stylesheet" type="text/css">
<link rel="stylesheet" type="text/css" href="style/comm.css" />
<link rel="stylesheet" type="text/css" href="style/skin0.css" />
</head>
<SCRIPT language=javascript>
<!--

function checkinput()
{
if (ZXLform.Mem_Name.value=="")
	{
	  alert("联系人姓名不能为空!");
	  ZXLform.Mem_Name.focus();
	  return false; 
}
if (ZXLform.Mem_Mobile.value=="")
	{
	  alert("手机号码不能为空!");
	  ZXLform.Mem_Mobile.focus();
	  return false; 
}
  return true; 	
		//-->
}
</SCRIPT>
<%
Id=request.QueryString("Id")
myActionStr="添加"
if Id<>"" then
	usql="select * from SmsContact where Id="&Id
	set urs=server.CreateObject("adodb.recordset")
	urs.open usql,conn,1,1
	if not urs.eof then
		Mem_Mobile=urs("Mem_Mobile")
		Id=urs("Id")
		Mem_Name=urs("Mem_Name")
	end if
	urs.close
	set urs=nothing
	myActionStr="修改"
end if
%>

<body>
<div class="txt_title">添加常用联系人</div>
<TABLE cellPadding=0 cellSpacing=1 >
    <form name="ZXLform" action="SmsContactMod.asp" method="post" onSubmit="return checkinput();" >
          <%if Id="" then%>
          <input type="hidden" name="MyAction" value="AddNew">
          <%end if%>
          <input type="hidden" name="Id" value="<%=Id%>">
          <input type="hidden" name="myActionStr" value="<%=myActionStr%>">
          
          <TR bgcolor="#FFFFFF" >
            <TD height="30" align=right bgcolor="#C3E7F9">联系人姓名:</TD>
            <TD><input name="Mem_Name" type="text" value="<%=Mem_Name%>" maxlength="30">
            如:张三</TD>
          </TR>
          <TR bgcolor="#FFFFFF" > 
            <TD height="30" align=right bgcolor="#C3E7F9">手机号码:</TD>
            <TD ><input name="Mem_Mobile" type="text" id="Mem_Mobile" value="<%=Mem_Mobile%>" size="50"></TD>
          </TR>
          
          
          <TR bgColor=#EEEEEE> 
            <td height="30" colspan="2" align="center">
			<%if Id<>"" then
			else
			Updatetime=date()
			end if
			'response.write Updatetime&"&nbsp;&nbsp;"
			%> 
               <input type="submit" name="AddNow" value="确认"> &nbsp;
			   <input type="button" value="返回" name="CancelRow"  onClick="javascript:window.history.back();"> 
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; </td>
          </TR>
  </form>
</TABLE>
</body>
</html>




⌨️ 快捷键说明

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