快速业务通道

站内搜索HTML版

作者 佚名技术 来源 NET编程 浏览 发布时间 2012-05-23

 

  1. <?php    
  2. /****************************************************     
  3. program : Spr2[search_html]     
  4. Author  : uchinaboy      
  5. E-mail  : uchinaboy@163.com     
  6. QQ      : 16863798     
  7. Date    : 2001-8-9    
  8. ****************************************************/    
  9. //require("config.inc.php");    
  10.  
  11. function get_msg($path) {    
  12. global $key, $i;    
  13. $handle = opendir($path);    
  14. while ($filename = readdir($handle)) {    
  15. //echo $path."/".$filename."<br>";    
  16. $newpath = $path."/".$filename;    
  17. $check_type = preg_match("/\.html?$/", $filename);    
  18. if (is_file($newpath) && $check_type) {    
  19. $fp = fopen($newpath, "r");    
  20. $msg = fread($fp, filesize($newpath));    
  21. fclose($fp);    
  22. match_show($key, $msg, $newpath, $filename);    
  23. }    
  24. if (is_dir($path."/".$filename) && ($filename != ".") &&  ($filename != "..")) {    
  25. //echo "<BR><BR><BR>".$newpath."<BR><BR><BR>";    
  26. get_msg($path."/".$filename);    
  27. }    
  28. }    
  29. closedir($handle);    
  30. return $i;    
  31. }    
  32.  
  33. function match_show($key, $msg, $newpath, $filename) {    
  34. global $key, $i;    
  35. $key = chop($key);    
  36. if ($key) {    
  37. $msg = preg_replace("/<style>.+<\/style>/is", "", $msg);    
  38. $msg = str_replace(" ", "", $msg);    
  39. $msg = preg_replace("/<[^>]+>/", "", $msg);    
  40. $value = preg_match("/.*$key.*/i", $msg, $res);    
  41. if ($value) {    
  42. $res[0] = preg_replace("/$key/i", "<FONT SIZE=\"2\"  COLOR=\"red\">$key</FONT>", $res[0]);    
  43. $i++;    
  44. $link = $newpath;    
  45. print "<a href=\"$link\">$filename</a><BR>";

凌众科技专业提供服务器租用、服务器托管、企业邮局、虚拟主机等服务,公司网站:http://www.lingzhong.cn 为了给广大客户了解更多的技术信息,本技术文章收集来源于网络,凌众科技尊重文章作者的版权,如果有涉及你的版权有必要删除你的文章,请和我们联系。以上信息与文章正文是不可分割的一部分,如果您要转载本文章,请保留以上信息,谢谢!

分享到: 更多

Copyright ©1999-2011 厦门凌众科技有限公司 厦门优通互联科技开发有限公司 All rights reserved

地址(ADD):厦门软件园二期望海路63号701E(东南融通旁) 邮编(ZIP):361008

电话:0592-5908028 传真:0592-5908039 咨询信箱:web@lingzhong.cn 咨询OICQ:173723134

《中华人民共和国增值电信业务经营许可证》闽B2-20100024  ICP备案:闽ICP备05037997号