JavaScript应用于asp开发场景

演示代码示例：

 <%Path="../"%>

 <!--#include file="../../Inc/Conn.asp"-->

 <!--#include file="../../Inc/Web_Safe.asp"-->

 <!--#include file="../../Inc/Function.asp"-->

 <!--#include file="../Web_Save.asp"-->

 <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">

 <html xmlns="http://www.w3.org/1999/xhtml">

 <head>

 <meta http-equiv="Content-Type" content="text/html; charset=gb2312" />

 <title>后台管理首页</title>

 <link href="../style/style.css" rel="stylesheet" type="text/css">

 </head>

 <body>

 <%

 Dim adminid,What,Up,style

     adminid      = Request.QueryString("adminid")

     What         = Request.QueryString("What")

     Id           = Request.QueryString("Id")

     UpId         = Request.QueryString("UpId")

     style        = Request.QueryString("style")

     Dim SClass,SBoard,SType

 If  adminid ="" Then

         Call Show_Msg("请选择要设置权限管理员！","Admin_User.asp")

   Else

         Set Rsc =Conn.Execute("Select Web_Admin_Class,Web_Admin_Board,Web_Admin_Type From Web_Admin Where Web_Admin_Id="&adminid)

              On Error Resume Next

              If Not Rs.Eof Then

               SClass = Rsc("Web_Admin_Class")

               SBoard = Rsc("Web_Admin_Board")

               SType  = Rsc("Web_Admin_Type")

              End If

         Set Rsc =Nothing

  End If

     Select Case  style

            Case  "class"  Call DoUp(Id,UpId,"Class")

            Case  "Board"  Call DoUp(Id,UpId,"Board")

            Case  "Type"   Call DoUp(Id,UpId,"Type")

     End Select

     Sub DoUp(Id,UpId,style)

         If UpId<0 Then

            Call Show_Msg("已经到顶，不能再上移了！","?adminid="&adminid)

         Else

             On Error Resume Next

             SQL = "Update  "&style&" set IsDesc="&UpId&" where "&style&"Id ="&Id

             Set Rs = Conn.Execute(SQL)

             Set Rs=Nothing

             Response.Redirect("?adminid="&adminid)

         End If

     End Sub

 %>

 <table width="99%" border="0" align=center cellpadding=3 cellspacing=1 bordercolor="#FFFFFF" bgcolor="#C4D8ED">

   <tbody>

     <tr>

       <td height=23  colspan=2 id="table_bg_title"><span class="STYLE1">  管理员管理 &gt; 权限管理</span></td>

     </tr>

      <tr>

     <td height="30" align="left" class="plen">[<a href="Admin_Edit.asp" target="main"> 增加管理员 </a>] [ <a href="Admin_User.asp" target="main">管理员列表</a> ] </td>

     </tr>

   <tr>

    <td bgcolor="#EEF7FD">

  <form action="Admin_Sys_Save.asp" method="post"  name="Doclass">

  <table width="100%" border="0" align=center cellpadding=8 cellspacing=1 bordercolor="#FFFFFF" bgcolor="#C4D8ED" class="m_top_bottom">

     <tr>

     <td width="94%" colspan="3" align="left" class="td_bg">

     </a> </span>      建设中</td>

     </tr>

   <tr>

     <td height=12 colspan="4" align="left" class="plen">

       操作：

         <input type="radio" name="check_class" id="chkAll" onClick="CheckAll();">

       全选 

       <input type="radio"  name="check_class" id="NotchkAll" onClick="unSelect();">

       反选

       <input name="submit" type='submit' value=' '  onClick="return ConfirmDel()" class="send_botton1">

       <input type="reset" name="button4" id="button4" value=" " class="pic_botton1">

       <input name="action" type="hidden" id="action" value="Do_Sys" />

       <input name="Web_Admin_Id" type="hidden" id="Web_Admin_Id" value="<%=adminid%>" />      </td>

     </tr>

 </table>

 </form>   </td>

   </tr>

 </table>

 </body>

 </html>

 <script language="javascript">

 function unselectall(){

         if(document.del.chkAll.checked){

                 document.del.chkAll.checked = document.del.chkAll.checked;

             }

     }

 function CheckAll1(form){

         for (var i=0;i<form.elements.length;i++){

             var e = form.elements[i];

             if (e.Name != "chkAll"){

                 e.checked = form.chkAll.checked;

             }

         }

     }

 function CheckAll(){

          for(var i=0;i<document.Doclass.classid.length;i++){

                 document.Doclass.classid[i].checked=true;

          }

          for(var i=0;i<document.Doclass.Typeid.length;i++){

                 document.Doclass.Typeid[i].checked=true;

          }

          for(var i=0;i<document.Doclass.Boardid.length;i++){

                 document.Doclass.Boardid[i].checked=true;

          }

 } 

 function unSelect(){ 

     for(var i=0;i<document.Doclass.classid.length;i++) {

         if(document.Doclass.classid[i].checked)

     {

         document.Doclass.classid[i].checked=false;

     } else {

         document.Doclass.classid[i].checked=true;

     }

     }

 //

     for(var i=0;i<document.Doclass.Boardid.length;i++) {

         if(document.Doclass.Boardid[i].checked)

     {

         document.Doclass.Boardid[i].checked=false;

     } else {

         document.Doclass.Boardid[i].checked=true;

     }

     }

 //

     for(var i=0;i<document.Doclass.Typeid.length;i++) {

         if(document.Doclass.Typeid[i].checked)

     {

         document.Doclass.Typeid[i].checked=false;

     } else {

         document.Doclass.Typeid[i].checked=true;

     }

     }

 //

 }

 ////////////////////////

 function ConfirmDel()

 {

    if(confirm("确定要提交吗？"))

      return true;

    else

      return false;

 }

 </script>

JavaScript应用于asp开发场景的更多相关文章

  1. 领域驱动和MVVM应用于UWP开发的一些思考

    领域驱动和MVVM应用于UWP开发的一些思考 0x00 起因 有段时间没写博客了,其实最近本来是根据梳理的MSDN上的资料(UWP开发目录整理)有条不紊的进行UWP学习的.学习中有了心得体会或遇到了问 ...

  2. 324篇CSS应用效果集合（梦想天空，可同时应用于Web开发与Qt界面开发）

    http://www.cnblogs.com/lhb25/category/146075.html http://www.yyyweb.com/

  3. JavaScript日历控件开发 C# 读取 appconfig文件配置数据库连接字符串，和配置文件 List<T>.ForEach 调用异步方法的意外 ef 增加或者更新的习惯思维 asp.net core导入excel 一个二级联动

    JavaScript日历控件开发   概述 在开篇之前,先附上日历的代码地址和演示地址,代码是本文要分析的代码,演示效果是本文要实现的效果代码地址:https://github.com/aspwebc ...

  4. SSD固态盘应用于Ceph集群的四种典型使用场景

    在虚拟化及云计算技术大规模应用于企业数据中心的科技潮流中,存储性能无疑是企业核心应用是否虚拟化.云化的关键指标之一.传统的做法是升级存储设备,但这没解决根本问题,性能和容量不能兼顾,并且解决不好设备利 ...

  5. JAVAScript：前端模块化开发

    目录 一:前端模块化概要 1.1.模块化概要 1.2.函数封装 1.3.对象封装 1.4.立即执行函数表达式(IIFE) 1.5.模块化规范 1.5.1.CommonJS 1.5.2.AMD((Asy ...

  6. 10个用于Web开发的最好 Python 框架

    Python 是一门动态.面向对象语言.其最初就是作为一门面向对象语言设计的,并且在后期又加入了一些更高级的特性.除了语言本身的设计目的之外,Python标准 库也是值得大家称赞的,Python甚至还 ...

  7. Git应用于Android项目的入门知识：我的理解

    Git应用于Android项目的基本知识.     常常将git,repo和gerrit三种工具配合起来使用,使Android开发中的部分工作自动化.并适应敏捷项目管理的需要.     repo是Go ...

  8. Bootstrap 是一个用于快速开发 Web 应用程序和网站的前端框架

    Bootstrap 是一个用于快速开发 Web 应用程序和网站的前端框架.Bootstrap 是基于 HTML.CSS.JAVASCRIPT 的. 历史 Bootstrap 是由 Twitter 的 ...

  9. js架构设计模式——理解javascript中的MVVM开发模式

    理解javascript中的MVVM开发模式 http://blog.csdn.net/slalx/article/details/7856769 MVVM的全称是Model View ViewMod ...

随机推荐

  1. CIKM 18 | 蚂蚁金服论文：基于异构图神经网络的恶意账户识别方法

    小蚂蚁说: ACM CIKM 2018 全称是 The 27th ACM International Conference on Information and Knowledge Managemen ...

  2. python中常用的模块一

    一,常用的模块 模块就是我们将装有特定功能的代码进行归类,从代码编写的单位来看我们的程序,从小到大的顺序: 一条代码<语句块,<代码块(函数,类)<模块我们所写的所有py文件都是模块 ...

  3. VC.时间（网页内容收集）

    1.VC++获得当前系统时间的几种方案_记忆53秒_新浪博客.html(http://blog.sina.com.cn/s/blog_676271a60101i0hb.html) 1.1.内容保存: ...

  4. SQL左右连接中的on and和on where的区别

    SQL左右连接中的on and和on where的区别 左联时,ON后面的对左边表的条件对左边表数据无影响(因为左连接符合左边所有条件),但对右边表数据有影响,只有符合左边表条件时,右边表数据才会查出 ...

  5. 动态规划-子数组乘积小于k的总个数 Subarray Product Less Than K

    2018-09-01 23:02:46 问题求解: 问题求解: 最开始的时候,一眼看过去就是一条 dp 嘛,保存每个数字结尾的长度和,最后求和就好,至于长度如何求,本题中需要用滑动窗口来维护. 很好的 ...

  6. 细胞迁移 | cell migration

    一些基本概念: intracellular biochemical signaling pathways:胞内生化信号通路 extracellular mechanical cues: 胞外机械信号 ...

  7. English trip Spoken English & Word List（updating...）

    Word List 词汇 Square  英 [skweə]  美 [skwɛr]  adj. 平方的:正方形的:直角的:正直的. 使成方形:与…一致 vi. 一致:成方形 n. 平方:广场:正方形 ...

  8. ASP.NET发送电子邮件(转)

    原始地址:http://www.cnblogs.com/ForEvErNoME/archive/2012/06/05/2529259.html(有代码下载,博主真是有操守) 1.补充知识 (1)POP ...

  9. selenium配置Chrome驱动

    1.http://chromedriver.storage.googleapis.com/index.html   chrome下载驱动地址 和对应的版本驱动,不用FQ 2.配置方法:如在e盘创建一个 ...

  10. win10更新后，可以远程桌面ping也没问题，但是无法访问共享文件夹的解决方法

    计算机\HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\LanmanWorkstation\Parameters 1.在键盘输入WIN+R键, ...