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. 解決 Android Studio 不停 Indexing 的問題（Updating Indices: Indexing paused due to batch update）

    遇到這個問題通常是 IDE 更新後,或是反覆使用 Android Studio 開啟其他專案所導致,解決方法其實非常簡單喔! 点击 這個選項的功用是「清除 IDE 暫存並重啟」,沒錯,會出現上述情形的 ...

  2. 【SQL Prompt】SQL Prompt7.2下载及破解教程

    基本介绍 SQL Prompt能根据数据库的对象名称,语法和用户编写的代码片段自动进行检索,智能的为用户提供唯一合适的代码选择.自动脚本设置为用户提供了简单的代码易读性--这在开发者使用的是不大熟悉的 ...

  3. 颜色选择器 rgb 与16进制 颜色转换

    1. h5 <!DOCTYPE html> <html lang="en"> <head> <meta charset="UTF ...

  4. yum update软件包冲突

    因升级系统过程中断,重新进入系统继续升级出现如下问题(内容太多,只粘部分内容) # yum update 正在解决依赖关系 --> 正在检查事务 ---> 软件包 alsa-firmwar ...

  5. Linux下查/删/替 命令(转)

    ▪查看某目录下所有文件的个数: [root@localhost1 opt]# ls -l |grep "^-"|wc -l ▪查看某目录下所有文件的个数,包括子目录里面的: [ro ...

  6. Eclipse项目左侧调整显示或者不显示路径

    View Menu(倒三角)-->Package Presentation-->选择Flat或Hierarchical

  7. 如何调节tomcat初始内存

    1.linux下调节tomcat初始内存大小 linux下tomcat的运行文件为catalina.sh,打开文件,在文件靠近顶部找到“ JAVA_OPTS ”字样,在它后面添加如下内容即可 # JA ...

  8. 日常英语---十、MapleStory/Monsters/Level 191-201（Sad Erda：向你发射炮弹进行攻击）

    日常英语---十.MapleStory/Monsters/Level 191-201(Sad Erda:向你发射炮弹进行攻击) 一.总结 一句话总结:一种悲伤的精神,形成于奥术之河,一个黑法师能够融合 ...

  9. Maven报错Please ensure you are using JDK 1.4 or above and not a JRE解决方法!

    https://www.cnblogs.com/shihua513/p/6163682.html 在eclipse下用maven编译时,很有可能出现以下错误: Please ensure you ar ...

  10. 雷林鹏分享：jQuery EasyUI 树形菜单 - 树形菜单加载父/子节点

    jQuery EasyUI 树形菜单 - 树形菜单加载父/子节点 通常表示一个树节点的方式就是在每一个节点存储一个 parentid. 这个也被称为邻接列表模型. 直接加载这些数据到树形菜单(Tree ...