<!--#include file="Inc/conn.asp"-->
<!--#include file="Inc.asp"-->
<%
Dim ID
ID=Angel_aspRequest(request("ID"))
set rs=server.createobject("adodb.recordset")
sql="select * from "&tbname&"_About where id="&id
rs.open sql,conn,1,1
if rs.eof and rs.bof then
Call Alert("不正确的ID!",SitePath)
else
%>
<!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>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<meta name="keywords" content="<%=rs("Title")%>-powered by angelasp.com" />
<meta name="description" content="<%=rs("Title")%>-powered by angelasp.com" />
<link href="<% =SitePath %>css/indexstyle.css" rel="stylesheet" type="text/css">
<link rel="stylesheet" type="text/css" href="<% =SitePath %>css/common.2014.css" />
<link rel="stylesheet" type="text/css" href="<% =SitePath %>css/article.css" />
<link rel="shortcut icon" href="<%=SitePath%>images/myfav.ico" type="image/x-icon" />
<script type="text/javascript" src="<%=SitePath%>inc/main.asp"></script>
<title><%=rs("Title")%> - <% =SiteTitle %></title>
</head>
<body>
<div class="mwall">
<%=Head%>
<%=Menu%>
<div class="content">
        <div class="conlist">
            <!--位置导航-->
            <div class="add_link">
                <p class="fr"><a href="<%=SitePath%>" target="_blank"><% =SiteTitle %></a></p>
				<p class="fl">
		<%=search%><strong>您现在的位置：</strong><a href="<%=SitePath%>">首页</a> >> <a href="<%=SitePath%>About.asp?ID=<%=rs("ID")%>"><%=rs("Title")%></a> >> 内容
				</p>
            </div>
            
 <!--横幅通栏广告-->
<div style="position:relative; overflow: hidden; text-align:center; padding-top:5px;">
    <div id="baidu_ad_671078"></div>
</div>
<div class="tit_pg clearfix">
    <h2><%=rs("Title")%></h2>
</div>

<div class="txt_list">
<div style="padding:8px;line-height:23px;">
	<%=rs("Content")%>
	</div>

</div>

        </div>
        <div class="sider">
		
<div  class="side_ad" style="margin-bottom:15px;height:auto;">
<%Call ShowAD(3)%>
</div>
 
<!--本月排行-->
<div class="mod_side">
    <div class="tit">相关信息</div>
    <div class="tab_cont">
<ol class="txt_list">

	<%
			set rs1=server.createobject("ADODB.Recordset")
			sql1="select * from "&tbname&"_About order by ID desc"
			rs1.open sql1,conn,1,3
			If Not rs1.Eof Then
			do while not (rs1.eof or err)
			%>
			<li>·
            <a href="/<%If html=3 then Response.Write("About_"&rs1("ID")&".html") else  Response.Write("About.asp?ID="&rs1("ID")&"") End if%>"><%=rs1("Title")%></a>
			</li>
			<%
			rs1.movenext
			loop
			end if
			rs1.close
			set rs1=nothing
			%>
</ol>
    </div>
</div>
 

 
 
        </div>
    </div> 




<%
End If 
rs.close
set rs=nothing
%>
<%=Copy%>
</div>
</body>
</html>