bottom.asp

asp新闻发布网站系统

 <div align="left">
  <table width="760" border="0" cellpadding="0" cellspacing="0">
    <tr> 
      <td width="760" height="20" background="images/table1.gif" bgcolor="<%=tablecolor%>">　</td>
    </tr>
    <tr> 
      <td> <p align="center">　</p>
        <%if counts=true then%>
        <p align="center">日访问量: 
          <%sql="SELECT * from logincount where type='day'"
rs.open sql,conn,1,3
if session("count")<>"close" then
   if rs("date")=date then
   rs("logincount")=cint(rs("logincount"))+1
   rs("date")=date
   rs.update
   else
   rs("logincount")=1
   rs("date")=date
   rs.update
   end if
   session("count")="close"
end if
response.write rs("logincount")
rs.close
%>
      <!--    || 在线人数: 
          <%sql="SELECT * from online where ip='"&request.servervariables("remote_addr")&"'"
rs.open sql,conn,1,3
if rs.eof and rs.bof then
rs.addnew
rs("ip")=request.servervariables("remote_addr")
rs.update
else
rs("time")=now()
rs.update
end if
rs.close
conn.execute("delete * from online where time<#"&dateadd("n",-session.timeout,now)&"#")
sql="SELECT * from online where time>#"&dateadd("n",-session.timeout,now)&"#"
rs.open sql,conn,1,3
response.write rs.recordcount 
rs.close
%>

-->
          || 今日公告: 
          <%sql="SELECT * from body where time>#"&date&"#"
rs.open sql,conn,1,3
if rs.eof and rs.bof then
response.write 0
else
response.write rs.recordcount
end if
rs.close%>
      <!--    || 今日回复: 
          <%sql="SELECT * from re where retime>#"&date&"#"
rs.open sql,conn,1,3
if rs.eof and rs.bof then
response.write 0
else
response.write rs.recordcount
end if
rs.close%>
-->
        </p>
        <%end if%>
        <p align="center"><%=copyright%></p>
        <p align="center">　</p></td>
    </tr>
  </table>
  <%call connClose()%>
</div>