dnf90级能不能换职业:asp相关-大家进来看一下这段代码.

来源:百度文库 编辑:中科新闻网 时间:2024/04/29 21:19:27
<%
leibie=request("leibie")
fangshi=request("fangshi")
keyword=request("keyword")
%>

<%
strConn = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="+Server.mappath("data/tommyfgj.mdb")+";Persist Security Info=False"
set conn = Server.CreateObject("ADODB.Connection")
conn.open strConn
set rs=server.CreateObject("adodb.recordset")

'查询“leibie”表,"fangshi"字段,“keyword”关键字
sql="select * from "&leibie&" where "&fangshi&" like '%"&keyword&"%' order by id desc"
rs.open sql,conn,1,3
rs.PageSize=2
pagecount=rs.PageCount
page=int(request.QueryString ("page"))
if page<=0 then page=1
if request.QueryString("page")="" then
page=1
end if
rs.AbsolutePage=page
%> <table width="546" border="0" cellspacing="0" cellpadding="0">
<%for i=1 to rs.PageSize%>
<%if rs.EOF then
exit for
end if%> <tr><td width="168" height="14"> <%=rs("名称")%></td>
</tr>

<%rs.movenext
next
%>

这一段是搜索并且搜索后结果分页的代码.搜索数据库里有的数据时就没事,但搜索数据库里没有的数据时,它却显示什么"真"字,又说"这操作需要记录"..... 真烦恼,各位大侠请指教!

加判断~!~!

没有的数据用另外的文本提示一下。

'查询“leibie”表,"fangshi"字段,“keyword”关键字
sql="select * from "&leibie&" where "&fangshi&" like '%"&keyword&"%' order by id desc"
rs.open sql,conn,1,3
<!--加入下边两句查询是否有数据-->
If rs.eof and rs.bof Then
Response.write("暂无可查询数据")
只需要加入这两句!

记得加判断,向dztceo 说的那样就OK了