<!--#include file="system/conn.asp"--><%
id=Request.QueryString("id")
If id="" Or Not IsNumeric(id) Then id=0

Set Rs=Server.CreateObject("ADODB.RecordSet")
Rs.Open "SELECT infotitle,infokeywords,infodescription,infocontent,infovisitor,infocontentsetlink FROM info WHERE id="& id &" AND infostate>0 AND classid=2",Conn,1,3
If Rs.Bof And Rs.Eof Then
	Rs.Close:Set Rs=Nothing:Conn.Close:Set Conn=Nothing
	Response.Redirect "/yl.asp"
Else
	Rs("infovisitor")=Rs("infovisitor")+1
	Rs.Update
	infovisitor=Rs("infovisitor")
	infotitle=Rs("infotitle")
	infokeywords=Rs("infokeywords")
	infodescription=Rs("infodescription")
	infocontent=HTMLUnCode(Rs("infocontent"))
	infocontentsetlink=HTMLUnCode(Rs("infocontentsetlink"))

End If
Rs.Close
Set Rs=Nothing
%><!DOCTYPE html>
<html>
<head>
<meta http-equiv="content-type" content="text/html; charset=utf-8" />
<meta name="keywords" content="<%If infokeywords<>"" Then Response.Write infokeywords Else Response.Write keywords End If%>" />
<meta name="description" content="<%If infodescription<>"" Then Response.Write infodescription Else Response.Write description End If%>" />
<title><%=infotitle & "_"& nav3 & "【" & webname & "】"%></title>
<link rel="stylesheet" type="text/css" href="s/c.css" />
<script type="text/javascript" src="j/jq.js"></script>
<script type="text/javascript" src="j/js.js"></script>
</head>
<body>
<div id="container">
<%subTop%>
<div class="wrap_content">
	<div class="location"><a href="/">首页</a> > <a href="yl.asp"><%=nav3%></a> > <span>详细内容</span></div>
	<div class="pt1"><%=infotitle%></div>
	<div class="qc"><%If infocontentsetlink<>"" Then Response.Write infocontentsetlink Else Response.Write infocontent End If%><div class="clear"></div></div>
</div>
<%subBottom%>
</div>
</body>
</html><%Conn.Close:Set Conn=Nothing%>