<!-- #include file="inc/301.asp" -->
<!-- #include file="inc/conn.asp" -->
<!-- #include file="inc/Nohtml.asp" -->
<!-- #include file="inc/other.asp" -->
<!DOCTYPE html>
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<title><%=web_title%></title>
<meta name="keywords" content="<%=web_keywords%>" />
<meta name="description" content="<%=web_description%>" />
<meta name="author" content="<%=web_author%>" />
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<meta name="viewport" content="width=device-width, initial-scale=1.0" />
<!-- #include file="Config/css.asp" -->
<script type="text/javascript">
     $(window).load(function(){

    $('.flexslider').flexslider({
        animation: "slide",
        slideshow: true,
        start: function(slider){
          $('body').removeClass('loading');
        }
    });  
});
</script>
</head>

<body>

	   <!-- #include file="Config/head.asp" -->
     
    <!-- Page Content
    ================================================== --> 
    <div class="row"><!--Container row-->

        <!-- Page Left Sidebar
        ================================================== --> 
        <div class="span3 sidebar page-left-sidebar"><!-- Begin sidebar column -->
            <!--Navigation-->
<% 
set rs=server.createobject("adodb.recordset")
sql="select s_time from web_shuoshuo where view_yes=1 order by s_id desc"
rs.open(sql),conn,1,1
sssl=rs.recordcount
rs.close
set rs=nothing
%> 

<% 
set rs=server.createobject("adodb.recordset")
sql="select w_time from web_Article where view_yes=1 order by w_id desc"
rs.open(sql),conn,1,1
wzsl=rs.recordcount
rs.close
set rs=nothing
%> 
         <h5 class="title-bg">时光隧道</h5>
            <ul class="post-category-list">
 
<%
set rs=server.createobject("adodb.recordset")
sql="select top 2 w_title,w_id,w_time from web_Article where day(w_time)=day("&chatime&") and month(w_time)=month("&chatime&") and year(w_time)<>year("&chatime&") order by w_id desc"
rs.open(sql),conn,1,1
jrwzsl=rs.recordcount
%>
<%
set rs2=server.createobject("adodb.recordset")
sql="select top 2 s_content,s_id,s_time from web_shuoshuo where day(s_time)=day("&chatime&") and month(s_time)=month("&chatime&") and year(s_time)<>year("&chatime&") order by s_id desc"
rs2.open(sql),conn,1,1
jrsssl=rs2.recordcount
zong=jrwzsl+jrsssl
%>
<li>历史上的今天（<a><%=zong%></a>）</li>
<%
do while not rs.eof
w_title=rs("w_title")
w_id=rs("w_id")
w_time=rs("w_time")
%>
<li><a title="<%=year(w_time)%>年 发表 <%=w_title%>"><%=year(w_time)%>年</a> 文章：<a href="Article/?<%=w_id%>.html" title="<%=w_title%>"><%=left(w_title,(s_cd-5))%></a></li>
<%
rs.movenext
loop
rs.close
set rs=nothing
%>  

<%
do while not rs2.eof
s_content=rs2("s_content")
s_id=rs2("s_id")
s_time=rs2("s_time")
%>
<li><a title="<%=year(s_time)%>年 发表 <%=RemoveHTML(s_content,s_cd-2)%>"><%=year(s_time)%>年</a> 说说：<a href="shuos/?<%=s_id%>.html"><%=RemoveHTML(s_content,s_cd-5)%></a></li>
<%
rs2.movenext
loop
rs2.close
set rs2=nothing
if zong=0 then
%> 
<li>历史上的今天没有发表任何内容。</li>
<%end if%>
            </ul>

            <!--Latest News-->
            <h5 class="title-bg">推荐图文</h5>
            <ul class="popular-posts">
<%
'set rs=server.createobject("adodb.recordset")
'sql="select top 3 im_id,im_name,im_image,im_description,im_time from web_images where view_yes=1 and im_tuijian=1 "&Random_img&""
'rs.open(sql),conn,1,1
'do while not rs.eof
'im_id=rs("im_id")
'im_name=rs("im_name")
'im_image=rs("im_image")
'im_description=rs("im_description")
'im_time=rs("im_time")
'a=a+1
%> 

<%
set rs=server.createobject("adodb.recordset")
sql="select top 3 w_id,w_title,w_images,w_description,w_time from web_Article where w_images<>'' and view_yes=1 and w_tuijian=1 "&Random_article&""
rs.open(sql),conn,1,1
do while not rs.eof
im_id=rs("w_id")
im_name=rs("w_title")
im_image=rs("w_images")
im_description=rs("w_description")
im_time=rs("w_time")
a=a+1
%> 


<%
TimeDifference = DateDiff("s", im_time, Now)
if datediff("d",im_time,date)=0 then
ti="今天 " &formatdatetime(im_time,4)
elseif datediff("d",im_time,date)=1 then
ti="昨天 "&formatdatetime(im_time,4)
elseif datediff("d",im_time,date)=2 then
ti="前天 "&formatdatetime(im_time,4)
elseif datediff("d",im_time,date)< 8 then
ti=datediff("d",im_time,date)&"天前"
else
ti=formatdatetime(im_time,2)
end if
%>
                <li>
                    <a href="/Article/?<%=im_id%>.html">
                    <%if web_simg=1 then %>
                    <img src="../img.asp?path=<%=replace(im_image,"..", "")%>&Width=85" class="thumbnail align-center" alt="<%=im_name%>" title="<%=im_name%>" />
                    <%else%>
                    <img src="<%=im_image%>" alt="<%=im_name%>" title="<%=im_name%>" class="thumbnail align-center" style="width:85px;height:70px;"  />
                    <%end if%>
                    </a>
                    <h6><a href="/Article/?<%=im_id%>.html"><%=im_name%><br><a title="<%=im_description%>"><%=left(im_description,10)%></a> ..</a></h6>
                    <em><%=ti%> &nbsp;<%=formatdatetime(im_time,4)%></em>
              </li>
   
 <%
rs.movenext
loop
rs.close
set rs=nothing
%>   
            </ul>
            
            <!--Testimonials-->
<% 
set rs=server.createobject("adodb.recordset")
sql="select web_ad1 from Web_ad"
rs.open(sql),conn,1,1
web_ad1=rs("web_ad1")
rs.close
set rs=nothing
%>
<%if web_ad1<>"" then%>
            <h5 class="title-bg">广告链接</h5>
<ul class="popular-posts">
<div align="center"  style="overflow:hidden">
<%=web_ad1%>
</div>
          </ul>
<%end if%>
<h5 class="title-bg">数据统计</h5>
<% 
set rs=server.createobject("adodb.recordset")
sql="select w_time from web_Article where view_yes=1 order by w_id desc"
rs.open(sql),conn,1,1
wzsl=rs.recordcount
w_time=rs("w_time")
rs.close
set rs=nothing

set rs=server.createobject("adodb.recordset")
sql="select s_time from web_shuoshuo where view_yes=1 order by s_id desc"
rs.open(sql),conn,1,1
sssl=rs.recordcount
s_time=rs("s_time")
rs.close
set rs=nothing

set rs=server.createobject("adodb.recordset")
sql="select u_id from web_Article_comment where u_view=1 and u_aid<>0"
rs.open(sql),conn,1,1
plsl=rs.recordcount
rs.close
set rs=nothing
set rs=server.createobject("adodb.recordset")
sql="select u_id from web_Article_comment where u_view=1 and u_aid=0"
rs.open(sql),conn,1,1
lysl=rs.recordcount
rs.close
set rs=nothing

if s_time > w_time then
gxtime=s_time
gxsj="说说"
else
gxtime=w_time
gxsj="文章"
end if
TimeDifference = DateDiff("s", gxtime, Now)
if datediff("d",gxtime,date)=0 then
zhgxtime="今天 " &formatdatetime(gxtime,4)
elseif datediff("d",gxtime,date)=1 then
zhgxtime="昨天 " &formatdatetime(gxtime,4)
elseif datediff("d",gxtime,date)=2 then
zhgxtime="前天 " &formatdatetime(gxtime,4)
else
zhgxtime=datediff("d",gxtime,date)&"天前 "&formatdatetime(gxtime,4)
end if
%> 
                    <p><h6><i class="icon-align-center"></i> 说说: <a title="共有 <%=sssl%> 条说说"><%=sssl%></a> 条 文章: <a title="共有 <%=wzsl%> 篇文章"><%=wzsl%></a> 篇</h6>
                    <p><h6><i class="icon-comment"></i> 共有 留言: <a title="共有 <%=lysl%> 条留言"><%=lysl%></a> 条 评论: <a title="共有 <%=plsl%> 条评论"><%=plsl%></a> 条</h6>
</p>
<p> <h6><i class="icon-time"></i> <a href="<%=web_url%>" title="<%=web_name%>"><%=web_name%></a> 已正常运行 <a title="<%=web_name%> 已正常运行 <%=cint(date()- web_jztime)%> 天"><%=cint(date()- web_jztime)%></a> 天</h6></p>
<p><h6><i class="icon-cog"></i> 最近：<%=web_author%> <a title="<%=web_author%> 最后更新了<%=gxsj%>"><%=zhgxtime%></a> 发表了<%=gxsj%></h6></p>
<%
set rs=server.createobject("adodb.recordset")
sql="select hit from web_Article"
rs.open(sql),conn,1,1
do while not rs.eof
wzaa=wzaa+rs("hit")
rs.movenext:loop
rs.close
set rs=nothing
set rs=server.createobject("adodb.recordset")
sql="select s_hit from web_shuoshuo"
rs.open(sql),conn,1,1
do while not rs.eof
ssaa=ssaa+rs("s_hit")
rs.movenext:loop
rs.close
set rs=nothing
%>
<p><h6><i class="icon-align-center"></i> 累计访问量：<a><%=formatNumber(wzaa+ssaa,0)%></a> 次</h6></p>
 <h5 class="title-bg">邮箱订阅</h5>
            <h6><small>欢迎订阅<%=web_name%>，输入您的邮箱吧:</small></h6></p>
            <form action="http://list.qq.com/cgi-bin/qf_compose_send" method="post" target="_blank"/>
            <input type="hidden" name="t" value="qf_booked_feedback">
            <input type="hidden" name="id" value="<%=web_maillist%>">
            <p><div class="input-prepend">
             <span class="add-on"><i class="icon-envelope"></i></span><input name="to" type="text" class="span2" id="appendedInputButtons" size="16" placeholder="请输入您的邮箱"/>
             </div></p>
             <button class="btn" type="submit">订阅</button></p>
             </form>            
        </div><!-- End sidebar column -->

        <!-- Page Content
        ================================================== --> 
        <div class="span6"><!--Begin page content column-->
      
<div class="alert alert-error">
<button type="button" class="close" data-dismiss="alert">×</button>

<strong><i class="icon-bullhorn"></i></strong> <%=web_xiaoxi%>
</div>
<!-- Carousel
================================================== -->
    <div class="row">    
        <div class="span3">
            <div class="flexslider">
              <ul class="slides">
<% 
set rs=server.createobject("adodb.recordset")
sql="select top 3 w_id,w_title,w_images from web_Article where (view_yes=1 and w_images<>''and w_tuijian=1) order by w_id desc"
rs.open(sql),conn,1,1
do while not rs.eof
id=rs("w_id")
title=rs("w_title")
images=rs("w_images")
%> 
 
<li><a href="Article/?<%=id%>.html">
<% if web_simg=1 then %>
<% a_images=replace(images,"..", "")%> 
<img src="../img.asp?path=<%=a_images%>&Width=570" alt="<%=title%>" title="<%=title%>"/>
<% else%>
<img src="<%=images%>" alt="<%=title%>" title="<%=title%>"/>
<%end if%> 
</a></li>

<%
rs.movenext
loop
rs.close
set rs=nothing
%>
</ul>
</div>
</div>

<% 
set rs=server.createobject("adodb.recordset")
sql="select top 1 w_id,w_title,w_description,hit,w_time,w_author from web_Article where (view_yes=1 and w_tuijian=1) order by w_id desc"
rs.open(sql),conn,1,1
id=rs("w_id")
title=rs("w_title")
w_description=rs("w_description")
hit=rs("hit")
w_time=rs("w_time")
w_author=rs("w_author")
rs.close
set rs=nothing
%> 

<%
TimeDifference = DateDiff("s", w_time, Now)
if datediff("d",w_time,date)=0 then
ti="今天 " &formatdatetime(w_time,4)
elseif datediff("d",w_time,date)=1 then
ti="昨天 "&formatdatetime(w_time,4)
elseif datediff("d",w_time,date)=2 then
ti="前天 "&formatdatetime(w_time,4)
elseif datediff("d",w_time,date)< 8 then
ti=datediff("d",w_time,date)&"天前 "&formatdatetime(w_time,4)
else
ti=formatdatetime(w_time,2)&" "&formatdatetime(w_time,4)
end if
%>
<div class="hidden-phone">
        <div class="span3">
                <ul class="nav nav-tabs">
                    <li class="active"><a data-toggle="tab">[ 推荐阅读 ] - <%=left(title,15)%></a></li>
                </ul>

                <div class="tab-content">
                    <div class="tab-pane active" id="home">
                    <p><%=left(w_description,a_js)%> ..</p>
<i class="icon-time"></i> <a><%=ti%></a> ︱ <i class="icon-eye-open"></i> <a href="../Article/?<%=id%>.html" title="阅读 <%=title%>">阅读全文</a>
                    </div>
                </div>
        </div> 
</div>
    </div> 
<% 
set rs=server.createobject("adodb.recordset")
sql="select top 6 w_id,w_title,w_time,w_content,hit,w_images,w_author,l_id,w_tuijian from web_Article where view_yes=1 order by w_id desc"
rs.open(sql),conn,1,1
do while not rs.eof
w_id=rs("w_id")
hit=rs("hit")
w_title=rs("w_title")
w_content=rs("w_content")
w_images=rs("w_images")
w_time=rs("w_time")
w_tuijian=rs("w_tuijian")
w_author=rs("w_author")
l_id=rs("l_id")
if w_images<>"" then
tu="<font color='#DC4900'>[ 图 ] </font>"
else
tu=""
end if
%>
<% 
set rs3=server.createobject("adodb.recordset")
query="select n_id,n_name from Web_2Navigation where n_id="&l_id&""
rs3.open query,conn,1,1
n_id=rs3("n_id")
n_name=rs3("n_name")
rs3.close
set rs3=nothing
%>

<%
TimeDifference = DateDiff("s", w_time, Now)
if datediff("d",w_time,date)=0 then
ti="今天 " &formatdatetime(w_time,4)
elseif datediff("d",w_time,date)=1 then
ti="昨天 "&formatdatetime(w_time,4)
elseif datediff("d",w_time,date)=2 then
ti="前天 "&formatdatetime(w_time,4)
elseif datediff("d",w_time,date)< 8 then
ti=datediff("d",w_time,date)&"天前 "&formatdatetime(w_time,4)
else
ti=formatdatetime(w_time,2)&" "&formatdatetime(w_time,4)
end if
if now - w_time < 1 then
inst="id=""New2"""
elseif w_tuijian=1 then
inst="id=""tuijianindex"""
else
inst=""
end if 
%>

                
                    <h5 class="title-bg" <%=inst%> ><%=tu%><a href="Article/?<%=w_id%>.html" title="<%=w_title%>"><%=w_title%></a></h5>
                    <%=RemoveHTML(w_content,wz_cd)%> . .<br />
                    <div class="post-summary-footer">
                    <ul class="post-data">
                    <li><i class="icon-user"></i> <a href="Search/?s=<%=w_author%>" title="作者： <%=w_author%>"><%=w_author%></a></li>
                    <li><i class="icon-list"></i> <a href="List/?<%=n_id%>+1.html" title="转到 <%=n_name%> 的栏目？"><%=n_name%></a></li>  
                    </ul>
                    </div>
                 <i class="icon-time"></i> <a title="<%=w_author%> <%=ti%> 发表 "> <%=ti%></a>︱<i class="icon-fire"></i> <a title="已有 <%=hit%> 次浏览"><%=formatNumber(hit,0)%></a> °
                  </p>
                  
                
				
<%
rs.movenext
loop
rs.close
set rs=nothing
%>	


        </div>
<!--End page content column--> 

         <!-- Page Right Sidebar
        ================================================== --> 
        <div class="span3 sidebar page-right-sidebar">
        <!-- Begin sidebar column -->
            <!--Search-->
            <section>
                <div class="input-append">
                    <form action="/Search/" method="get" />
                        <input name="s" type="text" id="appendedInputButton" size="16" placeholder="请输入关键字" />
                        <button class="btn" type="submit"><i class="icon-search"></i></button>
                    </form>
                </div>
            </section>
            <!--User Login-->

<h5 class="title-bg">会员登录</h5>

<%  if session("username")="" then %>
            <div class="input-prepend">
            
			<form action="/admin/User_login.asp" method="post" />
                <p><span class="add-on"><i class="icon-user"></i></span><input name="u_user" type="text" class="span2" id="prependedInput" size="16" placeholder="用户名" /></p>
            </div>
            <div class="input-prepend">
               <p><span class="add-on"><i class="icon-lock"></i></span><input name="u_pass" type="password" class="span2" id="appendedPrependedInput" size="16" placeholder="密码" /></p>
            </div>
            <button class="btn" type="submit">登 陆</button> 
			</form>
            
<%end if %>
<% if session("username")<>"" then %>
<% 
username=""&session("username")&""
set rs=server.createobject("adodb.recordset")
sql="select top 1 u_id,u_name,u_class from web_admin where u_user='"&username&"'"
rs.open(sql),conn,1,1
u_id=rs("u_id")
u_name=rs("u_name")
u_class=rs("u_class")
if u_class=0 then
u_sfxs="超级管理员"
elseif u_class=1 then
u_sfxs="内容管理员"
end if
rs.close
set rs=nothing
%>
<p><h6><small>会员：<%=u_name%></p>
<p>身份：<%=u_sfxs%></p>
<p><a href="Admin/index.asp">进入后台</a> &nbsp;&nbsp;
<%if session("u_Class")<>1 then %>
<a href="Admin/NewShuo.asp">发表说说</a>&nbsp;&nbsp;
<%end if %>
<a href="Admin/logout.asp">退出登录</a></small></h6></p>
<%end if %>

	
<h5 class="title-bg">分享本博</h5>
<ul class="nav nav-tabs">
<!-- Baidu Button BEGIN -->
<div id="bdshare" class="bdshare_t bds_tools_32 get-codes-bdshare">
<a class="bds_tsina"></a>
<a class="bds_qzone"></a>
<a class="bds_tqq"></a>
<span class="bds_more"></span>
<a class="shareCount"></a>
</div>
<script type="text/javascript" id="bdshare_js" data="type=tools&amp;uid=0" ></script>
<script type="text/javascript" id="bdshell_js"></script>
<script type="text/javascript">
document.getElementById("bdshell_js").src = "http://bdimg.share.baidu.com/static/js/shell_v2.js?cdnversion=" + Math.ceil(new Date()/3600000)
</script>
<!-- Baidu Button END -->
</ul>
<%
set rs=server.createobject("adodb.recordset")
sql="select top 5 s_id,s_content,s_time from web_shuoshuo where view_yes=1 order by s_id desc"
rs.open(sql),conn,1,1
s_time=rs("s_time")
if now-s_time<1 then
newshuo="id=""New2"""
end if
%>
            <!--Tabbed Content-->
            <h5 class="title-bg" <%=newshuo%>>听我说 / 微说</h5>
             <div class="tab-content">
             <div class="tab-pane active">
                     <ul>
<%
do while not rs.eof
s_id=rs("s_id")
s_content=rs("s_content")
%>


					 
                        <li><i class="icon-headphones"></i>
                        <a href="shuos/?<%=s_id%>.html" title="<%=RemoveHTML(s_content,200)%>"><%=RemoveHTML(s_content,s_cd)%></a></li>
<%
rs.movenext
loop
rs.close
set rs=nothing
%>	

                    </ul>
                    </div>
            </div>
<% 
set rs=server.createobject("adodb.recordset")
sql="select top 5 u_id,u_name,u_touxiang,u_content,u_aid,u_url,u_time from web_Article_comment where (u_aid<>0 and u_view=1) order by u_id desc"
rs.open(sql),conn,1,1
u_time=rs("u_time")
if now-u_time<1 then
newhd="id=""New2"""
end if
%>
            <h5 class="title-bg" <%=newhd%>>互动信息</h5>
            <ul class="nav nav-tabs">
                <li class="active"><a href="#comments" data-toggle="tab">评论</a></li>
                <li><a href="#hot" data-toggle="tab">排行</a></li>
                <li><a href="#tui" data-toggle="tab">推荐</a></li>
            </ul>

            <div class="tab-content">
                <div class="tab-pane active" id="comments" >
                     <ul class="popular-comment">
<%
do while not rs.eof
u_id2=rs("u_id")
u_name=rs("u_name")
u_content=rs("u_content")
u_aid=rs("u_aid")
u_url=rs("u_url")
u_time=rs("u_time")
u_touxiang=rs("u_touxiang")
%> 
<li>
<%if u_url<>"" then %>
 <a href="url/?<%=replace(u_url,"http://", "")%>" target="_blank" rel="nofollow" title="去 <%=u_name%> 的网站看看 ?">
 <%else%>
 <a title="<%=u_name%>，没有登记网站.">
 <%end if%>
 <img src="img/Portrait/<%=u_touxiang%>.jpg" />
 </a>
<i class="icon-comment"></i> <%=u_name%><br/>
<a href="Article/?<%=u_aid%>.html#Comment-<%=u_id2%>" title="<%=u_content%>" ><%=left(u_content,us_cd)%>..</a>
</li>

<%
rs.movenext
loop
rs.close
set rs=nothing
%>	

                    </ul>

                </div>
                <div class="tab-pane" id="hot">
                    <ul>
<% 
set rs=server.createobject("adodb.recordset")
sql="select top 8 w_id,hit,w_title from web_Article where view_yes=1 order by hit desc"
rs.open(sql),conn,1,1
do while not rs.eof
w_id=rs("w_id")
hit=rs("hit")
w_title=rs("w_title")
%>					
                        
						<li><i class="icon-star-empty"></i> <a href="Article/?<%=w_id%>.html" title="<%=w_title%>"><%=left(w_title,10)%>..</a> ( <%=formatNumber(hit,0)%> )</li>

<%
rs.movenext
loop
rs.close
set rs=nothing
%>	
                    </ul>
                </div>
				
                <div class="tab-pane" id="tui">
                    <ul>
<% 
set rs=server.createobject("adodb.recordset")
sql="select top 8 w_id,hit,w_title from web_Article where (view_yes=1 and w_tuijian=1) "&Random_article&""
rs.open(sql),conn,1,1
do while not rs.eof
w_id=rs("w_id")
hit=rs("hit")
w_title=rs("w_title")
%>					
                        
						<li><i class="icon-thumbs-up"></i> <a href="Article/?<%=w_id%>.html" title="<%=w_title%>"><%=left(w_title,10)%>..</a> ( <%=formatNumber(hit,0)%> )</li>

<%
rs.movenext
loop
rs.close
set rs=nothing
%>	
                    </ul>
                </div>
            </div>
						            <!--Popular link-->
            <h5 class="title-bg">
<ul class="post-data">				
<li><a title="申请加入 <%=web_name%> 的友情链接？" href="Links/#Join">申请</a></li>
</ul>
            友情链接</h5>
            <ul class="popular-posts">

   
 <% 
set rs=server.createobject("adodb.recordset")
sql="select name,url,jieshao,paixu,NoFollow,weizhi from web_link where view_yes=1 and weizhi=1 order by paixu"
rs.open(sql),conn,1,1
do while not rs.eof
link_name=rs("name")
link_url=rs("url")
link_jieshao=rs("jieshao")
link_NoFollow=rs("NoFollow")
if link_NoFollow=1 then
link_N="rel=""nofollow"""
else
link_N=""
end if
%>	

			 <a href="<%=link_url%>" target="_blank" title="<%=link_jieshao%>" <%=link_N%> ><%=link_name%></a>&ensp;
 <%
rs.movenext
loop
rs.close
set rs=nothing
%>
            </ul>

        </div><!-- End sidebar column -->

    </div><!-- End container row -->
    
    </div> <!-- End Container -->

    <!-- Footer Area
        ================================================== -->
<!-- #include file="Config/foot.asp" -->

</body>
</html>
<!-- #include file="inc/close.asp" -->