ASP/CMS/Blog 订阅所有【ASP/CMS/Blog】的日志

[新人必学]利用ASP手写站内搜索代码

作者:月神 日期:2008-07-27

字体大小: 小 中 大

 

ASP/VBS代码
  1. <!--#include file="conn.asp"-->  
  2. <%   
  3. n_title=request.Form("n_title")   
  4. n_news=request.Form("n_news")   
  5. sql="select * from news where n_title like '"&n_title&"' "   
  6. set rs=server.CreateObject("adodb.recordset")   
  7. rs.open sql,conn,1,1   
  8. %>  
  9. <html>  
  10. <head>  
  11. <title>搜索结果</title>  
  12. <meta http-equiv="Content-Type" content="text/html; charset=gb2312">  
  13. </head>    
  14. <body bgcolor="#FFFFFF" text="#000000">    
  15. <table width="100%" border="0" cellspacing="0" cellpadding="0">  
  16. <%   
  17. do while not rs.eof   
  18. %>  
  19. <tr>  
  20. <td><%=rs("n_title")%></td>  
  21. <td><%=rs("n_news")%></td>  
  22. <td><%=rs("n_date")%></td>  
  23. </tr>  
  24. <%   
  25. rs.movenext   
  26. loop   
  27. %>  
  28. <%   
  29. if rs.bof then%>  
  30. <%   
  31. response.Write("对不起，没找到相关内容")   
  32. %>  
  33. </table>  
  34. </body>  
  35. </html>    
  36. <%   
  37. end if   
  38. rs.close   
  39. set rs=nothing  
  40. %>  
说明：由X.asp 提交到本页(上面代码页)，传输方式为POST
<%   do while not rs.eof   %> 表示记录集不为空，也就是我们所设置的查询条件可以得到满足
sql="select * from news where n_title like '"&n_title&"' " 
看下面这句。<%   rs.movenext   loop  %>  ，和上面的DO WHILE 构成条件语句 do while   ....loop
即，满足XXXX条件，则显示下一条记录、
看完这句，则下面的 
  1. <%   
  2. if rs.bof then%>  
  3. <%   
  4. response.Write("对不起，没找到相关内容")   
  5. %>    就不难理解了！
    最后关闭记录，释放内存。
     
  6. <%   
  7. end if   
  8. rs.close   
  9. set rs=nothing  
  10. %>  


文章来自: 本站原创
引用通告: 查看所有引用 | 我要引用此文章
Tags: ASP 站内搜索
相关日志:
评论: 0 | 引用: 0 | 查看次数: -
发表评论
昵　称:
密　码: 游客发言不需要密码.
内　容:
验证码: 验证码
选　项:
虽然发表评论不用注册，但是为了保护您的发言权，建议您注册帐号.