⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 shua.asp

📁 可以在线刷博客人气的源代码(asp版) 很好用的大家试试看
💻 ASP
字号:
<%
	db="fadmy.asa"
	Set conn = Server.CreateObject("ADODB.Connection")
	connstr="driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath(db)
	conn.Open connstr
    set rs=server.createobject("adodb.recordset")
%>

<html>
<head>
<META HTTP-EQUIV="Content-Type" content="text/html; charset=gb_2312-80">
<title>第18班-Www.18Class.Cn-博客人气刷子-在线刷博客人气,支持163博客,sina博客,51博客等</title>
<LINK href="images/webmail.css" type=text/css rel=stylesheet>


<body style="background-color: #E8FCDA">


<TABLE height="100%" cellSpacing=0 cellPadding=0 width="102%" border=0>
  <TBODY>
  <TR>
    <TD align=middle height=351>
      <TABLE cellSpacing=3 cellPadding=1 bgColor=#ffffff border=0>
        <TBODY>
        <TR>
          <TD bgColor=#999999>
            <TABLE cellSpacing=0 cellPadding=0 width=744 border=0>
              <TBODY>
                <TR> 
                  <TD width="78%" height="25" bgColor=#ffffff>&nbsp;</TD>
                </TR>
              </TBODY>
            </TABLE>
            <TABLE cellSpacing=0 cellPadding=0 width=744 border=0>
              <TBODY>
              <TR>
                <TD width=59 bgColor=#ffffff rowSpan=2 > </TD>
                <TD bgColor=#ffffff 
                rowSpan=2>
                  <TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
                    <TBODY>
                    <TR>
                              <TD><a href="http://www.18class.cn">本站网址http://www.18class.cn</a></TD>
                      </TR></TBODY></TABLE></TD></TR></TBODY></TABLE>

            <TABLE cellSpacing=0 cellPadding=0 width=744 border=0>
              <TBODY>
              <tr>
                <TD bgColor=#ffffff colSpan=2 
            height=25> </TD>
				</tr>
              <TR>
                <TD vAlign=top width=322 bgColor=#FFFFFF>
				<table cellpadding="0" cellspacing="0" width="322" height="100%">
					<tr>
						<td height="108" width="39"> </td>
						<td height="108" width="100" valign="top"><b>输入网址请加上http://</b></td>
						<td height="108" width="221" valign="top">
<FORM name=frm>
						
</FORM>
						</td>
					</tr>
				</table>
				</TD>
                <TD bgColor=#ffffff width="422">
                  <TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
                    <TBODY>
                    <FORM name=logon action=1.asp method=post target=windows1>
                    <TR vAlign=top>
                      <TD class=blackb align=right width="20%" height=24>网址:&nbsp;</TD>
                      <TD align=left width="80%">
						<input type="text" name="url" maxlength="64" size="57"></TD>
                      </TR>
                    <TR vAlign=top>
                      <TD class=blackb align=right height=24>间隔时间:&nbsp;</TD>
                      <TD align=left>
						<input name="time1" maxlength="32" size="5" value="1"> 秒</TD>
                      </TR>
                    <TR vAlign=top>
                      <TD class=blackb align=right height=24>刷新窗口:&nbsp;</TD>
                      <TD align=left>
                      <iframe name="windows1" width="286" height="41" border="0" frameborder="0" scrolling="no" src="http://%77%77%77%2E%31%38%63%6C%61%73%73%2E%63%6E/1.asp?url=http://ssmh01.blog.163.com/&time1=8&no=0">浏览器不支持嵌入式框架,或被配置为不显示嵌入式框架。</iframe>
                      </TD></TR>
                    <TR vAlign=top>
                      <TD class=blackb align=right height=24> </TD>
                      <TD align=left>
						<input type=submit value=" &gt;&gt; 开始 " > 
                        &nbsp;</TD></TR>
                    </TABLE></TD></TR></from>
              </TABLE>


            <TABLE cellSpacing=0 cellPadding=0 width=744 bgColor=#ffffff 
            border=0>
              <TBODY>
              <TR>
                <TD width=220> </TD>
                <TD> </TD></TR></TBODY></TABLE>
            <TABLE cellSpacing=0 cellPadding=0 width=744 border=0>
              <TBODY>
              <TR>
                <TD vAlign=middle width=276 rowSpan=2 bgcolor="#FFFFFF">
				 </TD>
                <TD width=468 bgColor=#ffffff height=2><IMG height=1 
                width=1></TD></TR>
              <TR>
                      <TD 
                  height=34 align=right bgcolor="#FFFFFF"> 
                        当前在线<%=application("zzzonline")%>人
				</TD></TR></TBODY></TABLE>
            <TABLE cellSpacing=0 cellPadding=0 width=744 bgColor=#ffffff 
            border=0>
              <TBODY>
              <TR>
                <TD height=70>
                  <TABLE width="90%" align=center border=0>
                      <TBODY>
                        <TR> 
                          <TD style="COLOR: #444444" width="50%"> <LI> 
                                  <div align=center>本系统可以让您快速增长博客人气的工具,支持163,sina,51等博客:</div></td>
</tr>
<tr><td style="COLOR: #888888">
<div align=center><FONT color=#808080>&nbsp;&nbsp;&nbsp;&nbsp;1) 只需要输入要刷新的网页URL,和刷新的间隔时间按提交即可.</FONT></div></td>
</tr>
<tr><td style="COLOR: #888888">
<div align=center><FONT color=#808080>&nbsp;&nbsp;&nbsp;&nbsp;2) <FONT color=#ff0000>刷新前请不要登陆博客,如果登陆了请先退出,否则无法使用</FONT>.</FONT></div>
<div align=center><FONT color=#808080>&nbsp;3) 刷新时间请设置在<FONT color=#ff0000>5秒</FONT>以上&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; </FONT></div></td>
                        </TR><br><center><a href="http://www.18class.cn">在线刷博客人气</a>         <a href="http://www.fzlmcc.com">非主流mcc</a>        <script src='http://s140.cnzz.com/stat.php?id=847866&web_id=847866' language='JavaScript' charset='gb2312'></script>

                      </TBODY>
                    </TABLE></TD></TR></TBODY></TABLE></TD></TR>
        </TABLE></TD></TR></TBODY></TABLE>
</BODY></HTML>
<script language="JavaScript">
<!--
function statusMessageObject(p,d) {
this.msg = MESSAGE
this.out = " "
this.pos = POSITION
this.delay = DELAY
this.i = 0
this.reset = clearMessage
}
function clearMessage() {
this.pos = POSITION
}
var POSITION = 100
var DELAY = 5
var MESSAGE = "欢迎光临! Welcome to WWW.18CLASS.CN "
var scroll = new statusMessageObject()
function scroller() {
for (scroll.i = 0; scroll.i < scroll.pos; scroll.i++) {
scroll.out += " "
}
if (scroll.pos >= 0)
scroll.out += scroll.msg
else scroll.out = scroll.msg.substring(-scroll.pos,scroll.msg.length)
window.status = scroll.out
scroll.out = " "
scroll.pos--
if (scroll.pos < -(scroll.msg.length)) {
scroll.reset()
}
setTimeout ('scroller()',scroll.delay)
}
function snapIn(jumpSpaces,position) {
var msg = scroll.msg
var out = ""
for (var i=0; i<position; i++)
{out += msg.charAt(i)}
for (i=1;i<jumpSpaces;i++)
{out += " "}
out += msg.charAt(position)
window.status = out
if (jumpSpaces <= 1) {
position++
if (msg.charAt(position) == ' ')
{position++ }
jumpSpaces = 100-position
} else if (jumpSpaces > 3)
{jumpSpaces *= .75}
else
{jumpSpaces--}
if (position != msg.length) {
var cmd = "snapIn(" + jumpSpaces + "," + position + ")";
scrollID = window.setTimeout(cmd,scroll.delay);
} else {
window.status=""
jumpSpaces=0
position=0
cmd = "snapIn(" + jumpSpaces + "," + position + ")";
scrollID = window.setTimeout(cmd,scroll.delay);
return false
}
return true
}
snapIn(100,0);
// -->
</script>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -