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

ASP
二文件上传,才30行代码
用ASP制作在线测试
三级下拉框连动的数据库版
用户注册及跟踪代码(一)
用户注册及跟踪代码(二)
用户注册及跟踪代码(三)
ASP.Net写的浏览器间谍
ASP实现播放Flash的例子
用DataList控件开发一个简单的留言本程序
aspemail组件的应用
编写数据库脚本
用ASP建立邮件列表
用ASP技术编制隐藏用户密码程序
用ASP统计用户在站点的停留时间
HTTP方式上载文件的ASP程序实例
使用VB编写纯ASP程序
用ASP统计用户在站点的停留时间(1)
用ASP统计用户在站点的停留时间(2)
用ASP实现论坛的UBB功能(一)
用ASP实现论坛的UBB功能(二)

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


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