<!--#include file="conn/conn.asp"-->
<!--#include file="conn/config.asp"-->
<!--#include file="conn/nosql.asp"-->
<!--#include file="conn/page.asp"-->
<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}
.style2 {color: #669900}
.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>
<table width="780" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr>
    <td width="200" valign="top"><!--#include file="left.asp"--></td><td width="5" valign="top">&nbsp;</td>
    <td valign="top"><table width="575" border="0" cellpadding="0" cellspacing="0">
      <tr>
        <td><img src="images/bj_575_5.gif" width="575" height="7"></td>
      </tr>
      <tr>
        <td background="images/bj_575_1.gif"><%	set rs=server.CreateObject("adodb.recordset")
rs.open "select * from snsn_loveshow_class where showxs=1 order by id desc",conn,1,1
%>
          <%if rs.eof then
          response.Write"<div align='center'>暂无任何信息</div>"
           else
        rs.PageSize =8 '每页记录条数
		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 %>
          <table width="553" height="33" border="0" align="center" cellpadding="0" cellspacing="0">
            <tr>
              <td background="images/qr1_r10_c3.jpg"><table width="550" border="0" align="center" cellpadding="0" cellspacing="0">
                  <tr>
                    <td width="453" height="23" valign="bottom">&nbsp;&nbsp;&nbsp;<strong><a href="zttl.asp?id=<%=rs("id")%>"><%=rs("showname")%></a></strong></td>
                    <td width="97" valign="bottom">&nbsp;</td>
                  </tr>
              </table></td>
            </tr>
          </table>
          <table width="562"  border="0" align="center" cellpadding="0" cellspacing="0">
            <tr>
              <td height="138" align="center" background="images/love2.gif"><table width="530" height="105" border="0" cellpadding="0" cellspacing="0">
                  <tr>
                    <td valign="top"><%=rs("shownr")%></td>
                  </tr>
              </table></td>
            </tr>
          </table>
          <table width="90%"  border="0" align="center" cellpadding="0" cellspacing="0">
            <tr>
              <td height="10"></td>
            </tr>
          </table>
          <%RS.MoveNext
                  next
			      end if%>
          <TABLE width="560" 
        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></td>
      </tr>
      <tr>
        <td><img src="images/bj_575_2.gif" width="575" height="7"></td>
      </tr>
    </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>