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

ASP
javascript asp教程More About Recordsets
javascript asp教程添加和修改
javascript asp教程 日期相关
简单的ASP分页代码(测试正确)
用ASP打开远端MDB文件的方法
asp下同一空间多绑多哥域名的方法
asp下实现替换远程文件为本地文件并保存远程文件的代码
asp,VBscript语法错误,史上最全最详细最精确
讲解ASP方面的知识比较全的asp学习教程
给万博系统的新闻系统增加分页功能[配有详细说明]
在asp中通过vbs类实现rsa加密与解密的代码
一段在asp中加密与解密对应的函数
通过MSXML2自动获取QQ个人头像及在线情况(给初学者)
用ASP VBS xmlhttp adodbstream下载和保存图片的代码
厉害的用Asp获取Dll加密新闻内容
用正则和xmlHttp实现的asp小偷程序
ASP之简化创建关闭记录集对象并创建使用简单的MSSQL存储过程
ASP中怎么实现SQL数据库备份、恢复!
asp中实现随机分组程序的代码
asp之字符串操作函数

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


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-11-03   浏览: 233 ::
收藏到网摘: 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