<%
'数据库连接代码 省略……
'执行显示代码:
dim rs,sql,j,i '定义几个变量
set Rs = Server.CreateObject("Adodb.Recordset")
Sql = "Select * From 数据表名 Order By id Desc " '如果没有ID字段把Order By id Desc去掉
Rs.Open Sql,conn,1,3
j = rs.recordcount '得到总记录数
'显示全部数据:
for i=0 to j
response.write rs(1) &" | " &rs(2) &"<br>" '有几个字段就加几个 rs(n)
rs.movenext
next
response.write "<hr>"
'以上是显示全部数据
'关闭对象
rs.close
set rs=nothing
%>
<%
'此代码显示查询的条件
set Rs = Server.CreateObject("Adodb.Recordset")
Sql = "Select * From 数据表名 Where 字段名=’“&request.form("查询的表单名")&”‘ "
Rs.Open Sql,conn,1,3
if not rs.eof then
response.write rs(1) &" | " &rs(2) &"<br>" '有几个字段就加几个 rs(n)
else
response.write "没有该记录!"
end if
'关闭对象
rs.close
set rs=nothing
%>
ASP文件 和表单代码你自己能写了吧?
你的筛选条件加上了嘛WHERE 子句
如需有条件地从表中选取数据,可将 WHERE 子句添加到 SELECT 语句。
语法
SELECT 列名称 FROM 表名称 WHERE 列 运算符 值下面的运算符可在 WHERE 子句中使用:
*** 作符 描述
= 等于
<>不等于
>大于
<小于
>= 大于等于
<= 小于等于
BETWEEN 在某个范围内
LIKE 搜索某种模式
注释:在某些版本的 SQL 中, *** 作符 <>可以写为 !=。
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)