标题:使用recordset对象实现搜索功能?出问题拉,帮助解决一下
只看楼主
cctv25
Rank: 1
等 级:新手上路
帖 子:15
专家分:0
注 册:2005-8-19
 问题点数:0 回复次数:6 
使用recordset对象实现搜索功能?出问题拉,帮助解决一下
使用recordset对象实现搜索功能代码:
<% dim cnn, rs,sql,mm
mm=request.Form("mm")
set cnn=server.CreateObject("adodb.connection")
set rs=server.CreateObject("adodb.recordset")
cnn.connectionstring= "driver={SQL server};server=billgates;"&_
"uid=sa;pwd=111;database=school"
cnn.open

sql="select un from pswd where pda like'%"&mm&"%'"
''sql="select * from mytable where author like'%" & author & "%'"
rs.open sql,cnn,3,3

  if rs.EOF or rs.BOF then
    Response.Write"没有此记录......"
else
Response.Write rs("un")
    end if
rs.Close
set rs=nothing
cnn.close
set cnn=nothing
%>
打开网业时记录集的第一项显示出来,
如何修改才可以实现只有输入搜索条件时,才可以显示要查寻的项
搜索更多相关主题的帖子: recordset 对象 搜索 
2005-08-30 13:05
downdown
Rank: 1
等 级:新手上路
帖 子:139
专家分:0
注 册:2005-6-20
得分:0 
以下是引用cctv25在2005-8-30 13:05:34的发言: 使用recordset对象实现搜索功能代码: <% dim cnn, rs,sql,mm mm=request.Form("mm") set cnn=server.CreateObject("adodb.connection") set rs=server.CreateObject("adodb.recordset") cnn.connectionstring= "driver={SQL server};server=billgates;"&_ "uid=sa;pwd=111;database=school" cnn.open if mm="" then response.write "没有输入搜索条件!" else sql="select un from pswd where pda like'%"&mm&"%'" ''sql="select * from mytable where author like'%" & author & "%'" rs.open sql,cnn,3,3 if rs.EOF or rs.BOF then Response.Write"没有此记录......" else do while not rs.eof Response.Write rs("un") rs.movenext loop rs.Close set rs=nothing end if end if cnn.close set cnn=nothing %> 打开网业时记录集的第一项显示出来, 如何修改才可以实现只有输入搜索条件时,才可以显示要查寻的项
红色标记为修改内容!

[此贴子已经被作者于2005-8-30 13:23:33编辑过]

2005-08-30 13:20
cctv25
Rank: 1
等 级:新手上路
帖 子:15
专家分:0
注 册:2005-8-19
得分:0 
谢谢拉,
2005-08-30 18:24
cctv25
Rank: 1
等 级:新手上路
帖 子:15
专家分:0
注 册:2005-8-19
得分:0 
狂谢2楼的高手
2005-08-30 19:26
downdown
Rank: 1
等 级:新手上路
帖 子:139
专家分:0
注 册:2005-6-20
得分:0 
不谢.
离高手还差十万八千里呢!
斑主才厉害呢!呵呵!
在这学到不少东西,也回报在这里。
2005-08-31 12:35
cctv25
Rank: 1
等 级:新手上路
帖 子:15
专家分:0
注 册:2005-8-19
得分:0 
5楼的楼主谦虚拉,
2005-08-31 19:31
cctv25
Rank: 1
等 级:新手上路
帖 子:15
专家分:0
注 册:2005-8-19
得分:0 
不晓得学到什么地步才可以那ASP去赚钱啊,
马上就要大学毕业拉,
感觉什么东东都没有学会啊
2005-08-31 19:34



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-26321-1-1.html




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.338490 second(s), 7 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved