繁體中文当前位置: 首页 > 图文教程 > 网络编程 > ASP > 不刷新页面筛选数据库中的数据
- ASP
- ASP中实现限制IP的函数详解
- Asp下实现限制IP访问的程序代码
- asp下DateDiff 函数参数说明
- Highlight patterns within strings
- Insert Date and Time into Access
- asp下调试程序的debug类
- RESPONSE.WRITE和<%=%的区别
- 用asp实现网页邮箱访问的方法
- 编写一个含二级目录的源码(Asp+JavaScript)
- asp下删除Access数词库中的空记录的sql语句
- asp下制做行背景颜色交替变换的表格
- asp下将数据库中的信息存储至XML文件中
- asp下如何在Access数据库中立即得到所插入记录的自动编号？
- asp下如何在ADO服务器端利用好缓存技术？
- asp调用Word打印的代码
- 巧用FileSystem组件实现WEB应用中的本地特定打印的方法
- 用javascript解决外部数据抓取中的乱码问题
- Asp中随机产生用户密码的代码
- 反SPAM新思路—换Z-BLOG的验证码！
- 在Z-BLOG可用的新版ASP的GIF验证码[V70404]
ASP 中的 不刷新页面筛选数据库中的数据
出处:互联网 整理: 软晨网（RuanChen.com） 发布: 2009-11-03 浏览: 224 ::
收藏到网摘: 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>
评论 (0) All
