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

📄 manageuser.asp

📁 机票预定系统 各个模块的设计-ticket reservation systems detailed design system modules of the design
💻 ASP
📖 第 1 页 / 共 2 页
字号:
            <!--             <TH>有效</TH> -->
            </TR>
			<%if not(instr(UserreturnUrl,"www.")>0 or instr(UserreturnUrl,"http://")>0) and not ZXLpowerful then noshowstr="style='display:none'"%>
          <TR <%=bc%> <%=noshowstr%> >
            <TD width="167" align=center bgcolor="#C3E7F9">接收订单数据的页面地址*</TD> 
            <TD height="25" colspan="3" align=center><table width="100%"  border="0" cellspacing="0" cellpadding="0">
              <tr>
                <td width="4%" height="30">&nbsp;</td>
                <td width="96%"><input name="UserreturnUrl" type="text" id="UserreturnUrl" value="<%=UserreturnUrl%>" <%=ReadStr%>></td>
              </tr>
            </table>
              <!-- <input type="hidden" name="Auto<%=i%>" value="<%=Auto%>"> -->			</TD>
            <!--   <TD width="37" height="25" class="b-14hand"><div align="center">
            <input type="checkbox" name="<%="A"&Auto%>" value="active" <%=ifActiveStr%>> 
            </div></TD>-->
            </TR>
					   <TR bgColor=#C3E7F9>
            <TH height="30">价格排序方式</TH>
            <TH height="30" colspan="3"><table width="100%"  border="0" cellspacing="0" cellpadding="0">
              <tr>
                <td width="5%" height="30"><input name="taxisWay" <%if taxisWay="asc" then response.write "checked"%> type="radio" value="asc">
                </td>
                <td width="14%">升序</td>
                <td width="5%"><input name="taxisWay"  <%if taxisWay="desc" then response.write "checked"%> type="radio" value="desc"></td>
                <td width="76%">降序</td>
              </tr>
            </table></TH>
            <!--             <TH>有效</TH> -->
            </TR>
          <TR <%=bc%> > 
            <TD width="167" height="25" align=center>默认显示全部舱位</TD>
            <TD height="25" colspan="3" align=center><table width="100%"  border="0" cellspacing="0" cellpadding="0">
              <tr>
                <td width="5%" height="30"><input name="ExpandAll" <%if ExpandAll="1" then response.write "checked"%> type="radio" value="1">
                </td>
                <td width="14%">是</td>
                <td width="5%"><input type="radio" <%if ExpandAll="0" then response.write "checked"%> name="ExpandAll" value="0"></td>
                <td width="76%">否</td>
              </tr>
            </table>
              <!-- <input type="hidden" name="Auto<%=i%>" value="<%=Auto%>"> -->			</TD>
            <!--   <TD width="37" height="25" class="b-14hand"><div align="center">
            <input type="checkbox" name="<%="A"&Auto%>" value="active" <%=ifActiveStr%>> 
            </div></TD>-->
            </TR>
					   <TR bgColor=#C3E7F9>
            <TH height="30">退改签规定:</TH>
            <TH height="30" colspan="3"><table width="100%"  border="0" cellspacing="0" cellpadding="0">
              <tr>
                <td width="4%" height="30">&nbsp;</td>
                <td width="96%"><textarea name="OrderBackPrescribe" rows="6" id="OrderBackPrescribe" style="width:340"><%=OrderBackPrescribe%></textarea></td>
              </tr>
            </table></TH>
            <!--             <TH>有效</TH> -->
            </TR>
			<%if ZXLpowerful then%>
          <TR <%=bc%> > 
            <TD width="167" height="25" align=center>是否在新窗口中打开链接:</TD>
            <TD height="25" colspan="3" align=center><table width="100%"  border="0" cellspacing="0" cellpadding="0">
              <tr>
                <td width="5%" height="30"><input name="ifOpenNewWin" <%if instr(ifOpenNewWin,"_blank")>0 then response.write "checked"%>  type="radio" value=" target='_blank' ">
                  </td>
                <td width="14%">是</td>
                <td width="5%"><input name="ifOpenNewWin" <%if not (instr(ifOpenNewWin,"_blank")>0) then response.write "checked"%> type="radio" value=""></td>
                <td width="76%">否</td>
              </tr>
            </table>              </TD>
            <!--   <TD width="37" height="25" class="b-14hand"><div align="center">
            <input type="checkbox" name="<%="A"&Auto%>" value="active" <%=ifActiveStr%>> 
            </div></TD>-->
            </TR>
					   <TR bgColor=#C3E7F9>
            <TH height="30">返回数据时是否关闭窗口:</TH>
            <TH height="30" colspan="3"><table width="100%"  border="0" cellspacing="0" cellpadding="0">
              <tr>
                <td width="5%" height="30"><input name="ifCloseWin" <%if ifCloseWin<>"false" then response.write "checked"%> type="radio" value="">
                </td>
                <td width="14%">是</td>
                <td width="5%"><input name="ifCloseWin" <%if ifCloseWin="false" then response.write "checked"%>  type="radio" value="false"></td>
                <td width="76%">否</td>
              </tr>
            </table></TH>
            <!--             <TH>有效</TH> -->
            </TR><%end if%>
          <TR <%=bc%> > 
            <TD width="167" height="25" align=center>登录次数:</TD>
            <TD height="25" colspan="3" align=left><!-- <input type="hidden" name="Auto<%=i%>" value="<%=Auto%>"> -->	&nbsp;&nbsp;&nbsp;&nbsp;<%=adm_times%>次		</TD>
            <!--   <TD width="37" height="25" class="b-14hand"><div align="center">
            <input type="checkbox" name="<%="A"&Auto%>" value="active" <%=ifActiveStr%>> 
            </div></TD>-->
            </TR>
								<%if ZXLpowerful then%>   <TR bgColor=#C3E7F9>
            <TH height="30">权限:</TH>
            <TH height="30" colspan="3"><table width="100%"  border="0" cellspacing="0" cellpadding="0">
              <tr>
                <td width="5%" height="30"><input name="Adm_Remark" <%if Adm_Remark="normal" then response.write "checked"%> type="radio" value="normal">
                </td>
                <td width="14%">普通</td>
                <td width="5%"><input name="Adm_Remark" <%if Adm_Remark="supper" then response.write "checked"%>  type="radio" value="supper"></td>
                <td width="76%">超级</td>
              </tr>
            </table></TH>
            <!--             <TH>有效</TH> -->
            </TR><%end if%>
          <TR <%=bc%> > 
            <TD width="167" height="25" align=center>密码:</TD>
            <TD width="189" height="25" align=center><input name="UserPassword" type="password" id="UserPassword" value="************">
              <!-- <input type="hidden" name="Auto<%=i%>" value="<%=Auto%>"> -->			</TD>
            <TD width="73" align=center>确认密码</TD>
            <TD width="187" align=center><input name="UserPassword1" type="password" id="UserPassword1" value="************"></TD>
            <!--   <TD width="37" height="25" class="b-14hand"><div align="center">
            <input type="checkbox" name="<%="A"&Auto%>" value="active" <%=ifActiveStr%>> 
            </div></TD>-->
            </TR>
			<%if ZXLpowerful then%>
			 <TR bgColor=#C3E7F9>
            <TH height="30">是否激活:</TH>
            <TH height="30" colspan="3"><table width="100%"  border="0" cellspacing="0" cellpadding="0">
              <tr>
                <td width="5%" height="30"><input name="Adm_Status"  <%if Adm_Status="active" then response.write "checked"%>  type="radio" value="active">
                </td>
                <td width="14%">是</td>
                <td width="5%"><input name="Adm_Status" <%if Adm_Status<>"active" then response.write "checked"%>  type="radio" value=""></td>
                <td width="76%">否</td>
              </tr>
            </table></TH>
			</tr>
			<%end if%>
			<%
			

			'oRst.Close
			%>
   <input type="hidden" name="Myaction" value="update">
      
<TR bgColor=#EEEEEE>
            <TH height="30" colspan="4"><table width="100%"  border="0" cellspacing="0" cellpadding="0">
              <tr>
                <td width="97%" height="30"><div align="right">
                  <input type="submit" name="Submit" value="确定">
                  <input type="reset" name="Reset" value="重置">
                  <input type="button" name="Button" onClick="Javascript:window.history.back(-1);" value="返回">
                </div></td>
                <td width="3%">&nbsp;</td>
              </tr>
            </table></TH>
          </TR>
  
        </TBODY></form>
      </TABLE>
	<hr size="1"> 
    <div align="center">
       
        <BR>
  
  </div></td>
  </tr>
</table>

</body>
</html>
<%
'oRst.close
if Request.ServerVariables("REQUEST_METHOD")="POST" and request.form("Myaction")="update" then
	dim n
	if oRst.eof then	
	oRst.movefirst
	end if
	 UserPassword=data_pro(request.form("UserPassword"))
	 UserPassword1=data_pro(request.form("UserPassword1"))
 if UserPassword<>UserPassword1  then response.write "<script language='javascript'>alert('两次输入密码不一样!');window.history.back(-1);</script>"

oRst("ZXLCompanyName")=data_pro(request.form("ZXLCompanyName"))
oRst("ZXLCompanyStr")=data_pro(request.form("ZXLCompanyStr"))
oRst("ZXLCompanyStrStatus")="欢迎使用"&data_pro(request.form("ZXLCompanyStr"))&"机票实时预订系统"
oRst("ZXLBankName")=data_pro(request.form("ZXLBankName"))
oRst("ZXLBankAccount")=data_pro(request.form("ZXLBankAccount"))
oRst("ZXLFaxNum")=data_pro(request.form("ZXLFaxNum"))
oRst("ZXLTelService")=data_pro(request.form("ZXLTelService"))
oRst("ZXLTelCenter")=data_pro(request.form("ZXLTelCenter"))
oRst("ZXLCompanyEmail")=data_pro(request.form("ZXLCompanyEmail"))

if myPower<>"normal" then
oRst("UserreturnUrl")=data_pro(request.form("UserreturnUrl"))
end if
oRst("taxisWay")=data_pro(request.form("taxisWay"))
oRst("ExpandAll")=data_pro(request.form("ExpandAll"))
oRst("OrderBackPrescribe")=data_pro(request.form("OrderBackPrescribe"))

 if UserPassword=UserPassword1 and UserPassword<>"************" then
oRst("UserPassword")=UserPassword1
else
end if

oRst("adm_webSite")=data_pro(request.form("adm_webSite"))
if myPower<>"normal" then
oRst("ifOpenNewWin")=data_pro(request.form("ifOpenNewWin"))
oRst("Adm_Status")=data_pro(request.form("Adm_Status"))
oRst("Adm_Remark")=data_pro(request.form("Adm_Remark"))
oRst("ifCloseWin")=data_pro(request.form("ifCloseWin"))
end if
oRst.update
response.write "<script language='Javascript'>alert('数据更新成功!');window.location.href='manageUser.asp';</script>"
oRst.close
else
oRst.close
end if
set oRst=nothing
call conn_close()

%>

⌨️ 快捷键说明

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