<!--#include file="../conn/conn.asp"-->
<!--#include file="../conn/config.asp"-->
<!--#include file="../conn/nosql.asp"-->
<!--#include file="../conn/page.asp"-->
<%if Not ChkPosturl then response.redirect ("../login.asp")
if nosql(request("txtitle"))<>"" then
txtitle=nosql(request("txtitle"))
else
Response.Redirect ("../index.asp")
end if
if isChkInteger(request("classid")) then
classid=request("classid")
else
Response.Redirect ("../index.asp")
end if
search=nosql(request("search"))
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>搜索迷你主页-<%=webname%></title>
<link href="../css.css" REL="stylesheet" TYPE="text/css">
<style type="text/css">
<!--
body {
	background-image: url();
	margin-left: 0px;
	margin-top: 0px;
	margin-right: 0px;
	margin-bottom: 0px;
}
.style1 {color: #FFFFFF}
.style6 {font-size: 14px}
.style10 {color: #FF3300;
	font-weight: bold;
}
-->
</style>
<SCRIPT language=javascript>
//--检测登陆-->

	   function DoLogin() {

	      var UsernameGet = trim(document.loginForm.UsernameGet.value);
		  var PasswordGet = trim(document.loginForm.PasswordGet.value);
		  var Verifycode = trim(document.loginForm.Verifycode.value);

          if(UsernameGet == "") {
		    alert("请输入会员登录名！");
			document.loginForm.UsernameGet.focus();
		    return false;
		  } 
		  if(PasswordGet == "") {
		    alert("请输入您的会员密码！");
			document.loginForm.PasswordGet.focus();
		    return false;
		  } 
		  if(Verifycode == "") {
		    alert("请输入您的登录验证码！");
			document.loginForm.Verifycode.focus();
		    return false;
		  }  
		  
		  
		 }

           function trim(inputString) {
	   
              if (typeof inputString != "string") { return inputString; }
              var retValue = inputString;
              var ch = retValue.substring(0, 1);
              while (ch == " ") { 
	          //检查字符串开始部分的空格
                  retValue = retValue.substring(1, retValue.length);
                  ch = retValue.substring(0, 1);
              }
              ch = retValue.substring(retValue.length-1, retValue.length);
              while (ch == " ") {
                 //检查字符串结束部分的空格
                 retValue = retValue.substring(0, retValue.length-1);
                 ch = retValue.substring(retValue.length-1, retValue.length);
              }
              while (retValue.indexOf("  ") != -1) { 
	         //将文字中间多个相连的空格变为一个空格
                 retValue = retValue.substring(0, retValue.indexOf("  ")) + retValue.substring(retValue.indexOf("  ")+1, retValue.length); 
              }
              return retValue;
           } 

//-->
</SCRIPT>
<script language="JavaScript" type="text/JavaScript">
<!--



function MM_preloadImages() { //v3.0
  var d=document; if(d.images){ if(!d.MM_p) d.MM_p=new Array();
    var i,j=d.MM_p.length,a=MM_preloadImages.arguments; for(i=0; i<a.length; i++)
    if (a[i].indexOf("#")!=0){ d.MM_p[j]=new Image; d.MM_p[j++].src=a[i];}}
}
//-->
</script>
</head>

<body><!--#include file="top.asp"-->
<table width="100" height="5" border="0" cellpadding="0" cellspacing="0">
  <tr>
    <td></td>
  </tr>
</table>
<span class="style10"></span><span class="style10"></span>
<table width="780" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr>
    <td width="200" valign="top"><!--#include file="../left.asp"--></td>
    <td valign="top"><span class="style10">
      <%
if search=1 then
sql="select * from snsn_user where homename like '%"&txtitle&"%'"
elseif search=2 then
sql="select * from snsn_user where username like '%"&txtitle&"%'"
elseif search=3 then
sql="select * from snsn_user where h_xxy like '%"&txtitle&"%'"
end if
if classid<>0 then
sql=sql&" and h_classid="&classid
end if
'response.write sql
'response.end
Set rs= Server.CreateObject("ADODB.Recordset") 
rs.open sql,conn,1,1 
%>
</span>
      <table width="90%"  border="0" align="center" cellpadding="0" cellspacing="0">
        <tr>
          <td height="10"></td>
        </tr>
      </table>
      <table width="90%"  border="0" align="center" cellpadding="0" cellspacing="0">
        <%if rs.eof then
          response.Write"<div align='center'>暂无任何信息</div>"
           else
        rs.PageSize =12 '每页记录条数
		iCount=rs.RecordCount '记录总数
		iPageSize=rs.PageSize
    	maxpage=rs.PageCount 
    	page=request("page")
    	per_page=rs.PageSize
    
    if Not IsNumeric(page) or page="" then
        page=1
    else
        page=cint(page)
    end if
    
    if page<1 then
        page=1
    elseif  page>maxpage then
        page=maxpage
    end if
    
    rs.AbsolutePage=Page

	if page=maxpage then
		x=iCount-(maxpage-1)*iPageSize
	else
		x=iPageSize
	end if
	For i=1 To x %>
        <tr onMouseOver='JavaScript:this.style.backgroundColor="#FCFBF3"' onMouseOut='JavaScript:this.style.backgroundColor=""'>
          <td height="25"><span class="link_redblank"> <strong>
            <%
								response.write "<a href=""javascript:;"" onclick=""showmenuie5("&rs("url")&","&rs("id")&",'"&rs("username")&"')"" >"&trim(rs("homename"))&"</A>"%>
          </strong>(<%=rs("idate")%>) </span>站长：<span class="link_redblank"><%=rs("username")%>(<%=rs("name")%>)</span></td>
        </tr>
        <tr>
          <td height="1" bgcolor="efefef"></td>
        </tr>
        <tr onMouseOver='JavaScript:this.style.backgroundColor="#FCFBF3"' onMouseOut='JavaScript:this.style.backgroundColor=""'>
          <td height="22">
            <table width="100%"  border="0" align="center" cellpadding="5" cellspacing="0">
              <tr>
                <td><span class="link_redblank"><img src="../images/h.gif" width="5" height="11">
                      <%
								response.write "<a href=""javascript:;"" onclick=""showmenuie5("&rs("url")&","&rs("id")&",'"&rs("username")&"')"" >"&htmltotext(trim(rs("h_xxy")))&"</A>"%>
                </span></td>
              </tr>
              <tr height="10">
                <td height="10"></td>
              </tr>
          </table></td>
        </tr>
        <TR height="20" bgcolor="#ffffff">
          <td height="1" colspan="2" background="../images/ml_img_05.gif"></td>
        </TR>
        <%RS.MoveNext
                  next
			      end if%>
      </table>
      <TABLE width="100%" 
        border=0 align="center" cellPadding=4 cellSpacing=0>
        <TBODY>
          <TR>
            <TD class=M noWrap align=middle><%
					call PageControl(iCount,maxpage,page,"border=0 align=center","<p align=center>",per_page)
				  %></TD>
          </TR>
        </TBODY>
      </TABLE>
      <span class="style10"> </span></td>
  </tr>
</table>
<table width="90%" height="10"  border="0" align="center" cellpadding="0" cellspacing="0">
  <tr>
    <td></td>
  </tr>
</table><!--#include file="../end.asp"-->
</body>
</html>