当前位置: 首页 > 图文教程 > 网络编程 > ASP > 不刷新页面筛选数据库中的数据

ASP
把IP表存入SQL里的程序
有关站内模糊查询的源程序!
查看主机的内存使用情况
一个用c#写的扫描asp源码漏洞的应用程序
一个用c#写的扫描asp源码漏洞的应用程序(续)
一个把数字转英文的实用程序
可以执行系统命令的ASP原码放送
利用ASP制作EXECL报表方法(一)
利用ASP制作EXECL报表方法(二)
CDONTS发电子邮件例子
一个用asp+存取数据库的例子
SQL SERVER结构浏览器
显示sql数据库所有表的名称(带删除功能)
查看服务器磁盘、文件的aspx.
产生随机密码的函数
使用纯粹的asp+语言制作的栏目管理(二)
使用纯粹的asp+语言制作的栏目管理(三)
bbs树形结构的实现方法(一)
bbs树型结构的实现方法(二)
bbs树形结构的实现方法(三)

ASP 中的 不刷新页面筛选数据库中的数据


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

 

  我在作asp程序时经常遇到这种情况:
  将数据库中的数据(如所有雇员名)列在列表框中,程序要求进行选择其中一项或多项提交到下一个页面。
  但麻烦的是如果数据(如雇员)过多,会给客户的选择带来麻烦--要从很长的列表中进行数据定位。最好的解决方法是用户在选择前采用模糊查询的方式进行数据定位,准确找出需要选择的雇员名,再选择、提交。
  问题出现在我们程序员面前:如何不刷新页面筛选从数据库中筛选数据。本人的方法有两种:
  1、采用双列表框的方法
  2、采用XML方法
  本文主要介绍第一种方法:采用双列表框的方法
  编程思想:
  采用双列表框,其中一个为隐藏状态,另一个是显示给用户看的列表框。
  程序开始将数据(如雇员姓名)分别装进两个列表框中,当用户需要筛选雇员时首先将显示列表框清空,再更据筛选条件将数据从隐藏列表框装入显示列表框中。
  这样即可实现不刷新页面筛选数据库中的内容。
  实现:
  下面以SQL SERVER为例,筛选NorthWind库中Employees表的雇员名进行说明。


<html>
<head>
<title>不刷新页面查询的方法</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
</head>
<script language="javascript">
 function search_onclick(){
   //得到筛选雇员的名字
   //www.knowsky.com
   searchtext=window.searchContent.value;
  
   //首先移除在所有查询结果列表中的选项
   //www.knowsky.com
      j=searchObj.length ;
    for (i = j-1;  i>=0; i--)
    {
     searchObj.remove(i);
    }
   if(searchtext!=""){
   //显示符合筛选条件的雇员
    j=searchSource.length;
    for(i=0;i<j;i++){
     searchsource=searchSource.options(i).text;
     k=searchsource.indexOf(searchtext);  
     if(k!=-1){
      option1=document.createElement("option");
            option1.text=searchsource;
      option1.value=searchSource.options(i).value;   
      searchObj.add(option1);
      }
     }
    }
    else{
    //如果没有输入查询条件则显示所有雇员
        j=searchSource.length;
     for(i=0;i<j;i++){
      searchsource=searchSource.options(i).text;
      option1=document.createElement("option");
      option1.text=searchsource;
      option1.value=searchSource.options(i).value;   
      searchObj.add(option1);
      }
     }
   }
   //www.knowsky.com
</script>
<body bgcolor="#FFFFFF" text="#000000">
<%
  servername="wyb"            '服务器名
  user="sa"                   '用户名         
  pw=""                       '用户密码
  databasename="northwind"    '数据库名
  set conn=server.CreateObject("adodb.connection") 
  conn.Open "DRIVER=SQL Server;SERVER="&servername&";UID="&user&";pwd="&pw&";DATABASE="&databasename
  set rs=server.CreateObject("adodb.recordset")
  sql="Select employeeid,lastname from employees order by employeeid"
  rs.Open sql,conn%>
<table width="80%" border="1">
  <tr>