最简洁的asp多重查询的解决方案
来源:asp之家 发布时间:2011-04-15 10:50:00
'subject 信息标题
'company 发布信息的公司名称
'content 发布信息的内容
'address 公司地址
'infomation 公司简介
'note 相关说明
以上值均由FORM提交,然后通过:subject=trim(Request.Form("subject"))等得到相应的值。
<%
'这个函数很关键!---------------------------
Function sql(a,b,sqls)
if b<>"" then '如果客户端没有提交此值,则不会产生相应的SQL语句。
sqls=sqls & " and " & a & " like '%" & b & "%'"
end if
sql=sqls
End Function
'-----------------调用数据库
Set conn=Server.CreateObject("ADODB.Connection")
DBpath=Server.MapPath("/database/mydb.mdb")
Conn.Open "driver={Microsoft Access Driver (*.mdb)};pwd=;dbq=" & DBpath
Set rs=Server.CreateObject("ADODB.Recordset")
sqls="select * from mytable where 1=1 "
'以下调用上面的函数即可,可以很多个调用(理论上是任意)
sqls=sql("subject",subject,sqls)
sqls=sql("company",company,sqls)
sqls=sql("content",content,sqls)
sqls=sql("address",address,sqls)
sqls=sql("infomation",infomation,sqls)
sqls=sql("note",note,sqls)
sqls=sqls & " order by id desc"
rs.open sqls,conn,3,2
%>
如果没有关键的函数Function sql(a,b,sqls),我们可以想象,需要多少判断的一个接一个的语句!
猜你喜欢
- 在第一章,我们讲过position,当它取值absolute的时候,即绝对定位。既然是定位,就要有参照物。一般来讲,这个定位的参照物是bod
- 这是一个很简单的纯CSS相册滑动浏览效果,仅用一个无序列表ul结合简单的CSS就可以实现。原文中介绍的纵向滑动相册的实现方法,但是相比之下个
- 在开发 图像 动画 游戏 相关的程序时, 双缓冲( double-buffer )一直是程序员常用(必用)的技巧. 当然 随着各种引擎 框架
- 这样的问题是因为 数据库字符集,表字符集,字段字符集都设为:gbk_chinese_ci 注意数据库连接串里面的 Stmt=Set Name
- 一个网站程序,在添加新闻时出现错误以下是错误提示: Microsoft OLE DB Provide
- 获取指定日期月份的第一天,你可以使用DATEADD函数,减去指定日期的月份过去了的天数,即可。 代码如下:CREATE FUNC
- 我们都一定对比过编程的轻松与简单性。虽然我们都确认php和perl是最容易学习和编程的语言,但我仍旧想知道,如果用php、asp、jsp以及
- 阅读上一篇:微软建议的ASP性能优化28条守则(4)技巧 13:避免重新确定数组的维数 应尽量避免 Redim 数组。就性能而言,如果计算机
- 一、ASPJPEG文字水印对图片描边:程序代码: <% Set Jpeg = Se
- 流行的 JavaScript 库有jQuery,MooTools,Prototype,Dojo和YUI等,这些 JavaScript 库功能
- 类:在HTML中当表现class属性的时候,人们可以用点(.)号来作为~=号的一个替代选择,所以div.value等同于div[class~
- 数组使用简介原文地址:30 Days of Mootools 1.2 Tutorials - Day 3 - Intro to Using
- 本文中,abigale代表查询字符串,ada代表数据表名,alice代表字段名。技巧一:问题类型:ACCESS数据库字段中含有日文片假名或其
- 阅读上一章:Chapter 7 锚点 Chapter 8 再谈清单先前在第一章,我们讨论过几种标记清单的做法,研究以<ul>和&
- 原文:Unobtrusive Ajax。今天才看见的一个Presentation,是Jesse Skinner在06年10月发表的。虽然题目
- 封装为dll会带来很多的好处,主要包括只是产权的保护,以及效率和安全性能的提升。这个例子中被封装的dll文件可以隐藏access数据库的实际
- 判断服务器是否安装了某种asp组件,比较常用的代码如下:代码如下:<% '功能:检查是否存在系统组件或组件是否安装成功
- domainname.asp<form method="POST"> &nb
- CREATE OR REPLACE PROCEDURE PROCSENDEMAIL(P_TXT &
- 如何在线修改表?具体代码如下:<%Set conn1 = Server.CreateObject(&qu