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

📄 rnew.asp

📁 酒店管理系统
💻 ASP
字号:
<!--#include file="../inc/conn.asp"-->
<!--#include file="checkpwd.asp"-->
<!--#include file="../inc/title.inc"-->
<style>
TD {
	FONT-SIZE: 9pt
; color: #000000
}
</style>
<table width="788" border="0" cellpadding="0" cellspacing="1">
  <!--DWLayoutTable-->
  <tr> 
    <td width="786" height="59">&nbsp;</td>
  </tr>
  <tr>
    <td height="422" valign="top">
	<table width="100%" border="0" cellpadding="0" cellspacing="1" bgcolor="#3399FF">
        <!--DWLayoutTable-->
        <tr> 
          <td width="784" height="422" valign="top"><table width="100%" border="0" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF">
                <!--DWLayoutTable-->
                <tr> 
                  <td height="23" colspan="3" align="center" valign="middle" bgcolor="#3333CC"><font color="#FFFFFF" face="楷体_GB2312"><strong>修改密码</strong></font></td>
                </tr>
                <tr> 
                  <td width="119" height="18">&nbsp;</td>
                  <td width="552">&nbsp;</td>
                  <td width="113">&nbsp;</td>
                </tr>
                <tr> 
                  <td height="32" colspan="3" valign="middle" >用户:<font color="#FF0000"><%=session("nam")%></font>你好!欢迎你!你的级别是:<font color="#FF0000"> 
                    <% 
				if session("power")=1 then
				response.Write("你是超级用户!")
				   else
				   response.Write("你是一般用户!")
				   end if
				   %>
                    </font> </td>
                </tr>
                <tr> 
                  <td height="1" colspan="3" valign="top"><table width="100%" border="0" cellpadding="0" cellspacing="0" bgcolor="#3333CC">
                      <!--DWLayoutTable-->
                      <tr> 
                        <td width="784" height="1"></td>
                      </tr>
                    </table></td>
                </tr>
                <tr> 
                  <td height="56" colspan="3" valign="top"> 
                    <%  if request("action")="" then
				  set rs=server.CreateObject("adodb.recordset")
				  rs.open "select * from adm ",conn,1,1
	             do while not rs.eof
				  %>
                    <table width="100%" border="0" cellpadding="0" cellspacing="0">
                      <!--DWLayoutTable-->
                      <tr> 
                        <td width="387" height="12" valign="top"><%=rs("nam")%></td>
                        <td width="161" valign="top"><a href="rnew.asp?action=xiugai&nam=<%=rs("nam")%>&id=<%=rs("id")%>">修改</a></td>
                        <td width="147" valign="top"><a href="rnew.asp?action=tianjia">添加</a></td>
                        <td width="89" valign="top"><a href="del.asp?nam=<%=rs("nam")%>">删除</a></td>
                      </tr>
                      <tr> 
                        <td height="1" colspan="4" valign="top"><table width="100%" border="0" cellpadding="0" cellspacing="0" bgcolor="#CCCCCC">
                            <!--DWLayoutTable-->
                            <tr> 
                              <td width="784" height="1"></td>
                            </tr>
                          </table></td>
                      </tr>
                      <tr> 
                        <td height="1"></td>
                        <td></td>
                        <td></td>
                        <td></td>
                      </tr>
                    </table>
                    <%
			rs.movenext
		    loop
			end if
			%>
                  </td>
                </tr>
                <tr> 
                  <td height="114">&nbsp;</td>
                  <td valign="top">
				<%  if request("action")="xiugai" and session("power")=1then  %>
				<form action="update.asp" method="post">
				    <table width="100%" border="0" cellpadding="0" cellspacing="0" bgcolor="#3A9DF8">
                      <!--DWLayoutTable-->
                      <tr> 
                        <td width="51" height="19">&nbsp;</td>
                        <td width="126" valign="top">请输入新用户名</td>
                        <td colspan="3" valign="top"><input name="newname" type="text" value="<%=request("nam")%>"></td>
                        <td width="96" valign="top"><input type="hidden" name="hiddenField" value="<%=request("id")%>"></td>
                      </tr>
                      <tr> 
                        <td height="19">&nbsp;</td>
                        <td valign="top">新密码</td>
                        <td colspan="3" valign="top"><input type="password" name="password"></td>
                        <td>&nbsp;</td>
                      </tr>
                      <tr> 
                        <td height="19">&nbsp;</td>
                        <td valign="top">确认密码</td>
                        <td colspan="3" valign="top"><input name="repassword" type="password" ></td>
                        <td>&nbsp;</td>
                      </tr>
                      <tr> 
                        <td height="19">&nbsp;</td>
                        <td>&nbsp;</td>
                        <td width="67">&nbsp;</td>
                        <td width="67">&nbsp;</td>
                        <td width="145">&nbsp;</td>
                        <td>&nbsp;</td>
                      </tr>
                      <tr> 
                        <td height="21">&nbsp;</td>
                        <td>&nbsp;</td>
                        <td>&nbsp;</td>
                        <td valign="top"><input type="submit" name="Submit" value="确认"></td>
                        <td>&nbsp;</td>
                        <td>&nbsp;</td>
                      </tr>
                      <tr> 
                        <td height="18"></td>
                        <td></td>
                        <td></td>
                        <td></td>
                        <td></td>
                        <td valign="top"><a href="rnew.asp">返回</a></td>
                      </tr>
                    </table>
                  </form>
					<%	end if
					%>
	<%if request("action")="tianjia" and session("power")=1then  %>
				<form action="add.asp" method="post">
				    <table width="100%" border="0" cellpadding="0" cellspacing="0" bgcolor="#3A9DF8">
                      <tr> 
                        <td width="51" height="19">&nbsp;</td>
                        <td width="126" valign="top">添加用户名</td>
                        <td colspan="3" valign="top"><input name="username" type="text" id="username"></td>
                        <td width="96">&nbsp;</td>
                      </tr>
                      <tr> 
                        <td height="19">&nbsp;</td>
                        
                        <td valign="top">密码</td>
                        <td colspan="3" valign="top"><input name="password" type="password" id="password"></td>
                        <td>&nbsp;</td>
                      </tr>
                      <tr> 
                        <td height="19">&nbsp;</td>
                        <td valign="top">确认密码</td>
                        <td colspan="3" valign="top"><input name="repassword" type="password" id="repassword"></td>
                        <td>&nbsp;</td>
                      </tr>
                      <tr> 
                        <td height="19">&nbsp;</td>
                        <td>&nbsp;</td>
                        <td width="67">&nbsp;</td>
                        <td width="67">&nbsp;</td>
                        <td width="145">&nbsp;</td>
                        <td>&nbsp;</td>
                      </tr>
                      <tr>
                        <td height="21">&nbsp;</td>
                        <td>&nbsp;</td>
                        <td>&nbsp;</td>
                        <td valign="top"><input type="submit" name="Submit" value="确认"></td>
                        <td>&nbsp;</td>
                        <td>&nbsp;</td>
                      </tr>
                      <tr> 
                        <td height="18"></td>
                        <td></td>
                        <td></td>
                        <td></td>
                        <td></td>
                        <td valign="top"><a href="rnew.asp">返回</a></td>
                      </tr>
                    </table></form>
					<%	end if
					%>
<%if   request("action")<>"" and   session("power")<>1 then  %>
  
<table width="100%" border="0" cellpadding="0" cellspacing="0" bgcolor="#3A9DF8">
  <!--DWLayoutTable-->
  <tr> 
    <td width="201" height="25">&nbsp;</td>
    <td width="297">&nbsp;</td>
    <td width="356">&nbsp;</td>
    <td width="139">&nbsp;</td>
  </tr>
  <tr> 
    <td height="26">&nbsp;</td>
    <td valign="top">你没有权限请与管理员联系</td>
    <td>&nbsp;</td>
    <td>&nbsp;</td>
  </tr>
  <tr> 
    <td height="46">&nbsp;</td>
    <td>&nbsp;</td>
    <td>&nbsp;</td>
    <td>&nbsp;</td>
  </tr>
  <tr> 
    <td height="18"></td>
    <td></td>
    <td></td>
    <td valign="top"><a href="rnew.asp">返回</a></td>
  </tr>
</table>
					<%	end if
					%>			
					</td>
                  <td>&nbsp;</td>
                </tr>
                <tr>
                  <td height="152">&nbsp;</td>
                  <td>&nbsp;</td>
                  <td>&nbsp;</td>
                </tr>
                <tr> 
                  <td height="30" colspan="3"  align="right" valign="top"bgcolor="#3333CC"><font color="#FFFFFF">2007-9</font></td>
                </tr>
              </table></td>
        </tr>
      </table>
	  </td>
  </tr>
  <tr>
    <td height="43">&nbsp;</td>
  </tr>
</table>

⌨️ 快捷键说明

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