<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3c.org/TR/1999/REC-html401-19991224/loose.dtd">
<!--#include file="inc/index_conn.asp"-->
<!--#include file="inc/Sqlcheck.asp"-->
<!--#include file="advertising.asp"-->
<!--#include file="linkfunction.asp"-->
<!--#include file="inc/function.asp"-->
<!--#include file="md5.asp"-->
<!--#include file="config.asp"-->
<!--#INCLUDE FILE="background.asp"-->
<!--#include file="taobao/checklogin.asp"-->
<%
			  

     id=request("id")
	 
	 if request.QueryString("id")="" then 
		server_v40=Request.ServerVariables("QUERY_STRING") 
		id=Int(replace(replace(server_v40,"/",""),".html",""))
		where="ArticleId="&id
	elseif request.QueryString("Id")<>"" then
		where="ArticleId="&request.QueryString("Id")	
	else
		response.write "页面参数有错，请检查！"	
		response.end
	end if
	
Set rsnews=Server.CreateObject("ADODB.RecordSet") 
sql="update Article set hits=hits+1 where "&where&""
conn.execute sql

	   set rs=server.createobject("adodb.recordset")
		rs.open "select  * from Article where  "&where&" ",conn,1,1
		title=rs("title")
		content=rs("content")
		copyfrom=rs("copyfrom")
		hits=rs("hits")
		updatetime=rs("UpdateTime")
		ArticleId=rs("ArticleId")
		%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<HTML xmlns="http://www.w3.org/1999/xhtml"><HEAD>
<title><%=rs("title")%>--<%=stupname%></title>
<META http-equiv=Content-Type content="text/html; charset=gb2312">
<meta content="<%=stupdesc%>" name="description"/>
<meta content="<%=stupkey%>" name="keywords"/>
<SCRIPT src="image/chrome.js" type=text/javascript></SCRIPT>
<LINK href="image/DefaultSkin.css" type=text/css rel=stylesheet>
<LINK  href="img/global.css" type=text/css rel=Stylesheet>
<META content="MSHTML 6.00.2900.5764" name=GENERATOR></HEAD>
<BODY>
<style type="text/css">
<!--
    body{
    background-image:url(bg_pic.jpg);
    background-repeat: repeat-x; 
    };
-->
</style>
<!--#include file=top.asp--><br>
<div align="center">
	<table border="0" width="920" cellspacing="5" cellpadding="0" height="26">
		<tr>
			<td width="200" valign=top rowspan="3"><!--#include file="user/userleft.asp"--></td>
		</tr>
		<tr>
			<td width="691" valign=top>
			<!--右侧--><table border="0" width="100%" cellspacing="0" cellpadding="0">
				<tr>
					<td><!--start-->
			<table border="1" width="100%" cellspacing="0" cellpadding="0" style="border-collapse: collapse" bordercolor="#D4DCE5">
				<tr>
					<td height="34" background="user/titlebg.gif">
					<p>&nbsp; <b><span style="font-size: 13pt">&nbsp; 
					<%=title%></span></b></td>
				</tr>
				<tr>
					<td>
					<table border="0" width="100%" cellspacing="8" cellpadding="0" bgcolor="#FFFFFF">
						<tr>
							<td><!--1-->
							作者：佚名 来源：<%=copyfrom%> 点击数： <%=hits%> 更新时间：<%=UpdateTime%>
        <!--1--><DIV class=nextprevtitle></DIV></td>
						</tr>
						<tr>
							<td>
							<p align="left"> <%=content%></p></td>
						</tr>
						<tr>
							<td><!--翻页--><DIV class=nextprev>
上一篇： <%
	  dim rsPrev
	  sql="Select Top 1 ArticleID,Title From Article Where Deleted=0 and ArticleID<" & ArticleID & " order by ArticleID desc"
	  Set rsPrev= Server.CreateObject("ADODB.Recordset")
	  rsPrev.open sql,conn,1,1
	  if rsPrev.Eof then
	  	response.write "没有了"
	  else
	    URL="news.asp?/"&rsPrev("ArticleID")&".html"
	  	response.write "<a href='"&url& "'>"&rsPrev("Title") & "</a>"
	  end if
	  rsPrev.close
	  set rsPrev=nothing
	  %>
下一篇：  <%
	  dim rsNext
	  sql="Select Top 1 ArticleID,Title From Article Where Deleted=0 and ArticleID>" & ArticleID& " order by ArticleID asc"
	  Set rsNext= Server.CreateObject("ADODB.Recordset")
	  rsNext.open sql,conn,1,1
	  if rsNext.Eof then
	  	response.write "没有了"
	  else
	   URL="news.asp?/"&rsNext("ArticleID")&".html"
	  	response.write "<a href='"&url& "'>"&rsNext("Title") & "</a>"
	  end if
	  rsNext.close
	  set rsNext=nothing
	  %>
</DIV>
<!--翻页--></td>
						</tr>
					</table>
					</td>
				</tr>
			</table>
			<!--end--></td>
				</tr>
				<tr>
					<td>　</td>
				</tr>
			</table><!--右侧结束-->
			</td>
		</tr>
	</table>
</div>
<!--#include file=inc/bottom.asp-->
</body>
</html>
