index.asp

重庆二手网

<!--#include file="config.asp"-->
<%
if request.cookies("fwtongji")="" then
   response.cookies("fwtongji")=now()
end if
tye=request("tye")
imgstyle=request("style")
if request("style")="" then imgstyle=1
set rs=conn.Execute("select * from lezi_counter")


if DateDiff("s", request.cookies("fwtongji"),now() )<1 and request.cookies("fwtongji")<>cstr(now()) then      '1秒之内刷新不记数
   'response.write "<a href=a.asp target=_ablack>没有输出</a>"
   'response.end
else
   response.cookies("fwtongji")=now()

   if rs("oto")<>date() then
   zzday=date()-1
   application.lock
   conn.Execute"Update lezi_counter set counter=counter+1,today=0,oto=date(),daynum=daynum+1,yesterday="&rs("today")&""
   conn.Execute"Insert into lezi_zzday(zzday,stats) values ('"&zzday&"',"&rs("today")&")"
   application.unlock
    else
   application.lock
   if rs("top")<rs("today") then
   conn.Execute"Update lezi_counter set counter=counter+1,today=today+1,[top]="&rs("today")&""
   else
   conn.Execute"Update lezi_counter set counter=counter+1,today=today+1"
   end if
   application.unlock
   end if
end if



counters=rs("counter")
today=rs("today")
yesterday=rs("yesterday")
rs.close
g =CStr( counters )
s =Len(G)
For i = 1 to jslong - S
zzzcounter=zzzcounter&"<a href="&pageurl&"/stat.asp target=_blank><img border=0 src="&pageurl&"/images/"&imgstyle&"/0.gif>"
next
for i=1 to S
zzzcounter=zzzcounter&"<img border=0 src="&pageurl&"/images/"&imgstyle&"/" & mid(G,i,1) & ".gif>"
next
zzzcounter=zzzcounter&"</a>"
set rs=nothing
conn.close
set conn=nothing
select case tye
case "view"	'输出计数器图片
%>
document.write('<%=zzzcounter%>');
<%
case "logo"	'输出LOGO
%>
document.write('<a href=<%=pageurl%>/stat.asp target=_blank><img title=多维服务 src=<%=pageurl%>/<%=logo%> border=0></a>');
<%
case "num"	'输出访问的具体情况
%>
document.write("<img src='counter/images/announce.gif'>&nbsp;<a href='counter/stat.asp' target='_blank'><font style='FONT-SIZE: <%=fontsize%>px;COLOR: <%=fontcolor%>;'>总共访问量：<%=counters%>&nbsp;，今日访问：<%=today%>&nbsp;，昨日访问：<%=yesterday%>&nbsp;</font></a>");
<%
case "num1"	'只输出总访问量
%>
document.write("<font style='FONT-SIZE: <%=fontsize%>px;COLOR: <%=fontcolor%>;'><%=counters%></font>");
<%end select%>