<!--#include file="top.asp"--><!--#include file="Inc/ubbcode.asp"-->
<%
Dim sql,rs,id
Set rs=Server.CreateObject("Adodb.Recordset")
sql="select * from news where id="&request("id")
rs.open sql,conn,1,3
Dim title,body,date,hitnum
title=Rs("title")
body=Rs("body")
date=Rs("date")
hitnum=Rs("hitnum")
Rs("hitnum")=Rs("hitnum")+1
Rs.Update

Rs.Close

%>
<TABLE width=760 border=0 align=center cellpadding="4">
  <TBODY>
    <TR> 
      <TD align="center" vAlign=top>

         <TABLE cellSpacing=0 cellPadding=0 width="550" border=0>
          <TBODY>
            <TR> 
              <TD height=21 align="center">新聞標題:<font color=red><%=title%></font></TD>
            </TR>
               <TR> 
              <TD height=21 align="center"> 
				<hr noshade class=font size="1"> </TD>
            </TR>
            <TR> 
              <TD> <table width="100%" border="0">
                  <tr> 
                    <td align="right">日期：<%=date%> 點擊：<%=hitnum%></td>
                  </tr>
                  <tr> 
                    <td><%=ubbcode(body)%></td>
                  </tr>
                  <tr> 
                    <td align="center">[<a href="javascript:window.close()"><font class=font>關閉窗口</font></a>]</td>
                  </tr>
                </table></TD>
            </TR>
          </TBODY>
        </TABLE>
        


      </TD>
    </TR>
  </TBODY>
</TABLE>
<!--#include file="bottom.asp"-->
</body>
</html>

<%
conn.Close
Set conn=Nothing
%>