<!--#include file="conn.asp"-->
<!--#include file="chk_logs.asp"-->

<%
if session("AdminName")="" then
	response.Write "<script language='javascript'>alert('网络超时或您还没有登陆！');window.location.href='index.asp';</script>"
	response.End
else
	if session("flag")>1 then
	response.Write "<script LANGUAGE='javascript'>alert('您没有此项目管理权限！请于管理员联系!!!');window.location.href='admin.asp';</script>"
	response.End
	end if
end if
%>
<%
if request.QueryString("action")="del" then
id=request("id")
page=request("page")
set rs=server.createobject("adodb.recordset")
rs.open "select * from xc where id="&id&"",conn,1,3
xtp=rs("xtp")
 if trim(xtp)<>"" then
   mappath=server.mappath("../")+"\admin-ts-yt\"+xtp
   mappath=replace(mappath,"/","\")
' response.Write mappath
  'response.end
   set fso=createobject("scripting.filesystemobject333")
   if fso.fileexists(mappath) then
   set pohot=fso.getfile(mappath)
   pohot.delete
   set pohot=nothing
   else
   response.write ""
   end if
   set fso=nothing
end if
rs.delete
rs.update
rs.close
set rs=nothing
response.Redirect "xcgl.asp"&"?page="&page
end if
%>
<%
id=replace(request("id"),"'","")
f04=request("f04")
'response.Write f04
'response.End()
set rs=server.createobject("adodb.recordset")
rs.open "select * from xc where xcf01 is not null order by id desc",conn,1,1
'response.Write sql
'response.End()
%>


<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>企业信息发布平台V8.0</title>
<style type="text/css">
<!--
@import url("css2.css");
body {
	margin-left: 0px;
	margin-top: 0px;
	margin-right: 0px;
	margin-bottom: 0px;
}
.STYLE4 {font-size: 12px}
.STYLE6 {color: #000000}
.STYLE7 {color: #FFFFFF;
	font-size: 12px;
}
-->
</style>
</head>

<body class="admin-top-bg">
<table width="100%" border="0" cellspacing="0" cellpadding="0">
  <tr>
    <td height="20" class="admin-top-bg">&nbsp;</td>
  </tr>
  <tr>
    <td><table width="100%" height="220" border="0" align="center" cellpadding="0" cellspacing="1">
      <tr>
        <td width="99%" align="center" valign="top"><table width="96%" border="0" cellpadding="0" cellspacing="1" bgcolor="#1A70D2">
          <tr>
            <td bgcolor="#FFFFFF"><table width="100%"  border="0" align="center" cellpadding="0" cellspacing="0">
              <tr>
                <td width="39%" align="right" bgcolor="#254B8F" class="bsz">当前位置：网站后台管理___文章管理</td>
              </tr>
              <tr>
                <td colspan="2"><table width="100%"  border="0" align="center" cellpadding="3" cellspacing="1" bgcolor="#999999">
                  
                  <tr align="center" bgcolor="#E7F6EF">
                    <td width="27%" align="center" bgcolor="#F7F7F7" class="red-wz">用户名</td>
                    <td width="27%" align="center" bgcolor="#F7F7F7" class="red-wz">审 核</td>
                    <td width="22%" align="center" bgcolor="#F7F7F7" class="wz"><span class="red-wz">图 片</span></td>
                    <td width="24%" align="center" bgcolor="#F7F7F7" class="red-wz">管理操作</td>
                  </tr>
          <%
		  if rs.eof then 
		  %>
                  <tr align="center" bgcolor="#E7F6EF">
                    <td height="78" colspan="6" bgcolor="#F7F7F7" class="wz">暂时没有文章信息！</td>
                  </tr>
                  <%
		                       else
							   rs.pagesize=8
							   page=request("page")
							   if isempty(page) or page="" or not isnumeric(page) then page=1
				 if cint(page)<1 then page=1
				 if cint(page)>rs.pagecount then page=rs.pagecount
				 rs.absolutepage=cint(page)
							   for i=1 to rs.pagesize
		          %>
                  <tr align="center" bgcolor="#E7F6EF">
				    <td align="center" bgcolor="#F7F7F7" class="wz"><%=rs("xcf01")%></td>
                  
                    <td align="center" bgcolor="#F7F7F7" class="wz">
		<form action="xcsh.asp" method="post" name="form5" id="form5">
					<select name="ss" id="ss">
            <option value="<%=rs("ss")%>">
            <% if rs("ss")=1 then response.Write("当前:已审")%>
            <% if rs("ss")=0 then response.Write("当前:未审")%>
            </option>
            <option value="1">已审</option>
            <option value="0">未审</option>
          </select>
            <input type="submit" name="Submit32" value="修改">
			<input name="id" type="hidden"  value="<%=rs("id")%>">
			<input name="glid" type="hidden"  value="<%=rs("glid")%>">
		</form>		
			</td>
			
                    <td align="center" bgcolor="#F7F7F7" class="wz"><img src="../<%=rs("xtp")%>" name="idImg" width="200"border="0" ID="idImg" onLoad="dispOriginalSize(this);" onMouseWheel="zoomObj(this);dispCurrentSize();"></td>
                    <td bgcolor="#F7F7F7" class="wz">&nbsp;<a href="javascript:if(confirm('确定要删除该文件吗？\n\n注意：删除后无法恢复！')){location.href='xcgl.asp?id=<%=rs("id")%>&page=<%=page%>&action=del'}" title="删除文件"><font color="#FF0000">删除</font></a>&nbsp;&nbsp;					</td>
                  </tr>
                  <%
		  rs.movenext
		  if rs.eof then exit for
		  next
		  %>
                  <tr align="left">
                    <td colspan="6" bgcolor="#F7F7F7" class="STYLE4"></td>
                  </tr>
                  <%end if%>
                  <tr align="center" bgcolor="#E7F6EF">
                    <td height="22" colspan="6" bgcolor="#F7F7F7" class="STYLE4"><table width="100%"  border="0" cellspacing="0" cellpadding="0">
                      <form name="form2" method="post" action="xinwen.asp" >
                        <tr>
                          <td width="84%" align="right" bgcolor="#F7F7F7"><span class="wz"><a href="xcgl.asp?page=1&&id=<%=id%>"><font color="#000000">第一页</font></a> <a href="xcgl.asp?page=<%=page-1%>&id=<%=id%>" ><font color="#000000">上一页</font></a> <a href="xcgl.asp?page=<%=page+1%>&id=<%=id%>"><font color="#000000">下一页</font></a> <a href="xcgl.asp?page=<%=rs.pagecount%>&id=<%=id%>" class="STYLE6"><font color="#000000">最后一页</font></a> 共<font color="#0000FF"><%=rs.pagecount%></font>页 当前第<font color="#0000FF"><%=page%></font>页 
                            跳至
                          <input name="page" type="text" class="textline" size="3" maxlength="4">
&nbsp;页
                            <input type="submit" name="Submit" value="转至">
							
                          </span></td>
                        </tr>
                      </form>
                    </table></td>
                  </tr>
                </table></td>
              </tr>
            </table></td>
          </tr>
        </table></td>
      </tr>
    </table></td>
  </tr>
  <tr>
    <td valign="top">&nbsp;</td>
  </tr>
</table>
<%
rs.close
set rs=nothing
%>
</body>
</html>
