📄 help.asp

📁 媒体中国-设计联盟
💻 ASP
字号:
<!--#include file="dbinc/dbpath.asp" -->
<!--#include file="dbinc/fanfuc.inc" -->
<!--#include file="bof.asp" -->
<html>
<head>
<link href="link.css" rel="stylesheet" type="text/css">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>叁鸟设社(中国)打造中国的设计学社</title>
<style type="text/css">
<!--
td {
	font-size: 12px;
}
body {
	font-size: 12px;
}
-->
</style>
</head>
<%
const MaxPrePage=12  '每页显示记录数
if (request.querystring("page")<>"") and (IsNumeric(request.querystring("page"))) then  '检查页号
  intPage=CLng(request.querystring("page"))
else
  intPage=1
end if

strSql="select * from zkpick where picktype="&CLng(request.querystring("type"))
if (request.querystring("type")<>"") and (IsNumeric(request.querystring("type"))) then  '检查是否等级分类
  inttype=CLng(request.querystring("type"))
  strSql=strSql& " and picktype="&CLng(request.querystring("type"))
else
strSql="select * from zkpick"
end if
strSql=strSql&" order by pickvisitor desc,pickvote desc,pickid asc"

%>
<%
Sub DisplayPagelinks(rs,intPage,intType)   '页面导航条
if not(request.querystring("type")<>"") and (IsNumeric(request.querystring("type")))  then 
Response.Write("全部网站")
else
response.write "<font size=0>共"&rs.RecordCount&"个"&typestr&"网站</font> "
end if

if  intPage>1 then
  if intType<>0 then
    response.write "<a href="""&request.ServerVariables("SCRIPT_NAME")&"?type="&intType&"&page=1"">首页</a> "
    response.write "<a href="""&request.ServerVariables("SCRIPT_NAME")&"?type="&intType&"&page="&intPage-1&"""><font size=0>上一页</font></a> "    
  else
    response.write "<a href="""&request.ServerVariables("SCRIPT_NAME")&"?page=1""><font size=0>首页</font></a> "
    response.write "<a href="""&request.ServerVariables("SCRIPT_NAME")&"?page="&intPage-1&"""><font size=0>上一页</font></a> "
  end if
else
  response.write "<font size=0>首页 </font>"  
  response.write "<font size=0>上一页 </font>"
end if

if intPage < rs.PageCount then
  if intType<>0 then
    response.write "<a href="""&request.ServerVariables("SCRIPT_NAME")&"?type="&intType&"&page="&intPage+1&"""><font size=0>下一页</font></a> "
    response.write "<a href="""&request.ServerVariables("SCRIPT_NAME")&"?type="&intType&"&page="&rs.PageCount&"""><font size=0>尾页</font></a> "
  else
    response.write "<a href="""&request.ServerVariables("SCRIPT_NAME")&"?page="&intPage+1&"""><font size=0>下一页</font></a> "
   response.write "<a href="""&request.ServerVariables("SCRIPT_NAME")&"?page="&rs.PageCount&"""><font size=0>尾页</font></a> "
  end if
else
  response.write "<font size=0>下一页</font> "
  response.write "<font size=0>尾页 </font>"
end if

'-------------------------------
End Sub
%> 
<body bgcolor="#CCCCCC" leftmargin="0" topmargin="0">
<table width="100%" height="539" border="0" cellspacing="0">
  <tr> 
    <td width="181" height="539" valign="top"> 
      <table width="100%" border="0" cellspacing="0">
        <tr> 
          <td><img src="images/pi8.gif" width="174" height="20"></td>
        </tr>
        <tr> 
          <td height="30"><div align="center"><a href="type.asp?type=1">个性站点</a><br>
              <br>
              <a href="type.asp?type=3">艺术设计</a><br>
              <br>
              <a href="type.asp?type=4">建站资源</a><br>
              <br>
              <a href="type.asp?type=4">商业咨询</a><br>
              <br>
              <a href="type.asp?type=5">娱乐生活</a><br>
              <br>
              <a href="type.asp?type=6">其它分类 </a></div></td>
        </tr>
        <tr> 
          <td>&nbsp;</td>
        </tr>
        <tr> 
          <td><img src="images/pi15.gif" width="174" height="20"></td>
        </tr>
        <tr> 
          <td>&nbsp;</td>
        </tr>
        <tr> 
          <td><img src="images/pi10.gif" width="174" height="20"></td>
        </tr>
        <tr> 
          <td><textarea style="FONT-SIZE: 8pt; FONT-FAMILY: Tahoma; BACKGROUND-COLOR: transparent" onMouseOver=this.focus() onFocus=this.select() name="yy-s Codes" rows=4 cols=30>&lt;!-- 媒体中国(设计联盟) --&gt;
&lt;script src="http://www.3niao.com/pick/list.asp?id=联盟认证ID号"&gt;&lt;/script&gt;
&lt;!-- 媒体中国(设计联盟) --&gt;</textarea></td>
        </tr>
        <tr> 
          <td>&nbsp;</td>
        </tr>
        <tr> 
          <td><img src="images/pi9.gif" width="174" height="20"></td>
        </tr>
        <tr> 
          <td><br>
            旧版图标</td>
        </tr>
        <tr> 
          <td><img src="image/logo.gif" width="88" height="31"></td>
        </tr>
        <tr> 
          <td><br>
            新版图标 </td>
        </tr>
        <tr> 
          <td><img src="image/3.gif" width="88" height="31"></td>
        </tr>
      </table> </td>
    <td width="1" valign="top" bgcolor="#000000">&nbsp;</td>
    <td width="630" valign="top"><div align="center"> 
        <table width="100%" border="0" align="center" cellpadding="10" cellspacing="0" >
          <tr> 
            <td height="10" valign="top" bgcolor="#999999" ><div align="center"><font color="#cc0011"><strong>媒体中国(设计联盟) 
                认 证 代 码 帮 助</strong></font></div></td>
          </tr>
          <tr> 
            <td height="440" valign="top" bgcolor="#CCCCCC"> 
              <div align="left">
<p>　　 <strong>媒体中国(设计联盟)认证代码如下：</strong></p>
              </div>
              <blockquote> 
                <div align="left">&lt;!-- 媒体中国(设计联盟) --&gt;<br>
                  &lt;script src='http://www.3niao.com/pick/list.asp?id=联盟认证ID号'&gt;&lt;/script&gt;</div>
                <div align="left">&lt;!-- 媒体中国(设计联盟) --&gt;</div>
              </blockquote>
              <div align="left"> 
                <p>　　 <strong>媒体中国(设计联盟)LOGO链接代码：</strong></p>
                <p>　　 </p>
                <p>　　 &lt;a href=&quot;http://www.3niao.com/pick/&quot; target=&quot;_blank&quot;&gt;&lt;img 
                  src=http://www.3niao.com/2004/2004.gif&quot; width=&quot;88&quot; 
                  height=&quot;31&quot; border=&quot;0&quot; alt= &quot;媒体中国(设计联盟)&quot;&gt;&lt;/a&gt;</p>
                <p>&nbsp;</p>
                <p>　　 <strong>媒体中国(设计联盟)文字链接代码：</strong></p>
                <p>　　</p>
                <p>　　 &lt;a href=&quot;http://www.3niao.com/pick/&quot; target=&quot;_blank&quot;&gt; 
                  媒体中国(设计联盟)&lt;/a&gt;</p>
                <p>　　 </p>
                <p>　　 欢迎联系交换链接，请到本站留言本提出要求及贵站的链接代码，欢迎同类网站合作交流！</p>
                <p>&nbsp;</p>
                <p>&nbsp;</p>
              </div></td>
          </tr>
        </table>
      </div></td>
    <td width="1" valign="top" bgcolor="#000000">&nbsp;</td>
    <td width="174" valign="top"><table width="100%" border="0" cellspacing="0">
        <tr> 
          <td><img src="images/pi11.gif" width="174" height="20"></td>
        </tr>
        <tr> 
          <td><div align="right"> 
              <table width="90%" border="0" cellspacing="0" cellpadding="0">
                <tr> 
                  <td><p align="left"> 
                      <% 
set rs=createobject("adodb.recordset")
'rs.open "select pickid,picksite,pickvisitor from zkpick where pickgrade=1 order by pickid desc",conn       
 rs.open "select pickid,picksite,pickvisitor from zkpick order by pickid desc",conn       
for i=1 to 5 step 1 
    
response.write ("   ::  <a href='show.asp?id="&rs("pickid")&"'>"&rs("picksite")&"</a>  <font color=#000000>"&rs("pickvisitor")&"℃</font>")       
%>
                    </p>
                    <p align="left"> 
                      <% 
rs.movenext 
if rs.eof then exit for 
next
rs.close       
set rs=nothing 
%>
                    </p></td>
                </tr>
              </table>
            </div></td>
        </tr>
        <tr> 
          <td><div align="right"><a href="grade.asp">[更多站点...]<br>
              <br>
              </a> </div></td>
        </tr>
        <tr> 
          <td><img src="images/pi12.gif" width="174" height="20"></td>
        </tr>
        <tr> 
          <td><table width="90%" border="0" cellspacing="0" cellpadding="0">
              <tr> 
                <td><p align="left"> 
                    <% 
strSql="select pickid,picksite,pickvisitor from zkpick "
strSql=strSql&" order by pickvisitor desc,pickvote desc,pickid asc"
set rs=createobject("adodb.recordset") 
rs.open strSql,conn
for i=1 to 5 step 1 
response.write ("   ::  <a href='show.asp?id="&rs("pickid")&"'>"&rs("picksite")&"</a> <font color=#000000>"&rs("pickvisitor")&"℃</font>")       
%>
                  </p>
                  <p align="left"> 
                    <% 
rs.movenext 
if rs.eof then exit for 
next
rs.close       
set rs=nothing 
%>
                  </p></td>
              </tr>
            </table></td>
        </tr>
        <tr> 
          <td><div align="right"><a href="gtop.asp">[更多站点...]<br>
              <br>
              </a></div></td>
        </tr>
        <tr> 
          <td><img src="images/pi14.gif" width="174" height="20"></td>
        </tr>
        <tr> 
          <td><table width="90%" border="0" cellspacing="0" cellpadding="0">
              <tr> 
                <td><p align="left"> 
                    <% 
set rs=createobject("adodb.recordset")
rs.open "select pickid,picksite,pickvisitor from zkpick where pickgrade=1 order by pickid desc",conn       
for i=1 to 5 step 1 
response.write ("   ::  <a href='show.asp?id="&rs("pickid")&"'>"&rs("picksite")&"</a>  <font color=#000000>"&rs("pickvisitor")&"℃</font>")       
%>
                  </p>
                  <p align="left"> 
                    <% 
rs.movenext 
if rs.eof then exit for 
next
rs.close       
set rs=nothing 
%>
                  </p></td>
              </tr>
            </table></td>
        </tr>
        <tr> 
          <td><div align="right"><a href="grade.asp?gd=1">[更多站点...]<br>
              <br>
              </a></div></td>
        </tr>
        <tr> 
          <td><img src="images/pi16.gif" width="174" height="20"></td>
        </tr>
        <tr> 
          <td align="center" valign="middle"> <div align="center"><a href="login.asp"><font color="#FF9900"> <font color="#000000"><a href="join.asp"> 
              <font color="#993300">申请加盟</font></a> 用户登录</font></font></a> <font color="#000000"><a href="news.asp">发布新闻</a> 
              </font> </div></td>
        </tr>
        <tr> 
          <td>&nbsp;</td>
        </tr>
        <tr> 
          <td><img src="images/pi13.gif" width="174" height="20"></td>
        </tr>
        <tr> 
          <td>&nbsp;</td>
        </tr>
        <tr> 
          <td><a href="mailto:webmaster@3niao.com">联系我们成为合作伙伴</a></td>
        </tr>
        <tr> 
          <td>&nbsp;</td>
        </tr>
      </table></td>
  </tr>
</table>
</body>
</html>
<!--#include file=eof.asp-->
⌨️ 快捷键说明

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