<!--#include file="../../p_inc/Include_func.asp"-->
<!--#include file="../inc/classDbPager.asp"-->
<!--#include file="../inc/public.asp"-->
<!--#include file="../inc/openconn.asp"-->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>全部新闻页面生成</title>
</head>
<body>
<style type="text/css">
<!--
body {
	margin-left: 0px;
	margin-top: 0px;
	margin-right: 0px;
	margin-bottom: 0px;
	background-color: #E4EDF9;
}
body,td,th {
	font-size: 12px;
}
-->
</style>
<%
'--------------------

Response.Write "<b>正在提取所需的ID，请等待...</b>"
Response.Flush()
bf=Request("bf")
SessionToTxt "selAnnounce","","0"
IF request("TopNew")<>"" Then
	today_sql="select id from qingtiandy_News where year(n_date)="&year(now) &" and month(n_date)="&month(now)&" and day(n_date)="&day(now)&" order by ID Desc"
Else
	today_sql="select id from qingtiandy_News order by ID Desc"
End IF
set m_totle_day=conn.execute(today_sql)
Do While Not m_totle_day.Eof
	SessionToTxt "selAnnounce",m_totle_day(0),","
	m_totle_day.movenext
Loop
axc_1=SessionToTxt("selAnnounce","","00")
axc_1=PrintArray(axc_1,",")	
SessionToTxt "selAnnounce",axc_1,"000"	
Response.Write "<script language=javascript>location.href='"&"../makehtml/makedetailNews.asp?selAnnounce=00000000&back2=../qingtiandy_News/index.asp&bf="&bf&"';</script>"
response.End()
%>