foot.asp

来自「C2C二手交易网SMRUC v2.0 全部实现了C2C电子商务功能。 特别适合」· ASP 代码 · 共 56 行

<table align="center" cellpadding="0" cellspacing="0" bgcolor="#FFFFCC">
  <tr> 
    <td width="760" height="20" align="center"><a href="about.htm" target="_blank">网站简介</a> 
      | <a href="note.asp" target="_blank">网站记事</a> | <a href="guest.asp" target="_blank">网站留言本</a> 
      | <a href="count.asp" target="_blank">统计信息</a><br>
      <hr width="500" size="0" noshade> </td>
  </tr>
  <tr> 
    <td width="760" height="20" align="center">Copyright&copy;2005 中国人民大学二手交易网 
      SecondHand Market of RUC</td>
  </tr>
    <tr> 
    <td width="760" height="15" align="center">电子商务理论支持：<a href="http://info.ruc.edu.cn" target="_blank">中国人民大学信息学院</a></td>
  </tr>
  <tr> 
    <td width="760" height="15" align="center">友情技术支持：<a href="http://www.rucca.org" target="_blank">中国人民大学计算机协会</a></td>
  </tr>
    <tr> 
    <td width="760" height="15" align="center"></td>
  </tr>
</table>
<%
'网站统计
sql="SELECT * from logincount where type='day'"
rs.open sql,conn,1,3
   if rs("date")=date then
   sql="update logincount set logincount=logincount+1,[date]='"&date&"' where type='day'"
   conn.execute(sql)
   else
   sql="update logincount set logincount=1,[date]='"&date&"' where type='day'"
   conn.execute(sql)
   end if
rs.close

sql="SELECT * from logincount where type='total'"
rs.open sql,conn,1,3
   sql="update logincount set logincount=logincount+1 where type='total'"
   conn.execute(sql)
rs.close

sql="SELECT * from onlinecount where ip='"&request.servervariables("remote_addr")&"'"
rs.open sql,conn,1,3
if rs.eof and rs.bof then
sql="insert into onlinecount(ip) values('"&request.servervariables("remote_addr")&"')"
conn.execute(sql)
else
sql="update onlinecount set [time]='"&now()&"' where ip='"&request.servervariables("remote_addr")&"'"
conn.execute(sql)
end if
rs.close
conn.execute("delete * from onlinecount where time<#"&dateadd("n",-session.timeout,now)&"#")
sql="SELECT * from onlinecount where time>#"&dateadd("n",-session.timeout,now)&"#"
rs.open sql,conn,1,3
rs.close
%>