在做asp查询时候 借鉴的一些代码 

留个纪念。。。。。。。

<!-- #include file="conn.asp"-->

<html>

<head>

<meta http-equiv="Content-Type" content="text/html; charset=gb2312">

<title>套餐延期资料批量查询</title>

</head>

<body>

<%

dim sql,RS,area,xy,saler,etime,page,pagecount

saler = Trim(request.Form("saler"))

area = Trim(request.Form("area"))

xy = Trim(request.Form("xy"))

etime = Trim(request.Form("etime"))

'area = ""

tele = ""

product = ""

username = ""

tc_name = ""

byz = ""

bs = ""

stime =""

etime = ""

'saler = ""

'xy = ""

'uptime = ""

  Set RS=Server.CreateObject("ADODB.Recordset")

sql="SELECT * FROM tc WHERE"

  If saler<>"" Then sql=sql&" saler='"&saler&"' AND"

  If area<>"" Then sql=sql&" area='"&area&"' AND"

If xy<>"" Then sql=sql&" xy='"&xy&"' AND"

If etime<>"" Then sql=sql&" etime<'"&etime&"' AND"

if right(sql,5)="WHERE" then sql=left(sql,clng(len(sql))-5) '解决所有参数都为空的情况

if right(sql,3)="AND" then sql=left(sql,clng(len(sql))-3) '去掉参数最后的and

sql=sql&" order by number"

RS.open sql,Conn1,3,1

RS.PageSize=100

pagecount=RS.PageCount

page=int(request.QueryString("page"))

if page<=0 then page=1

if request.QueryString("page")="" then page=1

RS.AbsolutePage=page

'if request.form("area")="" and request.form("xy")="" and request.form("saler")="" then

  'response.write("请输入查询条件(可模糊查询)")

  'response.end

'end if

if RS.eof or RS.bof then

  response.write("<script language='javascript'>alert('没有该用户信息,请返回重新查询');location.href='search1.asp'</script>")

  response.end 

else

area = RS ("area")

tele = RS ("number")

product = RS ("product")

username = RS ("username")

tc_name = RS ("name")

byz = RS ("byz")

bs = RS ("bs")

stime = RS ("stime")

etime = RS ("etime")

xy = RS ("xy")

saler = RS ("saler")

uptime = RS ("uptime")

reason = RS("reason")

end if

%>

<table id="t1" align="center" width="90%" height="102" border="1" cellspacing="1" bordercolor="#FFFFFF">

<form name="Myform">

<tr style="text-align:center " id="tr1">

  <th colspan="14">套餐延期资料批量查询</th>

  </tr>

<tr bgcolor="#99FFFF" style="text-align:center " bordercolordark="#FFCCFF" bordercolorlight="#FFFFFF">

  <td>区域</td>

  <td>号码</td>

  <td>产品</td>

  <td>用户名称</td>

  <td>套餐名称</td>

  <td>包月值</td>

  <td>倍数</td>

<td>开始时间</td>

  <td>结束时间</td>

  <td>是否续约</td>

  <td>营销人员</td>

  <td>填报时间</td>

</tr>

<%for i=1 to RS.PageSize%>

  <%

if RS.EOF then

  exit for

  end if

%>

  <tr style="text-align:center " bordercolordark="#FFCCFF" bordercolorlight="#FFFFFF" >

<td><%=area %></td>

  <td><%=tele %></td>

  <td><%=product %></td>

  <td><%=username %></td>

  <td><%=tc_name %></td>

  <td><%=byz %></td>

  <td><%=bs %></td>

<td><%=stime %></td>

<td><%=etime %></td>

<td><%=xy %></td>

<td><%=saler %></td>

<td><%=uptime %></td>

</tr>

<%

RS.movenext

next

%>

</form>

</table>

<%if page=1 and not page=pagecount then%>

  <div align="right">第<%=page%>页&nbsp;&nbsp;<%for i=1 to pagecount%>

<a href="info.asp?page=<%=i%>"><%=i%></a>&nbsp;<%next%><a href="info.asp?page=<%=page+1%>">下一页</a>&nbsp;&nbsp;</div>

  <%elseif page=pagecount and not page=1 then%>

  <div align="right">第<%=page%>页&nbsp;&nbsp;<%for i=1 to pagecount%>

<a href="info.asp?page=<%=i%>"><%=i%></a>&nbsp;<%next%><a href="info.asp?page=<%=page-1%>">上一页</a>&nbsp;&nbsp;</div>

  <%elseif page<1 then%><div class="font" align="right"><font color=red>没有任何记录！</font></div>

  <%elseif page>pagecount then%><div class="font" align="right"><font color=red>没有任何记录！</font></div>

  <%elseif page=1 and page=pagecount then%>

  <%else%>

  <div align="right">第<%=page%>页&nbsp;&nbsp;<%for i=1 to pagecount%>

<a href="info.asp?page=<%=i%>"><%=i%></a>&nbsp;<%next%><a href="info.asp?page=<%=page-1%>">上一页</a>

  <a href="info.asp?page=<%=page+1%>">下一页</a>&nbsp;&nbsp;</div>

<%end if%>

</body>

</html>

http://user.qzone.qq.com/372806800/blog/1345306209

asp批量查询的更多相关文章

  1. 未注册wang域名批量查询工具

    一.支持规则查询 可自定义生成域名进行查询,可生成任意位数的字母数字域名,根据[声母].[韵母]生成单拼,双拼,三拼等域名,还可根据字典生成,支持全拼.首拼识别,全国城市区号.城市全拼.城市首拼.热门 ...

  2. myBatis批量查询操作，xml中使用foreach案例

    使用场景:有一个订单表,实体类为OrderBase.java,订单有个状态为status值可能为"1,2,3,4,5,6",现在需要查询状态为"2,3,4"的订 ...

  3. MongoDB与传统数据库的使用区别——批量插入与批量查询

    我在百X知道上回答问题时经常遇到类似与这样的问题:MongoDB有没有像MySQL一样的ODBC驱动?MongoDB能不能像MySQL一样获取字段名称或类型. 我的回答是:不行,因为MongoDB不是 ...

  4. 使用一个T-SQL语句批量查询数据表占用空间及其行数

    原文:使用一个T-SQL语句批量查询数据表占用空间及其行数 要找到数据库中数据表占用的空间和存在的行数.可以使用sp_spaceused搭配数据表的名称.就可以产生该表耗用的空间和现有行数. 如: U ...

  5. ASP.NET查询页面设置form的action属性只弹出一个页面，并且每次将页面设置到最前

    原文:ASP.NET查询页面设置form的action属性只弹出一个页面,并且每次将页面设置到最前 背景 当数据量大.查询条件复杂,多样多的时候,我们可能需要单独做一个查询界面,当用户选择设置了相关的 ...

  6. 【JAVAEE学习笔记】hibernate02：实体规则、对象状态、缓存、事务、批量查询和实现客户列表显示

    一.hibernate中的实体规则 实体类创建的注意事项 1.持久化类提供无参数构造 2.成员变量私有,提供共有get/set方法访问.需提供属性 3.持久化类中的属性,应尽量使用包装类型 4.持久化 ...

  7. Oracle批量查询、删除、更新使用BULK COLLECT提高效率

    BULK COLLECT(成批聚合类型)和数组集合type类型is table of 表%rowtype index by binary_integer用法笔记 例1: 批量查询项目资金账户号为 &q ...

  8. 批量查询sql脚本

    远程批量查询sql脚本 for i in {1..50} do sql_ip=172.168.0.${i}   information=`mysql -h ${sql_ip} -uroot -ppas ...

  9. 写了个批量查询qs的软件

    因为需要,自己写了个批量查询qs的小软件.从网站中抓出需要的数据,格式化显示: 对字符串进行检测处理,先用Replace函数去掉字符串的空格,再用正则表达式匹配,返回匹配的字符串,如果没有匹配,则返回 ...

随机推荐

  1. mysql双主复制总结

    双主复制: 1).在两台服务器上各自建立一个具有复制权限的用户: 2).修改配置文件: # 主服务器A上 [mysqld] server-id = 10 log-bin = mysql-bin rel ...

  2. 利用call与apply向函数传递参数

    Js中函数对象都有call与apply两个方法属性,二者使用方法和功能一样,只是传递参数的格式不同,call逐个传递单个参数,apply一次性传递一个参数数组. 这两个方法可以改变函数的调用对象,并且 ...

  3. mysql修改数据表名

    在使用mysql时,经常遇到表名不符合规范或标准,但是表里已经有大量的数据了,如何保留数据,只更改表名呢? 可以通过建一个相同的表结构的表,把原来的数据导入到新表中,但是这样视乎很麻烦. 能否简单使用 ...

  4. webGL

    WebGL:  是 OpenGL 和 JavaScript 之间的结晶.HTML5 的 canvas 元素里.利用和OpenGL同样的API.可以绘制高精度的三维图像. (OpenGL 能够从任意视点 ...

  5. CentOS 安装

    选择选择启动介质 Install or upgrade an existing system: 安装或升级现有的系统 install system with basic video driver: 安 ...

  6. matlab中使用fuzzy工具箱

    4步教你学会使用matlab模糊控制工具箱 Matlab模糊控制工具箱为模糊控制器的设计提供了一种非常便捷的途径,通过它我们不需要进行复杂的模糊化.模糊推理及反模糊化运算,只需要设定相应参数,就可以很 ...

  7. Mysql event学习

    我们可能比较熟悉crond,但是mysql也有一个自己的叫event,oracle的叫job. 开启mysql的event有很多种方法,和临时开启.我们在配置文件里面添加参数,随着服务一起开启. 在[ ...

  8. heroku空间部署步骤

    一,下载安装heroku toolbelt 二,在dos窗口运行 heroku login 进行身份验证 三,heroku create appName --buildpack heroku/php ...

  9. 禁止北京地区IP访问站点

    <script type="text/javascript" src="http://counter.sina.com.cn/ip" charset=&q ...

  10. Docker-compose命令详解

    语法: Define and run multi-container applications with Docker. Usage:   docker-compose [-f=<arg> ...