|
客户需求与项目背景
随着国民经济的快速发展,气象部门的作用也越来越显著,对经济发展的保驾护航第作用也越来越突出,如何能够增强对气象灾害和突发公共事件应急处置的气象服务能力,最大限度减少人民生命和财产损失,为国家防灾减灾和经济社会可持续发展提供更加有力的气象保障服务是气象业务部门的首要宗旨,为此目的,全国各级气象业务机关部门都在国家气象局和当地政府的支持下,组建了自动气象监测网络。 |
| |
<%
sql="select top 8 * from T_news where classOneId=1 and classTwoId=69 and state=1 order by sug desc,postTime desc"
set database=new databaseCls
set rs=database.getRs(sql)
set database=nothing
if rs.bof and rs.eof then
response.write("| 数据暂时没有更新!!! | ")
rs.close
set rs=nothing
else
do while not rs.eof
%>
| " target="_blank" title="<%=rs("title")%>">· <%=cut(rs("title"),50)%> |
<%=getdateStr2(rs("postTime"))%> |
<%
rs.moveNext
loop
end if
%>
|
| |
<%
sql="select top 8 * from T_news where classOneId=1 and classTwoId=78 and state=1 order by sug desc,postTime desc"
set database=new databaseCls
set rs=database.getRs(sql)
set database=nothing
if rs.bof and rs.eof then
response.write("| 数据暂时没有更新!!! | ")
rs.close
set rs=nothing
else
do while not rs.eof
%>
| " target="_blank" title="<%=rs("title")%>">· <%=cut(rs("title"),50)%> |
<%=getdateStr2(rs("postTime"))%> |
<%
rs.moveNext
loop
end if
%>
|
|
|
|
|
| |
<%
sql="select top 8 * from T_news where classOneId=1 and classTwoId=69 and state=1 order by sug desc,postTime desc"
set database=new databaseCls
set rs=database.getRs(sql)
set database=nothing
if rs.bof and rs.eof then
response.write("| 数据暂时没有更新!!! | ")
rs.close
set rs=nothing
else
do while not rs.eof
%>
| " target="_blank" title="<%=rs("title")%>">· <%=cut(rs("title"),50)%> |
<%=getdateStr2(rs("postTime"))%> |
<%
rs.moveNext
loop
end if
%>
|
| |
<%
sql="select top 8 * from T_news where classOneId=1 and classTwoId=78 and state=1 order by sug desc,postTime desc"
set database=new databaseCls
set rs=database.getRs(sql)
set database=nothing
if rs.bof and rs.eof then
response.write("| 数据暂时没有更新!!! | ")
rs.close
set rs=nothing
else
do while not rs.eof
%>
| " target="_blank" title="<%=rs("title")%>">· <%=cut(rs("title"),50)%> |
<%=getdateStr2(rs("postTime"))%> |
<%
rs.moveNext
loop
end if
%>
|
|
|
|
| |
<%
sql="select top 8 * from T_news where classOneId=1 and classTwoId=69 and state=1 order by sug desc,postTime desc"
set database=new databaseCls
set rs=database.getRs(sql)
set database=nothing
if rs.bof and rs.eof then
response.write("| 数据暂时没有更新!!! | ")
rs.close
set rs=nothing
else
do while not rs.eof
%>
| " target="_blank" title="<%=rs("title")%>">· <%=cut(rs("title"),50)%> |
<%=getdateStr2(rs("postTime"))%> |
<%
rs.moveNext
loop
end if
%>
|
| |
<%
sql="select top 8 * from T_news where classOneId=1 and classTwoId=78 and state=1 order by sug desc,postTime desc"
set database=new databaseCls
set rs=database.getRs(sql)
set database=nothing
if rs.bof and rs.eof then
response.write("| 数据暂时没有更新!!! | ")
rs.close
set rs=nothing
else
do while not rs.eof
%>
| " target="_blank" title="<%=rs("title")%>">· <%=cut(rs("title"),50)%> |
<%=getdateStr2(rs("postTime"))%> |
<%
rs.moveNext
loop
end if
%>
|
|
|
|