当前位置: 首页 > 图文教程 > 网络编程 > ASP > [asp]阿里西西的alexa采集效果代码

ASP
asp分页(自己整理的2个分页程序)
ASP常用的系统配置函数
雨哲防采集策略之列表篇
雨哲浅谈关于防采集而不影响收录内容篇
asp数据库连接函数
ajax XMLHTTP Post Form时的表单乱码综合解决
ASP注入详细命令40条
用ASP实现MSSQL用户密码破解
ASP创建对象的两种方法比较
ASP字符串转换为整形、双精度型、布尔
ASP计算str2在str1中出现的次数
asp采集抓取网上房产信息的代码
ASP注册登陆实例代码
ASP中使用FileSystemObject时提高性能的方法
分享一个好东东,动态Include文件 (Dynamic File Includes)
解决 JScript 中使用日期类型数据时出现类型错误的问题
在ASP里面创建GUID
在JScript中使用缓存技术的实际代码
ASP javascript Application对象的Contents和StaticObjects做Cache的一些经验
海阳2006+功能中的潜水王

ASP 中的 [asp]阿里西西的alexa采集效果代码


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-10-12   浏览: 141 ::
收藏到网摘: n/a

我想这个系统现在在网上或源码站几乎是没有可用的程序。 提供下载的都是以前的老版本,ALEXA官方在他们的页面做了混淆代码防采集后,那些以前的ALEXA排名查询系统都已经无法再使用了。 网上除了一些知名(有钱的主)能提供(通过收费接口)的排名查询和我看到的webmasterhome.cn免费接口的查询功能系统外,个人站长基本没几个再能提供ALEXA排名查询服务。
开源发布的这个版本经过我一段时间的使用和完善,已经做到无错,速度相对也比较快。为了这个系统,也曾有黑客威胁过自己,并招来两天猛烈的DDOS攻击。
<%
Dim domain,Url,Url1,strPage,StrPage1
Dim xmldom,SD,SITE,dimg
domain = request.QueryString("url")
if domain = "" then domain = "ruanchen.com"
If Not iswww(domain) Then
response.write "<script>alert('您输入的网址无效,请重新输入!')</script>"
domain = "ruanchen.com"
End if
host = "ruanchen.com"
if left(domain,7)="http://" then
domain=right(domain,len(domain)-7)
end if
if instr(domain,"/")<>0 then
domain=left(domain,instr(domain,"/")-1)
end if
on error resume Next
Function iswww(strng)
iswww = false
Dim regEx, Match
Set regEx = New RegExp
regEx.Pattern = "^\w+((-\w+)|(\.\w+))*[A-Za-z0-9]+((\.|-)[A-Za-z0-9]+)*\.[A-Za-z]+$"
regEx.IgnoreCase = True
Set Match = regEx.Execute(strng)
if match.count then iswww= true
End Function
Function GetPage(Path)
t = GetBody(Path)
GetPage=BytesToBstr(t,"UTF-8")
End function
Function GetPage2(Path)
t = GetBody(Path)
GetPage2=BytesToBstr(t,"GB2312")
End function
Function GetBody(url)
on error resume next
Set Retrieval = CreateObject("Microsoft.XMLHTTP")
With Retrieval
.Open "Get", url, False, "", ""
.Send
GetBody = .ResponseBody
End With
Set Retrieval = Nothing
End Function
function fget(str)
select case trim(str)
case ""
fget = "--"
case else
fget = str
end select
end function
Function BytesToBstr(body,Cset)
dim objstream
set objstream = Server.CreateObject("adodb.stream")
objstream.Type = 1
objstream.Mode =3
objstream.Open
objstream.Write body
objstream.Position = 0
objstream.Type = 2
objstream.Charset = Cset
BytesToBstr = objstream.ReadText
objstream.Close
set objstream = nothing
End Function
Function FixStr(ByVal str, ByVal start, ByVal last, ByVal n)
Dim strTemp
On Error Resume Next
If InStr(str, start) > 0 Then
Select Case n
Case 0
strTemp = Right(str, Len(str) - InStr(str, start) - Len(start) + 1)
strTemp = Left(strTemp, InStr(strTemp, last) - 1)
Case Else
strTemp = Right(str, Len(str) - InStr(str, start) + 1)
strTemp = Left(strTemp, InStr(strTemp, last) + Len(last) - 1)
End Select
Else
strTemp = ""
End If
FixStr = strTemp
End Function
Function Comma(str)
If Not(IsNumeric(str)) Or str = 0 Then
Result = 0
ElseIf Len(Fix(str)) < 4 Then
Result = str
Else
Pos = Instr(1,str,".")
If Pos > 0 Then
Dec = Mid(str,Pos)
End if
Res = StrReverse(Fix(str))
LoopCount = 1
While LoopCount <= Len(Res)

TempResult = TempResult + Mid(Res,LoopCount,3)
LoopCount = LoopCount + 3
If LoopCount <= Len(Res) Then
TempResult = TempResult + ","
End If
Wend
Result = StrReverse(TempResult) + Dec
End If
Comma = Result
End Function
Function lens(txt, length)
Dim x, y, ii
txt = Trim(txt)
x = Len(txt)
y = 0
If x >= 1 Then
For ii = 1 To x
If Asc(Mid(txt, ii, 1)) < 0 Or Asc(Mid(txt, ii, 1)) > 255 Then
y = y + 2
Else
y = y + 1
End If
If y >= length Then
txt = Left(Trim(txt), ii-3) & "..."
Exit For
End If
Next
lens = txt
Else
lens = ""
End If
End Function

Url = "http://data.alexa.com/data/?cli=10&dat=snba&ver=7.0&url="&Domain
strPage = GetPage(Url)
set xmldom=server.createobject("MSXML2.DOMDocument")
xmldom.loadXML(strPage)
Set SD = xmldom.documentElement.selectSingleNode("SD")
Set SITE = xmldom.documentElement.selectSingleNode("DMOZ")
Dim ADDR
Dim CREATED
Dim PHONE
Dim OWNER
Dim EMAIL
Dim LANG
Dim LINKSIN
Dim SPEED
Dim POPULARITY
Dim RANK
Dim CHILD
Dim REACH
Set ADDR = SD.selectSingleNode("ADDR")
Set CREATED = SD.selectSingleNode("CREATED")
Set PHONE = SD.selectSingleNode("PHONE")
Set OWNER = SD.selectSingleNode("OWNER")
Set EMAIL = SD.selectSingleNode("EMAIL")
Set LANG = SD.selectSingleNode("LANG")
Set LINKSIN = SD.selectSingleNode("LINKSIN")
Set SPEED = SD.selectSingleNode("SPEED")
Set POPULARITY = SD.selectSingleNode("POPULARITY")
Set RANK = SD.selectSingleNode("RANK")
Set CHILD = SD.selectSingleNode("CHILD")
Set REACH = SD.selectSingleNode("REACH")
Dim SITEINFO
Dim CATS
Dim SiteTitle
Dim SiteDesc
Dim Cat
Set SITEINFO = SITE.selectSingleNode("SITE")
Set CATS = SITEINFO.selectSingleNode("CATS").selectSingleNode("CAT")
SiteTitle = SITEINFO.attributes(1).value
SiteDesc = SITEINFO.attributes(2).value
Cat = CATS.attributes(1).value
Dim COUNTRY
Dim ZIP
Dim STATE
Dim CITY
Dim STREET
STREET = ADDR.attributes(0).value
CITY = ADDR.attributes(1).value
ZIP = ADDR.attributes(2).value
STATE = ADDR.attributes(3).value
COUNTRY = ADDR.attributes(4).value
Dim xDate
Dim xPhone
Dim xOwner
Dim xEmail
Dim xLex
Dim xCode
Dim xLinksin
Dim xSpeed
Dim xPct
Dim xPopularity
Dim xRank
Dim xChild
Dim xReach
xDate = CREATED.attributes(0).value
xPhone = PHONE.attributes(0).value
xOwner = OWNER.attributes(0).value
xEmail = EMAIL.attributes(0).value
xLex = LANG.attributes(0).value
xCode = LANG.attributes(1).value
xLinksin = LINKSIN.attributes(0).value
xSpeed = SPEED.attributes(0).value
xPct = SPEED.attributes(1).value
xPopularity = POPULARITY.attributes(1).value
xPopularity = Comma(xPopularity)
xRank = RANK.attributes(0).value
if instr(xRank,"-")>0 then
dimg = "<img src=""/upload/tech/20091012/20091012012340_7b13b2203029ed80337f27127a9f1d28.gif"" align=absmiddle width=18 height=16 />"
else
dimg = "<img src=""/upload/tech/20091012/20091012012341_b6f0479ae87d244975439c6124592772.gif"" align=absmiddle width=18 height=16 />"
end if
xRank = replace(xRank,"+","")
xRank = replace(xRank,"-","")
xRank = Comma(xRank)
xChild = CHILD.attributes(0).value
xReach = REACH.attributes(0).value
Public Function RemoveHtml(byval strContent)
Dim objReg ,strTmp
If strContent="" OR ISNull(strContent) Then Exit Function
Set objReg=new RegExp
objReg.IgnoreCase =True
objReg.Global=True
objReg.Pattern="<(.[^>]*)>"
strTmp=objReg.Replace(strContent, "")
Set objReg=Nothing
RemoveHtml=strTmp
strTmp=""
End Function
Dim SitePic
Dim pm6,pm3,pm1,pday15,pday7
Dim tmp1
Dim t_arr
Dim t_day,t_wk1,t_m3,t_m3_change
pm6 = "http://traffic.alexa.com/graph?w=700&h=280&r=6m&y=t&u="&Domain
pm3 = "http://traffic.alexa.com/graph?w=700&h=280&r=3m&y=t&u="&Domain
pm1 = "http://traffic.alexa.com/graph?w=700&h=280&r=1m&y=t&u="&Domain
pday15 = "http://traffic.alexa.com/graph?w=700&h=280&r=15.0m&y=t&u="&Domain
pday7 = "http://traffic.alexa.com/graph?w=700&h=280&r=7.0m&y=t&u="&Domain
set tnames = request.cookies("dnames")
if isnull(tnames) or len(trim(tnames))=0 then
tnames = domain&"|"
else
if instr(tnames,domain)>0 then
names = replace(tnames,domain&"|","")
else
tnames = domain&"|"&tnames
end if
end If
ttnames = split(tnames,"|")
tmpncontent = ""
if ubound(ttnames)>5 then
for tat=0 to 4
tmpncontent = tmpncontent&ttnames(tat)&"|"
next
else
tmpncontent=tnames
end If
response.cookies("dnames") = trim(tmpncontent)
response.cookies("dnames").expires = now()+1
%>
<html>
<head>
<title>软晨学习网alexa查询系统,alexa排名查询,alexa网站排名查询,全球alexa排名查询,alexa世界排名查询,alexa排名,alexa工具条,alexa traffic rank,<%=SiteTitle%>,<%=domain%>的Alexa排名查询</title>
<META http-equiv="Content-Type" content="text/html; charset=gb2312">
<META http-equiv="Content-Language" content="gb2312">
<meta http-equiv="Keywords" content="软晨学习网Alexa排名查询,Alexa作弊,Alexa排名,Alexa查询,Alexa信息,排名,流量,访问量,页面浏览量,搜索引擎,<%=SiteTitle%>的Alexa排名信息,<%=domain%>">
<meta name="description" content="www.alixixi.com,软晨学习网alexa查询,alexa排名,alexa排名查询,alexa世界排名查询,alexa 网站排名查询,alexa网站排名,全球alexa排名查询,alexa排名查询,网站alexa排名查询,alexa工具条,alexa中文排名查询,alexa traffic rank,alexa查询,alexa排名" />
<link href="skin/style.css" rel="stylesheet" type="text/css" />
<script language=JavaScript src="/upload/tech/20091012/20091012012341_69cb3ea317a32c4e6143e665fdb20b14.js"></script>
</head>
<body>
<DIV id=lovexin1 class="body" style='Z-INDEX: 10; LEFT: 6px; POSITION: absolute; TOP: 117px; width: 108;'><div style="background:#E8F5FE;height:18px;font-size:12px;font-weight:bold;" onClick='javascript:window.hide()'>最近查询记录</div>
<div><ul> <%
Set fso = CreateObject("Scripting.FileSystemObject")
Set f = fso.OpenTextFile( server.MapPath("cache.asp"), 1, True)
if f.AtEndOfStream=false then
content = f.readline()
end if
f.close
if fso.fileexists(server.MapPath("cache.asp"))=true then
fso.deletefile(server.MapPath("cache.asp"))
end if
Set f = fso.OpenTextFile( server.MapPath("cache.asp"), 8, True)
if isnull(content) or len(trim(content))=0 then
content = domain&"|"
else
if instr(content,domain)>0 then
set content = replace(content,domain&"|","")
else
content = domain&"|"&content
end if
end if
names = split(content,"|")
tmpcontent = ""
for tt=0 to ubound(names)-1
if tt<15 then
tmpcontent = tmpcontent&names(tt)&"|"
end if
%>
<li><a href="Index.asp?url=<%=names(tt)%>" title="www.<%=names(tt)%>"><%=names(tt)%></a></li>
<%
next
f.write(trim(tmpcontent))
f.close
set f = nothing
%>
</ul></DIV>
</DIV>
<DIV id=lovexin2 class="body" style='Z-INDEX: 10; LEFT: 888px; POSITION: absolute; TOP: 117px; width: 108;'><div style="background:#E8F5FE;height:18px;font-size:12px;font-weight:bold;" onClick='javascript:window.hide()'>您关注的站点</div>
<div>
<ul>
<%
for ttt=0 to ubound(ttnames)-1
%>
<li><a href="index.asp?url=<%=ttnames(ttt)%>" title="www.<%=ttnames(ttt)%>"><%=ttnames(ttt)%></a></li>
<%
next
%>
</ul>
</div>
</DIV>
<div class="body" style="padding:5px;margin-top:8px;background-color:#E8F5FE;">
<form action="" method="get" style="padding:0;margin:0;">
Alexa排名查询的网址:http://
<input name="url" type="text" style="width:300px" value="<%=domain%>">
<input type="submit" value="查 询">
</form>
</div>
<div class="th">网站 <%=domain%> 的Alexa排名综合信息</div>
<div class="body" style="padding-top:10px;height:190px;">
<div style="float:left;width:230;text-align:center;">
<!--GOOGLE ADS-->
<div style="margin-top:8px;">
<a href="http://thumbnails.alexa.com/update_thumbnail?url=<%=domain%>" target="_blank">更新缩略图</a> | <a href="http://www.alexa.com/data/details/contact_info?url=<%=domain%>" target="_blank">修改信息</a> | <a href="http://www.alexa.com/data/details/editor?type=rl&url=<%=domain%>" target="_blank">提交链接</a></div>
<!--GOOGLE ADS-->
</div>
<div style="float:right;width:520;text-align:left;">
<div id="siteinfo">
<table width="100%" cellpadding="1" cellspacing="1">
<TR>
<TD width="85" align="right" noWrap bgColor="#f3f8fc">站点名称:</TD>
<TD width="178" title="<%=SiteTitle%>"><a href="http://<%=domain%>" target=_blank><%=SiteTitle%></a></TD>
<TD width="79" align="right" nowrap bgColor="#f3f8fc">网站域名:</TD>
<TD width="163" title="<%=domain%>"><strong><%=domain%></strong></TD>
</TR>
<TR>
<TD align="right" nowrap bgColor="#f3f8fc" title="alexa综合排名">综合排名:</TD>
<TD title="<%=xPopularity%>"><A title="查看Alexa官方信息" href="http://www.alexa.com/data/details/traffic_details?q=&url=<%=domain%>" target="_blank"><%=fget(xPopularity)%></A></TD>
<TD align="right" nowrap bgColor="#f3f8fc" title="三个月的排名变化趋势">排名变化:</TD>
<TD id="NextRank" title="三个月的排名变化趋势"><%=dimg&fget(xRank)%></TD>
</TR>
<TR>
<TD align="right" nowrap bgColor="#f3f8fc">所属国家:</TD>
<TD title="<%=COUNTRY%>"><%=fget(COUNTRY)%></TD>
<TD align="right" nowrap bgColor="#f3f8fc">编码方式:</TD>
<TD title="<%=xCode%>"><%=fget(xCode)%></TD>
</TR>
<TR>
<TD align="right" nowrap bgColor="#f3f8fc">网站站长:</TD>
<TD title="<%=xOwner%>"><%=fget(xOwner)%></TD>
<TD align="right" nowrap bgColor="#f3f8fc">电子信箱:</TD>
<TD title="<%=xEmail%>"><%=fget(xEmail)%></TD>
</TR>
<TR>
<TD align="right" nowrap bgColor="#f3f8fc">访问速度:</TD>
<TD nowrap title="<%=xSpeed%>Ms/<%=xPct%>分"><%=fget(xSpeed)%>Ms/<%=fget(xPct)%>分</TD>
<TD align="right" nowrap bgColor="#f3f8fc">反向链接:</TD>
<TD nowrap title="<%=xLinksin%>"><A href="http://www.alexa.com/data/ds/linksin?q=link:<%=domain%>/&url=<%=domain%>" target="_blank"><%=fget(xLinksin)%></A> 个</TD>
</TR>
<TR>
<TD align="right" nowrap bgColor="#f3f8fc">收录日期:</TD>
<TD nowrap title="<%=xDate%>"><%=fget(xDate)%></TD>
<TD align="right" nowrap bgColor="#f3f8fc">联系电话:</TD>
<TD title="<%=xPhone%>" noWrap><%=fget(xPhone)%></TD>
</TR>
<TR>
<TD align="right" nowrap bgColor="#f3f8fc">详细地址:</TD>
<TD title="<%=STREET%> <%=CITY%>" colSpan="3"><%=fget(lens(STREET&CITY,65))%></TD>
</TR>
<TR>
<TD align="right" nowrap bgColor="#f3f8fc">网站简介:</TD>
<TD title="<%=SiteDesc%>" colSpan="3"><%=fget(lens(SiteDesc,69))%></TD>
</TR>
<TR>
<TD align="right" nowrap bgColor="#f3f8fc">所属目录:</TD>
<TD title="<%=Cat%>" colSpan="3"><%=fget(Cat)%></TD>
</TR>
</table><font color=red>站长推荐:<script type="text/javascript"><!--
google_ad_client = "pub-6261914751398528";
google_ad_output = "textlink";
google_ad_format = "ref_text";
google_cpa_choice = "CAAQyam1_wEaCDco8PXFlDjWKJ2R4YcBMAA";
google_ad_channel = "4401526228";
//-->
</script>
<script type="text/javascript" src="http://pagead2.googlesyndication.com/pagead/show_ads.js">
</script></font></a>
</div>
</div>
</div>
<div class="th">站点 <%=SiteTitle%> 的 Alexa 排名查询结果</div>
<div class="body1">
<div class="x bg2">流量排名数据信息:Traffic Rank for <%=domain%></div>
<div class="mainbar">
<div class="title" style="width:150px">昨日排名</div>
<div class="title" style="width:152px">一周平均</div>
<div class="title" style="width:152px">三月平均</div>
<div class="title" style="width:152px">三月变化趋势</div>
<div class="title2" style="width:152px">综合排名变化</div>
</div>
<div class="mainbar2">
<div id="RankToday" class="title" style="width:150px"><img src="/upload/tech/20091012/20091012012342_28f0b864598a1291557bed248a998d4e.gif" width="16" height="16" border="0"></div>
<div id="RankwkAvg" class="title" style="width:152px"><img src="/upload/tech/20091012/20091012012342_28f0b864598a1291557bed248a998d4e.gif" width="16" height="16" border="0"></div>
<div id="RankmosAvg" class="title" style="width:152px"><img src="/upload/tech/20091012/20091012012342_28f0b864598a1291557bed248a998d4e.gif" width="16" height="16" border="0"></div>
<div id="AllRank" class="title" style="width:152px"><img src="/upload/tech/20091012/20091012012342_28f0b864598a1291557bed248a998d4e.gif" width="16" height="16" border="0"></div>
<div id="RankmosChange" class="title2" style="width:150px"><%=dimg&fget(xRank)%></div>
</div>

<div class="x bg2">每百万人中访问数:Reach for <%=domain%></div>
<div class="mainbar">
<div class="title" style="width:150px">昨日数据</div>
<div class="title" style="width:152px">一周平均</div>
<div class="title" style="width:152px">三月平均</div>
<div class="title" style="width:152px">三月变化趋势</div>
<div class="title2" style="width:152px">综合排名变化</div>
</div>
<div class="mainbar2">
<div id="ReachToday" class="title" style="width:150px"><img src="/upload/tech/20091012/20091012012342_28f0b864598a1291557bed248a998d4e.gif" width="16" height="16" border="0"></div>
<div id="ReachwkAvg" class="title" style="width:152px"><img src="/upload/tech/20091012/20091012012342_28f0b864598a1291557bed248a998d4e.gif" width="16" height="16" border="0"></div>
<div id="ReachmosAvg" class="title" style="width:152px"><img src="/upload/tech/20091012/20091012012342_28f0b864598a1291557bed248a998d4e.gif" width="16" height="16" border="0"></div>
<div id="ReachmosChange" class="title" style="width:152px"><img src="/upload/tech/20091012/20091012012342_28f0b864598a1291557bed248a998d4e.gif" width="16" height="16" border="0"></div>
<div id="ReachAllChange" class="title2" style="width:150px"><img src="/upload/tech/20091012/20091012012342_28f0b864598a1291557bed248a998d4e.gif" width="16" height="16" border="0"></div>
</div>
<div class="x bg2">每访问者浏览页数:Page Views per user for <%=domain%></div>
<div class="mainbar">
<div class="title" style="width:150px">昨日数据</div>
<div class="title" style="width:152px">一周平均</div>
<div class="title" style="width:152px">三月平均</div>
<div class="title" style="width:152px">三月变化趋势</div>
<div class="title2" style="width:152px">综合排名变化</div>
</div>
<div class="mainbar2">
<div id="ViewsToday" class="title" style="width:150px"><img src="/upload/tech/20091012/20091012012342_28f0b864598a1291557bed248a998d4e.gif" width="16" height="16" border="0"></div>
<div id="ViewswkAvg" class="title" style="width:152px"><img src="/upload/tech/20091012/20091012012342_28f0b864598a1291557bed248a998d4e.gif" width="16" height="16" border="0"></div>
<div id="ViewsmosAvg" class="title" style="width:152px"><img src="/upload/tech/20091012/20091012012342_28f0b864598a1291557bed248a998d4e.gif" width="16" height="16" border="0"></div>
<div id="ViewsmosChange" class="title" style="width:152px"><img src="/upload/tech/20091012/20091012012342_28f0b864598a1291557bed248a998d4e.gif" width="16" height="16" border="0"></div>
<div id="ViewsAllChange" class="title2" style="width:150px"><img src="/upload/tech/20091012/20091012012342_28f0b864598a1291557bed248a998d4e.gif" width="16" height="16" border="0"></div>
</div>
</div>
<div class="th"> <%=SiteTitle%> 其它相关Alexa排名的信息统计</div>
<div class="body1">
<div class="x bg2"> <%=SiteTitle%> 下属站点被访问比例</div>
<div class="mainbar">
<div class="title" style="width:374px">子域名</div>
<div class="title2" style="width:374px">访问比例</div>
</div>
<span id="more"><img src="/upload/tech/20091012/20091012012342_28f0b864598a1291557bed248a998d4e.gif" width="16" height="16" border="0"></span>
</div>
<div class="th">网站日平均排名走势图 [点击时间段查看相应时段曲线]</div>
<div class="mainbar">
<div class="title" style="width:150px"><a style="CURSOR: hand" onClick="document.all.rank1.style.display='';document.all.rank2.style.display='none';document.all.rank3.style.display='none';document.all.rank4.style.display='none';document.all.rank5.style.display='none';">六个月数据</a></div>
<div class="title" style="width:152px"><a style="CURSOR: hand" onClick="document.all.rank1.style.display='none';document.all.rank2.style.display='';document.all.rank3.style.display='none';document.all.rank4.style.display='none';document.all.rank5.style.display='none';">三个月数据</a></div>
<div class="title" style="width:152px"><a style="CURSOR: hand" onClick="document.all.rank1.style.display='none';document.all.rank2.style.display='none';document.all.rank3.style.display='';document.all.rank4.style.display='none';document.all.rank5.style.display='none';">一个月数据</a></div>
<div class="title" style="width:152px"><a style="CURSOR: hand" onClick="document.all.rank1.style.display='none';document.all.rank2.style.display='none';document.all.rank3.style.display='none';document.all.rank4.style.display='';document.all.rank5.style.display='none';">半个月数据</a></div>
<div class="title2" style="width:150px"><a style="CURSOR: hand" onClick="document.all.rank1.style.display='none';document.all.rank2.style.display='none';document.all.rank3.style.display='none';document.all.rank4.style.display='none';document.all.rank5.style.display='';">一星期数据</a></div>
</div>
<div class="mainbar2" style="padding:10 0 10 0;height:300px">
<div id=rank1><img src="http://traffic.alexa.com/graph?w=750&h=280&r=6m&y=t&u=<%=domain%>"></div>
<div id=rank2 style="display: none"><img src="http://traffic.alexa.com/graph?w=750&h=280&r=3m&y=t&u=<%=domain%>"></div>
<div id=rank3 style="display: none"><img src="http://traffic.alexa.com/graph?w=750&h=280&r=1m&y=t&u=<%=domain%>"></div>
<div id=rank4 style="display: none"><img src="http://traffic.alexa.com/graph?w=750&h=280&r=15.0m&y=t&u=<%=domain%>"></div>
<div id=rank5 style="display: none"><img src="http://traffic.alexa.com/graph?w=750&h=280&r=7.0&y=t&u=<%=domain%>"></div>
</div>
<div class="th">日平均访问人数走势图 [点击时间段查看相应时段曲线]</div>
<div class="mainbar">
<div class="title" style="width:150px"><a style="cursor: hand" onClick="document.all.reachs1.style.display='';document.all.reachs2.style.display='none';document.all.reachs3.style.display='none';document.all.reachs4.style.display='none';document.all.reachs5.style.display='none';">六个月数据</a></div>
<div class="title" style="width:152px"><a style="cursor: hand" onClick="document.all.reachs1.style.display='none';document.all.reachs2.style.display='';document.all.reachs3.style.display='none';document.all.reachs4.style.display='none';document.all.reachs5.style.display='none';">三个月数据</a></div>
<div class="title" style="width:152px"><a style="cursor: hand" onClick="document.all.reachs1.style.display='none';document.all.reachs2.style.display='none';document.all.reachs3.style.display='';document.all.reachs4.style.display='none';document.all.reachs5.style.display='none';">一个月数据</a></div>
<div class="title" style="width:152px"><a style="cursor: hand" onClick="document.all.reachs1.style.display='none';document.all.reachs2.style.display='none';document.all.reachs3.style.display='none';document.all.reachs4.style.display='';document.all.reachs5.style.display='none';">半个月数据</a></div>
<div class="title2" style="width:150px"><a style="cursor: hand" onClick="document.all.reachs1.style.display='none';document.all.reachs2.style.display='none';document.all.reachs3.style.display='none';document.all.reachs4.style.display='none';document.all.reachs5.style.display='';">一星期数据</a></div>
</div>
<div class="mainbar2" style="padding:10 0 10 0;height:300px">
<div id=reachs1><img src="http://traffic.alexa.com/graph?w=750&h=280&r=6m&y=r&u=<%=domain%>"></div>
<div id=reachs2 style="display: none"><img src="http://traffic.alexa.com/graph?w=750&h=280&r=3m&y=r&u=<%=domain%>"></div>
<div id=reachs3 style="display: none"><img src="http://traffic.alexa.com/graph?w=750&h=280&r=1m&y=r&u=<%=domain%>"></div>
<div id=reachs4 style="display: none"><img src="http://traffic.alexa.com/graph?w=750&h=280&r=15.0m&y=r&u=<%=domain%>"></div>
<div id=reachs5 style="display: none"><img src="http://traffic.alexa.com/graph?w=750&h=280&r=7.0m&y=r&u=<%=domain%>"></div>
</div>
<div class="th">日页面浏览量走势图 [点击时间段查看相应时段曲线]</div>
<div class="mainbar">
<div class="title" style="width:150px"><a style="cursor: hand" onClick="document.all.pageviews1.style.display='';document.all.pageviews2.style.display='none';document.all.pageviews3.style.display='none';document.all.pageviews4.style.display='none';document.all.pageviews5.style.display='none';">六个月数据</a></div>
<div class="title" style="width:152px"><a style="cursor: hand" onClick="document.all.pageviews1.style.display='none';document.all.pageviews2.style.display='';document.all.pageviews3.style.display='none';document.all.pageviews4.style.display='none';document.all.pageviews5.style.display='none';">三个月数据</a></div>
<div class="title" style="width:152px"><a style="cursor: hand" onClick="document.all.pageviews1.style.display='none';document.all.pageviews2.style.display='none';document.all.pageviews3.style.display='';document.all.pageviews4.style.display='none';document.all.pageviews5.style.display='none';">一个月数据</a></div>
<div class="title" style="width:152px"><a style="cursor: hand" onClick="document.all.pageviews1.style.display='none';document.all.pageviews2.style.display='none';document.all.pageviews3.style.display='none';document.all.pageviews4.style.display='';document.all.pageviews5.style.display='none';">半个月数据</a></div>
<div class="title2" style="width:150px"><a style="cursor: hand" onClick="document.all.pageviews1.style.display='none';document.all.pageviews2.style.display='none';document.all.pageviews3.style.display='none';document.all.pageviews4.style.display='none';document.all.pageviews5.style.display='';">一星期数据</a></div>
</div>
<div class="mainbar2" style="padding:10 0 10 0;height:300px">
<div id=pageviews1><img src="http://traffic.alexa.com/graph?w=750&h=280&r=6m&y=p&u=<%=domain%>"></div>
<div id=pageviews2 style="display: none"><img src="http://traffic.alexa.com/graph?w=750&h=280&r=3m&y=p&u=<%=domain%>"></div>
<div id=pageviews3 style="display: none"><img src="http://traffic.alexa.com/graph?w=750&h=280&r=1m&y=p&u=<%=domain%>"></div>
<div id=pageviews4 style="display: none"><img src="http://traffic.alexa.com/graph?w=750&h=280&r=15.0m&y=p&u=<%=domain%>"></div>
<div id=pageviews5 style="display: none"><img src="http://traffic.alexa.com/graph?w=750&h=280&r=7.0m&y=p&u=<%=domain%>"></div>
</div>
<div style="margin-top:12px">
<!--copyright-->
<%timer2 = timer
thetime=cstr(int(((timer2-timer1)*10000 )+0.5)/10)
response.write "本页执行共用了"&thetime&"毫秒"
%>
<br>
Copyright©2006 <a href="http://www.jb51net" target="_blank">ruanchen.com</a> All Rights Reserved 版权所有·软晨学习网
<!--copyright-->
</div>
<script language="javascript" type="text/javascript" src="ajaxloading.asp?url=<%=domain%>&dayrank=<%=xRank%>"></script>
</body>
</html>