当前位置: 首页 > 图文教程 > 网络编程 > ASP > asp模仿 Lotus Notes 的界面程序

ASP
IIS访问ASP页面时报错The requested resource is in use.的解决办法
错误类型:Provider (0x80004005)未指定的错误 的一个处理方法
关于asp+access的安全问题分析
把RS.GetRows看得更清楚
asp下UTF-8页面乱码的解决方法
解决使用良精企业建站7.0未注册问题
在ASP中连接MySQL数据库的方法,最好的通过ODBC方法
flash与js通讯方法
ASP操作Excel相关技术总结
解决用Access数据库建站维护不便的问题的方法
ASP实现GB2312字符与区位码的相互转换的代码
对于ASP编码问题的深入研究与最终解决方案
ASP生成UTF-8编码的代码
删除A表中在B表中不存在的数据
动网防恶意广告比较有效的办法附asp代码
asp磁盘缓存技术使用的代码
网页语言编码及asp乱码问题解决方案
FSO遍历目录实现全站插马的代码
关于无限分级(ASP+数据库+JS)的实现代码
如何写ASP入库小偷程序

ASP 中的 asp模仿 Lotus Notes 的界面程序


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-11-03   浏览: 224 ::
收藏到网摘: n/a

 

<%
'仿 Lotus Notes 的界面程序
'作者:塞北的雪
'创作日期:2002年3月
'修改日期:2005年3月
'为了安全和共享的方便,将其中asp程序的标记改成中文字符,使用时可以批量替换回
%>

<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<style>
.tHeader{font-weight:bold;background-color: #D0D0D0; color: #000000; border-left:

1 solid #FFFFFF; border-right: 1 solid #000000; border-top: 1 solid #FFFFFF;

border-bottom: 1 solid #000000}
.tHeaderPush{font-weight:bold;background-color: #D0D0D0; color: #000000; border: 1

solid #707070;}
</style>
<title>模仿Lotus Notes特效</title>
<script language=javascript>
     var yesH="√";    //选中后显示的标志
     var noH='  ';     //未选中时的某人显示
     var IfPush='no';  //移动鼠标选中的时候用于控制,'yes'表示鼠标已经按下,拖动有

效;'no'表示鼠标已经泰起来了,再移动鼠标已经没有作用了
    
     var FI='yes';     //移动鼠标选中的时候用于控制,'yes'可以处理当前单元格,'no'

则不能处理
                       //默认为'yes',当我们进入某个单元格区域,则处理他,然后改为

'no',则不再
                       //对该单元格处理,当离开单元格时又改为'yes',又可以处理下一

个进入的单元格
     
     //执行数据删除 
     function delInfo(iCount)
     {
       var pKey=new String();
       if(iCount>0)
       {
          for(var i=1;i<=iCount;i++)
          {
            if (document.getElementById("a" + i).innerText==yesH)
              {pKey += ("'" + document.getElementById("pKey" + i).value + "',")}
              //此处生成关键字串,由于是字符型,故在每个关键字的两侧加了单引号,
              //然后用逗号连接,如果是数字型,则不用单引号。
          }
       }
       if(pKey!="")
       {
          pKey=pKey.substring(0,pKey.length-1);
          if(confirm("确定要删除选定的信息吗?"))
          {
              document.getElementById("delPkey").value=pKey;
              document.getElementById("delForm").submit();
          }
       }
     }
    
     //执行数据修改,无论选中多少,但只对第一个进行修改
     function editInfo(iCount)
     {
       var pKey=new String();
       if(iCount>0)
       {
          for(var i=1;i<=iCount;i++)
          {
   &nb