源码网商城,靠谱的源码在线交易网站 我的订单 购物车 帮助

源码网商城

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

  • 时间:2021-06-06 21:10 编辑: 来源: 阅读:
  • 扫一扫,手机访问
摘要:[asp]阿里西西的alexa采集效果代码
我想这个系统现在在网上或源码站几乎是没有可用的程序。 提供下载的都是以前的老版本,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 = "jb51.net" If Not iswww(domain) Then response.write "<script>alert('您输入的网址无效,请重新输入!')</script>" domain = "jb51.net" End if host = "jb51.net" 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=""skin/up_arrow.gif"" align=absmiddle width=18 height=16 />" else dimg = "<img src=""skin/down_arrow.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="js/scroll.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="skin/loading.gif" width="16" height="16" border="0"></div>     <div id="RankwkAvg" class="title" style="width:152px"><img src="skin/loading.gif" width="16" height="16" border="0"></div>     <div id="RankmosAvg" class="title" style="width:152px"><img src="skin/loading.gif" width="16" height="16" border="0"></div>     <div id="AllRank" class="title" style="width:152px"><img src="skin/loading.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="skin/loading.gif" width="16" height="16" border="0"></div>     <div id="ReachwkAvg" class="title" style="width:152px"><img src="skin/loading.gif" width="16" height="16" border="0"></div>     <div id="ReachmosAvg" class="title" style="width:152px"><img src="skin/loading.gif" width="16" height="16" border="0"></div>     <div id="ReachmosChange" class="title" style="width:152px"><img src="skin/loading.gif" width="16" height="16" border="0"></div>     <div id="ReachAllChange" class="title2" style="width:150px"><img src="skin/loading.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="skin/loading.gif" width="16" height="16" border="0"></div>     <div id="ViewswkAvg" class="title" style="width:152px"><img src="skin/loading.gif" width="16" height="16" border="0"></div>     <div id="ViewsmosAvg" class="title" style="width:152px"><img src="skin/loading.gif" width="16" height="16" border="0"></div>     <div id="ViewsmosChange" class="title" style="width:152px"><img src="skin/loading.gif" width="16" height="16" border="0"></div>     <div id="ViewsAllChange" class="title2" style="width:150px"><img src="skin/loading.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="skin/loading.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">jb51.Net</a> All Rights Reserved 版权所有·编程素材网   <!--copyright--> </div> <script language="javascript" type="text/javascript" src="ajaxloading.asp?url=<%=domain%>&dayrank=<%=xRank%>"></script> </body> </html>
  • 全部评论(0)
联系客服
客服电话:
400-000-3129
微信版

扫一扫进微信版
返回顶部