<!--#include file="Top.asp" -->
<%
GetErrInfo=" 【提示：下面是你发布的日志列表,您可以进行删除,修改操作!】"
Session("Title")=Empty
%>
<script language="javascript" src="../inc/js.js"></script>
<table width="99%" border="0" align="center" cellpadding="5" cellspacing="0">
  <tr> 
    <td height="30" bgcolor="#FFFFFF"><table width="300" border="0" align="right" cellpadding="0" cellspacing="0">
        <tr> 
          <td width="120" class="box3"> <div align="center"><a href="Article_GroupByClass.Asp">日志分类</a></div></td>
          <td>-</td>
          <td width="120" class="box3"> <div align="center"><a href="Article_Add.Asp">发布日志</a></div></td>
          <td>-</td>
          <td width="120" class="box3"> <div align="center"><a href="Article_List.Asp">日志列表</a></div></td>
          <td>-</td>
          <td width="120" class="box3"> <div align="center"><a href="Comments_List.Asp">评论管理</a></div></td>
        </tr>
      </table></td>
  </tr>
  <tr> 
    <td height="30" bgcolor="#FFFFFF" class="h1"><img src="img/GuestBook.gif" width="23" height="21"> 
      日志列表 
      <hr size="0"></td>
  </tr>
  <tr> 
    <td valign="top" bgcolor="#FFFFFF" class="h1"> <table width="100%" border="0" cellspacing="0" cellpadding="10">
        <tr> 
          <td class="box"> <table width="100%" border="0" cellspacing="0" cellpadding="0">
              <tr> 
                <td width="2%" valign="middle"><img src="img/3.gif" width="16" height="16"></td>
                <td width="98%" valign="middle"><%=GetErrInfo%></td>
              </tr>
            </table></td>
        </tr>
        <tr height="5"> 
          <td height="5"></td>
        </tr>
      </table>
      <table width="100%" border="0" cellpadding="2" cellspacing="1" class="box2">
        <tr bgcolor="#CCCCCC"> 
          <td width="22" height="20"><img src="img/page.gif" width="20" height="20"></td>
          <td width="366"><strong>日志标题</strong></td>
          <td width="196"><strong>时间</strong></td>
          <td width="148" bgcolor="#CCCCCC"><strong>是否显示</strong></td>
          <td width="139"><strong>动作</strong></td>
        </tr>
        <form name="form1" method="post" action="Article_Del.Asp">
          <%
Dim WhereStr,ClassName,SqlStr,RsCount,ArticleArr
WhereStr="Where User_ID="& Session("UserID") &" And Isphoto=0"
ClassName=CBlogObj.QueryStringPage("ClassName",True)
if ClassName<>"" then 
	WhereStr=WhereStr&" and left(Article_ByClass,7)='"&ClassName&"'"
end if
SqlStr="select Article_ID,Article_Title,Article_Hid,Article_Time,Article_ByClass from Article "&WhereStr&" order by Article_ID desc"
'Response.Write SqlStr
Set Rs = Server.CreateObject("Adodb.RecordSet")
Rs.open SqlStr,Conn, 1, 1
SqlCount=SqlCount+1
If rs.eof Then
	response.write("<tr><td height=25 colspan=5><div align=center>没有发表日志</div></td></tr>")
	RsCount=0
	MaxP=1
	Rs.Close:Set Rs=nothing
Else
	Rs.PageSize = 15
	MaxP=rs.PageCount
	rs.AbsolutePage=CblogObj.QueryPage
	RsCount=Rs.RecordCount
	ArticleArr = Rs.GetRows(15)
	Rs.Close:Set Rs=nothing
for iii=0 to Ubound(ArticleArr,2)
%>
          <tr class="tr2" onmouseover="this.className='tr1'" onmouseout="this.className='tr2'"> 
            <td><input type="checkbox" name="ArticleID" value="<%=ArticleArr(0,iii)%>"></td>
            <td>[<a href="Article_List.Asp?ClassName/<%=left(ArticleArr(4,iii),7)%>.html"><%=Mid(ArticleArr(4,iii),8)%></a>] 
              <a href="Article_Show.Asp?ArticleID=<%=ArticleArr(0,iii)%>"><%=ArticleArr(1,iii)%></a></td>
            <td><%=ArticleArr(3,iii)%></td>
            <td> 
              <%IF ArticleArr(2,iii)=1 Then %>
              <img src="img/cross.gif" alt="隐藏"> 
              <%Elseif ArticleArr(2,iii)=2 Then%>
              <img src="img/blogtop.gif" alt="固顶"> 
              <%Else%>
              <img src="img/tick.gif" alt="显示"> 
              <%End IF%>
            </td>
            <td> <a href="Article_Update.Asp?ArticleID=<%=ArticleArr(0,iii)%>">编缉</a> 
              <a href="Article_Show.Asp?ArticleID=<%=ArticleArr(0,iii)%>">预览</a> 
              <a href="../TrackBack.asp?ID=<%=ArticleArr(0,iii)%>" target="_blank">查看引用 
              </a></td>
          </tr>
          <%
Next
End IF
%>
          <tr class="tr2"> 
            <td height="30" colspan="5"><div align="center"> 
                <INPUT name="all" type="button" onclick="CheckAll(this.form)" value="全选">
                <INPUT name="sall" type="button" onclick="CheckOthers(this.form)" value="反选">
                <input name="Submit" type="reset" value="重选">
                <INPUT name="subimt" type="submit" onClick="return ConfirmDel();" value="删除">
                <input name="Action" type="hidden" id="Action" value="delete">
              </div></td>
          </tr>
        </form>
        <tr class="tr2"> 
          <td height="30" colspan="5"> 
            <%CblogObj.PageList RsCount,CblogObj.QueryPage,15,20,false%>
          </td>
        </tr>
      </table></td>
  </tr>
  <tr> 
    <td bgcolor="#FFFFFF">&nbsp;</td>
  </tr>
  <tr bgcolor="#0066CC" height="2"> 
    <td height="2"></td>
  </tr>
</table>


<!--#include file="Foot.asp" -->
