
<!--#include file="inc/ubbcode.asp"-->
<!--#include file="inc/function.asp"-->
<!--#include file="inc/conn.asp"-->
<!--#include file="inc/config.asp"-->
<!--#include file="inc/Conn_User.asp"-->
<%
const ChannelID=1
%>

<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" " http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns=" http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
</head>
<script type=text/javascript>var xijuan={channel:"index"}</script>
<script type=text/javascript src="Inc/main.js"></script>
<!--#include file="top8.asp"-->
<script language="JavaScript" type="text/javascript">
	function chkfrm(){
		
		if (document.Myform.Keywords.value==""){
			alert('请输入要检索的关键字！');
			document.Myform.Keywords.focus();
			return false;
		}
		
		
			var Obj = document.getElementsByName("mysort");
			for(i=0;i<Obj.length;i++){
				if(Obj[i].selected){
					if (Obj[i].value=="flv"){
						document.Myform.action="flv_search.asp";
					}else if (Obj[i].value=="zone"){
						document.Myform.action="user_search.asp";
					}else if (Obj[i].value=="blog"){
						document.Myform.action="blog_search.asp";
					}else if (Obj[i].value=="photo"){
						document.Myform.action="photo_search.asp";
					}else{
						document.Myform.action="user_search.asp";
					}
				}
			}

		
		return true;
	}
</script>
<form id="Myform" name="Myform" onSubmit="return chkfrm();" action="" method=post>
    <div id=SearchBlock>
      <div id=search>
<input name="Keywords" type="text" id="Keywords" class="input2"size="40" value="美女" onMouseOver="this.focus()" onFocus="this.select()" onClick="if (this.value=='美女') this.value=''"  />


             <select name="mysort" id="mysort" size="1" class="input2"> 
             <option selected value="flv" name="mysort" id="mysort">用户视屏</option>
             <option value="zone" name="mysort" id="mysort">注册用户</option>
             <option value="photo" name="mysort" id="mysort">用户相册</option>
             <option value="blog" name="mysort" id="mysort">用户日志</option>
             </select> &nbsp;
      </div>
     <input class=input_btn value="" type=submit src=Inc/global/images/btn_search.gif name=submit style="cursor:hand;" />
    </div>
    <div class=keywords>
&nbsp;&nbsp;消息:
<%
set rs=server.createobject("adodb.recordset")
rs.open "select top 1 * from [516show] where hotType=1 order by ID desc",conn,1,1 
%>
<%
do while not rs.eof
%>
<B><a href="<%=rs("url")%>" target="_blank"><font color="<%=rs("titlecolor")%>"><%=left(rs("title"),40)%><%if len(rs("title"))>40 then response.write ""%></font></B></a>
 <%rs.movenext
loop%>
<%rs.close
set rs=nothing%>

    </div>
  </form>
</div><div id="mainbody">




<!-- Main start -->
<div class="main">

<embed src="ad/swf/964x50-cn.swf" quality="high" pluginspage="http://www.macromedia.com/go/getflashplayer" type="application/x-shockwave-flash" width="950" height="50" wmode="transparent"></embed>




<LINK href="img/e.css" type=text/css 
rel=stylesheet>
<LINK media=all href="img/y_blog_index.css" type=text/css 
rel=stylesheet>



<DIV ><!--左部-->
<DIV class=blogbodyleft>
<DIV class=blog1>
<EMBED src=ad/img/xin280_65.swf width=280 height=65 type=application/x-shockwave-flash>
</DIV>
<DIV class=blog2>
<DIV class=blog3><IMG src="img/b_top5.jpg"> 
</DIV>
<DIV class=lists>
<table width="100%" border="0" align="center" cellpadding="0" cellspacing="5">
                    <%
set rs=server.createobject("adodb.recordset")
rs.open "select top 10 * from [article] order by hits desc",conn,1,1 
%>
                    <tr> 
                      <%

						i=1
do while not rs.eof
%>
                      <td height="22" bgcolor="fafafa"><table width="100%" border="0" cellspacing="0" cellpadding="0">
                          <tr> 
                            <td width="20" align="center"><img src="img0415/d<%=i%>.gif"></td>
                            <td> 


<%
set rsf=server.createobject("adodb.recordset")
rsf.open "select * from [user] where username='"&rs("Editor")&"' order by userid desc",conn_user,1,1 
%>

 <a href="blog_show.asp?ArticleID=<%=rs("ArticleID")%>&userid=<%=rsf("userid")%>" target="_blank"><%=left(replace(rs("title"),"&nbsp;",""),16)%> 
                              <%
				  if len(rs("title"))>16 then
				   response.Write""
				   else 
				   end if%>
                              </a> <font color="#FF6600" style="font-size:10" ><%=rs("hits")%></font></td>
                          </tr>
                        </table></td>
                    </tr>
                    <%
						i=i+1
						if i>10 then exit do
						rs.movenext
						loop
						rs.close
						set rs=nothing%>
                  </table>





</DIV>






<a href="/User_Reg.asp" target="_blank"><IMG height=80 
src="ad/img/bk.jpg" width=291 align=absMiddle 
border=0></a>




 </DIV></DIV></DIV><!--中部++++++++++++++++++ -->
<DIV class=blogbodybottom><!--中-->
<DIV >
<DIV >




</DIV></DIV><%
myPagesize=4
set rs=server.createobject("adodb.recordset")
rs.open "select * from [article] where DefaultPicUrl<>''  order by articleID desc",conn,1,1 
%> 
<DIV class=bclear></DIV>
<DIV class=abgzj3>
<DIV class=abgzj4><IMG src="img/bgc18.gif"></DIV>



<DIV class=abgzj5>


<DIV class="w330 fl">
<DIV class="w298 fl pd30"><%line=myPagesize

i=1
do while not rs.eof and line>0
%>

								                               <%
set rsf=server.createobject("adodb.recordset")
rsf.open "select * from [user] where username='"&rs("Editor")&"' order by userid desc",conn_user,1,1 
%>
<DIV class="w60 h60 fl mg9 pd28 bd17">





<%if rs.eof then%> <%else%><a href="blog_show.asp?ArticleID=<%=rs("ArticleID")%>&userid=<%=rsf("userid")%>" target="_blank"><IMG 
height=60 src="<%if rs.eof then
								  response.Write "images/nopic.jpg"
								  else response.Write rs("DefaultPicUrl")
								  end if %>" 
width=60></IMG></A><%end if%></SPAN>

</DIV><%if i mod 8=0 then%>
                                     
                                      <%else%>
                                      <%end if%>
                                      <%rs.movenext
   line=line-1
   i=i+1
loop
  %> </DIV>


<DIV class="w305 fl pd35"><IMG alt="" src="img/pop.jpg"></DIV>

                            


<DIV class="w398 fl">
<DIV class=box26><%
set rs=server.createobject("adodb.recordset")
rs.open "select top 13 * from [article] order by articleID desc",conn,1,1 
%>
                              
                                <%if rs.eof then
response.Write "<br>暂无日志<br><br>"
else%>
                                 <%do while not rs.eof%>
								                               <%
set rsf=server.createobject("adodb.recordset")
rsf.open "select * from [user] where username='"&rs("Editor")&"' order by userid desc",conn_user,1,1 
%>
<UL>
  <DT><%
  set classrs=server.createobject("adodb.recordset")
classrs.open "select * from articleclass where classid="&rs("classid"),conn,1,1
%> <FONT color=#448cbb>[&nbsp;<a href=blog_class.asp?classid=<%=classrs("classID")%>><FONT color=#448cbb><%=classrs("classname")%></font></a>&nbsp;]</font>&nbsp;&nbsp;&nbsp;<img src=user/head.gif><a href="blog_show.asp?ArticleID=<%=rs("ArticleID")%>&userid=<%=rsf("userid")%>" target="_blank"><%=rs("title")%></A> &nbsp; &nbsp;&nbsp;</A></DT>
  <DD><a href=user.asp?userid=<%=rsf("userid")%> target="_blank"><%=gotTopic(rs("editor"),10)%></A></DD></UL><%rs.movenext
loop
rs.close
set rs=nothing
end if%>

</DIV></DIV>

</DIV>

<UL>
  <LI>
  <DIV class=abgzleft></DIV>
  <DIV class=abgzright></DIV>
</LI></UL></DIV></DIV></DIV><!--右部+++++++++++++++++++-->
<DIV class=blogbodyright>
<DIV class="abgy abgy2left">
<DIV class=abgy1><IMG src="img/bgc19.jpg"></DIV>
<DIV class=abgy2>





<table width="100%" border="0" align="center" cellpadding="0" cellspacing="5">
                    <%
set rs=server.createobject("adodb.recordset")
rs.open "select top 6 * from [article] order by OnTop desc",conn,1,1 
%>
                    <tr> 
                      <%

						i=1
do while not rs.eof
%>
                      <td height="22" bgcolor="fafafa"><table width="100%" border="0" cellspacing="0" cellpadding="0">
                          <tr> 
                            <td width="20" align="center"><img src="img0415/d<%=i%>.gif"></td>
                            <td> 
                              <%
set rsu=server.createobject("adodb.recordset")
rsu.open "select * from [user] where username='"&rs("Editor")&"' order by userid desc",conn_user,1,1 
%>
                              <a href="blog_show.asp?ArticleID=<%=rs("ArticleID")%>&userid=<%=rsf("userid")%>" target="_blank"><font color="#FF6600" style="font-size:10" ><%=left(replace(rs("title"),"&nbsp;",""),19)%> 
                              <%
				  if len(rs("title"))>19 then
				   response.Write""
				   else 
				   end if%>
                              </a> </font></td>
                          </tr>
                        </table></td>
                    </tr>
                    <%
						i=i+1
						if i>6 then exit do
						rs.movenext
						loop
						rs.close
						set rs=nothing%>
                  </table>











</DIV></DIV>






<DIV class="abgy abgy4">                      <%
if request("action")<>"" then
actions=request("action")
else
actions="userid"
end if
if request("city")<>"" then
city=request("city")
myPagesize=5

set rs=server.createobject("adodb.recordset")

rs.open "select * from [user] where city='"&city&"' order by "&actions&" desc",conn_user,1,1 
call myPages(rs,myPagesize)
else
myPagesize=6

set rs=server.createobject("adodb.recordset")

rs.open "select * from [user] order by "&actions&" desc",conn_user,1,1 
call myPages(rs,myPagesize)
end if
%>
			
<DIV class=abgy1><IMG src="img/bgc20.gif"></DIV>	  <%

						i=1
do while not rs.eof
%>

<DIV class="abgy3 ls" style="TEXT-ALIGN: center"><A 
href="user.asp?userid=<%=rs("userid")%>" target=_blank><IMG 
src="<%if rs("UserPhoto")<>"" then%><%=rs("UserPhoto")%><%else 
						  response.Write "images/nopic2.jpg"end if%>" align=absMiddle></A><BR><A 
href="user.asp?userid=<%=rs("userid")%>" target=_blank><a href="user.asp?userid=<%=rs("userid")%>" target="_blank"><%if rs("title")<>"" then%><%=left(replace(rs("title"),"&nbsp;",""),8)%><%if len(rs("title"))>8 then response.write ".."%><%else%><%=rs("username")%><%end if%></a></DIV><%
						i=i+1
						if i>6 then exit do
						rs.movenext
						loop
						rs.close
						set rs=nothing%></DIV></DIV></DIV>




<DIV></DIV>
<div >
<div >


</div>

<div ></div>
<div>

</div></div>
</div><!--博客图片-->

<DIV class=blogxiu style="MARGIN-TOP: 1px">
<DIV class=blogxiu1>
<DIV class=left 
align=left>博客图片&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;</DIV>
<DIV class="right blogxiuzt"></DIV></DIV> 
                                <%
set rs=server.createobject("adodb.recordset")
rs.open "select top 16 * from [article] where elite=true and Deleted=false order by ArticleID desc",conn,1,1
rs.open "select top 16 * from [article] where elite=1 and Deleted=0 order by ArticleID desc",conn,1,1
%>
<DIV class=blogxiu2> <%if  rs.eof then
response.Write "暂无推荐图片"
end if%>


                   <%
do while not rs.eof
%>
								                               <%
set rsf=server.createobject("adodb.recordset")
rsf.open "select * from [user] where username='"&rs("Editor")&"' order by userid desc",conn_user,1,1 
%>

<LI><%if rs.eof then%> <%else%><a href="blog_show.asp?ArticleID=<%=rs("ArticleID")%>&userid=<%=rsf("userid")%>" target="_blank"><IMG height=85 
src="<%if rs.eof then
								  response.Write "images/nopic.jpg"
								  else response.Write rs("DefaultPicUrl")
								  end if %>" width=102 align=absMiddle 
border=0></a><%end if%><BR><SPAN class=kkk><%if rs.eof then%>暂无日志<%else%><a href="blog_show.asp?ArticleID=<%=rs("ArticleID")%>&userid=<%=rsf("userid")%>" target="_blank"><%response.Write left(rs("title"),8)
if len(rs("title"))>6 then
response.Write""
end if%></a><%end if%></A></SPAN><%        rs.movenext
loop
rs.close
set rs=nothing
%> </LI>
</DIV></DIV><!--++++++++++++++++++++++++++--><!--第二屏-->


	<!--Eng main_r -->

</div>
</div>	
<!-- sidebar end --><br>
<!--#include file="end.asp"-->
</body>
</html>