<!--#include file="../Include/Const.Asp" -->
<!--#include file="../Include/ConnSiteData.Asp" -->
<!--#include file="../CheckAdmin.Asp"-->
<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
<link rel="stylesheet" href="../Images/Admin_style.css">
<script language="javascript" src="../JavaScript/Admin.js"></script>
<script language="javascript" src="../JavaScript/select_date.js"></script>
<%
Response.Buffer=True    
Response.ExpiresAbsolute =Now()-1    
Response.Expires=0    
Response.CacheControl="no-cache"    
Response.AddHeader "Pragma","No-Cache"
Dim Result,reResult
Result = request.QueryString("Result")
Dim ID,NewsName,ViewFlag,SortID,SortPath,NoticeFlag,Source,Content,ClickNumber,AddTime
Dim GroupID,GroupIdName,SortName
ID = request.QueryString("ID")
Call m_NewsView()
%>
<br />
<table class="tableBorder" width="95%" border="0" align="center" cellpadding="5" cellspacing="1">
  
    <tr>
      <th height="28" valign="middle"><h4><font color="#993300"><%=NewsName%></font></h4></th>
    </tr>
	<tr>
      <td class="forumRowHighlight">
<script language="javascript">
var tID=0;
var rID=1;
function ShowTabs(ID){
  if(ID!=tID){
    TabTitle[tID].className="title5";
    TabTitle[ID].className="title6";
    Tabs[tID].style.display="none";
    Tabs[ID].style.display="";
    tID=ID;
  }
  if(ID==4)
    {
     document.getElementById("gback").style.display="none";
     document.getElementById("submitSaveEdit").style.display="none";  
    }
  else
    {
     document.getElementById("gback").style.display="";
     document.getElementById("submitSaveEdit").style.display="";
	 document.getElementById("showid").value=ID;
    }
}


</script>
	  <table width="100%"  border="0" align="center" cellpadding="0" cellspacing="0">
        <tr align="center">
            <td id="TabTitle" class="title6" onclick="ShowTabs(0)">详细内容<font color="#FFFFFF">&#8595;</font></td>
		
            <td align="left" style="color:#999999"> &nbsp; &nbsp;类别：<%=SortName%> &nbsp; &nbsp;发布时间：<%=AddTime%> </td>
        </tr>
</table>
<table width="100%"  border="0" align="center" cellpadding="0" cellspacing="1" class="border"><tr class="tdbg"><td valign="top">
  <table width="100%" align="center" cellpadding="2" cellspacing="1">
  <tbody id="Tabs" style="display:">
  <tr>
      <td class="forumRowHighlight">
	  <div style="padding:10px 20px;">
	  <%=Content%></div>
	  </td>
    </tr>
  
	
  </tbody>
  </table>
</td>
</tr>
</table>
	  </td>
    </tr>
    <tr>
      <td class="forumRowHighlight" align="center"><input type="button" id="gback" onclick="history.back(-1)" value="返回上一页" style="display:"></td>
    </tr>
</table>
<%

Sub m_NewsView()
    Dim Action, rs, sql
    Set rs = server.CreateObject("adodb.recordset")
    sql = "select * from Zqj_News where ID="& ID
    rs.Open sql, conn, 1, 1
	    if rs.bof and rs.eof then
	response.Write "<script language='javascript'>alert('参数错误！');history.back(-1);</script>"
	response.End
		else
			NewsName=rs("NewsName")
			ViewFlag=rs("ViewFlag")
			SortID=rs("SortID")
			SortPath=rs("SortPath")
			NoticeFlag=rs("NoticeFlag")
			Source=rs("Source")
			Content=rs("Content")
			ClickNumber=rs("ClickNumber")
			AddTime=FormatDate(rs("Addtime"),14)
			SortName=SortText(rs("SortID"))
		end if
    rs.Close
    Set rs = Nothing
End Sub


Function SortText(ID)
    Dim rs, sql
    Set rs = server.CreateObject("adodb.recordset")
    sql = "Select * From Zqj_NewsSort where ID="& ID
    rs.Open sql, conn, 1, 1
	if rs.bof and rs.eof then
	SortText="未分类"
	else
    SortText = rs("SortName")
	end if
    rs.Close
    Set rs = Nothing
End Function
%>