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

📄 index_mb.asp

📁 网吧影印系统!很详细!可直接使用!请大家指点!
💻 ASP
📖 第 1 页 / 共 2 页
字号:
<A href="search.asp?keyword=朱茵" class="left"><IMG height=10 border="0" src="../images/shexiangji.gif" width=21>&nbsp;朱茵</A></td><td heigth=30>
<A href="search.asp?keyword=章子怡" class="left"><IMG height=10 border="0" src="../images/shexiangji.gif" width=21>&nbsp;章子怡</A></td></tr>
</table>
</td> </tr>
            </table></td>
          <td width="156" bgcolor="#C3EF26"> <table width="156" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr> 
    <td align="center"><img src="../images/service-001.gif"></td>
  </tr>
  <tr> 
    <td align="center" background="../images/service-002.gif"  ><table width="80%" border="0">
        <tr><%
sql="select articleid,domurl,title,content from learning where firstbest=1 order by articleid desc"
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,1,1
b=0
row_count=1
                    %> <%
          do while not rs.eof
          b=b+1%>          <td align="center"><span lang="zh-cn">
                            <a href="../html/<%=rs("articleid")%>.html" target="_blank">
                            <img border="0" height="131" src="<%if rs("domurl")="" then%>../images/nopic.gif<%else%><%=rs("domurl")%><%end if%>" width="111"></a></span></td>
        </tr>
 <% if row_count mod 1 =0 then%>
        <tr>
          <td align="center"><a href="../html/<%=rs("articleid")%>.html" class="left">
                            <%content=rs("title")
                          if len(content)>8 then content=left(content,8)&"…"
                          response.write content
                            %></a></td>
                                  <%end if%>
                  <%row_count=row_count+1
	      if b>=1 then exit do
	      rs.movenext
	      loop
	      rs.close
          set rs=nothing%> 
        </tr>
      </table>
                </td>
  </tr>
  <tr> 
    <td align="center"><img src="../images/service-003.gif"></td>
  </tr>
  <tr> 
    <td align="center" background="../images/service-002.gif"  >
    <table width="100%" border="0" height="62">
        <tr><TD align=middle><STRONG><FONT color=#3c5b17>&lt;&lt; 在线支付</FONT></STRONG></TD>
              </tr>
        <tr><TD align=middle>
                      <STRONG><FONT color=#3c5b17>&lt;&lt; 手机支付</FONT></STRONG></TD>
              </tr>
        <tr><TD align=middle>
                      <STRONG><FONT color=#3c5b17>&lt;&lt; 声讯支付</FONT></STRONG></TD>
              </tr>
      </table>
      <img src="../images/service-005.gif" width="156" height="19"></td>
  </tr>
  <tr> 
    <td height="10" align="center" bgcolor="#C3EF26"><img src="../images/spacer.gif" width="1" height="1"></td>
  </tr>
</table>
 </td>
        </tr>
      </table>
    </td>
  </tr>
</table>
<table width="778" height="10" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#C3EF29">
  <tr valign="top" > 
    <td width="778" background="../images/gerr-bg.gif" ><img src="../images/gerr-bg.gif" width="6" height="10">
   </td></tr>
</table>

<table width="778" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#EDFFAB">
<tr><td width="778" valign="top" >
<TABLE width=100% border=0 cellPadding=0 cellSpacing=0 >
<td width=162  >

<TABLE width=162 border=0 cellPadding=0 cellSpacing=0 bgcolor="#C3EF29">
        <TR>
          <TD><IMG height=29 src="../images/lefttopmedai.gif" width=162></TD>
        </TR>
        <TR> 
          <TD align="center"><table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" width="100%" id="AutoNumber6">
<script src=../js/news.js></script>
            </table></TD>
        </TR>
      </TABLE> 
<TABLE width=162 border=0 cellPadding=0 cellSpacing=0 bgcolor="#C3EF29">
  <TR> 
    <TD><IMG height=29 src="../images/lefttophits.gif" width=162></TD>
  </TR>
        <TR> 
          <TD align="center">
        <table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" width="100%" id="AutoNumber6">
        <%Set rst= Server.CreateObject("ADODB.Recordset")
          rst.open "select articleid,title,hits from learning order by hits desc",conn,1,1
                      i=0
                      do while not rst.eof
                      i=i+1
                      %><tr> 
          <td width="132" height="18">&nbsp;<a href="../html/<%=rst("articleid")%>.html" class="left"><%content=rst("title")
                          if len(content)>8 then content=left(content,8)&"…"
                          response.write content
                            %></a></td>
          <td width="34"> <p align="left"><font class="eng_S" color="3B591B1"> 
<%=rst("hits")%></font> </td>
        </tr><% 
                        if i>=12 then exit do
                        rst.movenext
                        loop
                        rst.close
                        set rst=nothing
                        %>
</table></TD></TR>
</TABLE>

<TABLE border=0 cellPadding=0 cellSpacing=0 width=162 bgcolor="#C3EF29">
                <TR>
                  <TD >
        <TABLE border=0 cellPadding=0 cellSpacing=0 height=26 width="100%">
                        <TR>
                          <TD align=right width=30><img src="../images/leftservice.gif"   width="162" height="29"></TD>
                        </TR>
                  </TABLE></TD>
                </TR>
                <TR>
                  <TD >
                    <TABLE align=center border=0 cellPadding=0 cellSpacing=0 width="94%" >
                        <TR>
                          <TD ><font color=#3B591B>
			客服:0000000<BR>时间:9:30-22:00<br>
			邮件:dai035@163.com<br>
			MSN:88888@123.com<br>
                        客服QQ:有问题请留言<br>
                        技术QQ:149598016<BR>
                        点播QQ:5749018</font></TD>
                        </TR>
                  </TABLE></TD>
                </TR>
            </TABLE></td>

      <TABLE border=0 cellPadding=0 cellSpacing=0 width=162 bgcolor="#C3EF29">
          <TR>
            <TD >
              <TABLE border=0 cellPadding=0 cellSpacing=0 height=26 width="100%">
                <TBODY>
                  <TR>
                    <TD align=right width=40><img src="../images/leftservice.gif" width="162" height="29"></TD>
                  </TR>
                </TBODY>
            </TABLE></TD>
          </TR>
          <TR>
            <TD>
              <TABLE align=center border=0 cellPadding=0 cellSpacing=0 width="95%">
                <TBODY>
                  <TR>
                    <TD><A class=left href="faq.asp" target=_blank>为什么我登录时提示我输入的附加码错误?</A></TD>
                  </TR>
                  <TR>
                    <TD background="images/mediaxx2.gif" height=1><IMG height=1 src="images/mediaxx2.gif" width=3></TD>
                  </TR>
                  <TR>
                    <TD><A class=left href="faq.asp" target=_blank>我是付费会员,为什么登录后提示影币为零?</A></TD>
                  </TR>
                  <TR>
                    <TD background="images/mediaxx2.gif"  height=1><IMG height=1 src="images/mediaxx2.gif" width=3></TD>
                  </TR>
                  <TR>
                    <TD><A class=left href="faq.asp" target=_blank>为什么我登录后当点播或下载时还跳出登录页?</A></TD>
                  </TR>
                  <TR>
                    <TD background="images/mediaxx2.gif" height=1><IMG height=1 src="images/mediaxx2.gif" width=3></TD>
                  </TR>
                  <TR>
                    <TD><A class=left href="faq.asp"  target=_blank>点播或下载时失败会不会被重复扣点?</A></TD>
                  </TR>
                  <TR>
                    <TD background="images/mediaxx2.gif" height=1><IMG height=1 src="images/mediaxx2.gif" width=3></TD>
                  </TR>
                  <TR>
                    <TD align=right><A class=left href="faq.asp" target=_blank>更多问答&gt;&gt;</A></TD>
                  </TR>
                </TBODY>
            </TABLE></TD>
          </TR>
      </TABLE>

</td>

<td width=616 valign="top" >
<table border="0" width="606" cellspacing="0" align="center" cellpadding="0" id="table24" height="1">
                  <tr>
                    <td height="107">
                    <table border="0" width="97%" cellspacing="0" align="center" cellpadding="0" id="table30" height="1">
                      <tr>
                        <td height=40 width="606" background="../images/listmovie.gif">
	                &nbsp;&nbsp;&nbsp;<font color=#ff0000 size=3><b>影片分类</b>&gt;&gt;</font></td>
                      </tr>
                      <tr>
                        <td height="64" valign="top">
                        <table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#C3EF26" width="606" id="AutoNumber1" height="26">
                          <tr>
                            <td width="606" background="../images/ypfl_6.jpg" height="66">
                            <table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#C3EF26" width="606" id="AutoNumber1" >
  <tr>
    <td>
  <table border="1" cellPadding="0" cellSpacing="0" width="606" height="30" style="border-collapse: collapse" bordercolor="#C3EF26" >  
<% set rs=server.createobject("adodb.recordset")
rs.open "select type,typeid from type",conn,1,1
do while not rs.eof
typeid=rs("type")%><tr>
    <td width="90" height="62.5" valign="middle" bordercolorlight="#C3EF26" bordercolordark="#D2D2D2">
    <p align="center"><a href="../mlist/<%=rs("typeid")%>_1.html" class="left"><%=rs("type")%></a></td>
    <td width="515" valign="top" height="63" bgcolor="#FFFFFF">
    <table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#FFFFFF" width="515" id="AutoNumber1">
      <tr><%set rst=server.createobject("adodb.recordset")
      sql="select articleid,title,typeid from learning where typeid='"&typeid&"' and  canlook<>3 order by articleid desc"
      rst.open sql,conn,1,1
      if rst.eof and rst.bof then
         response.write""
      else
      dim row_count2
	  row_count2=1
      do while not rst.eof%>
<td width="135" height="15" bgcolor="#FFFFFF">
<a href="../html/<%=rst("articleid")%>.html" class="left"><%content=rst("title")
if len(content)>9 then content=left(content,9)&"…"
response.write content%></a></td><% if row_count2 mod 4 =0 then%></tr><%
      end if
      row_count2=row_count2+1
      if row_count2>16 then exit do
      rst.movenext
      loop
      end if%></table>
    </td>
  </tr>
  <%rs.movenext
    loop
rs.close
	   set rs=nothing
	   conn.close
	   set conn=nothing
%>
  
</table>
</td>
</tr>
</table></td>
  </tr>
</table></td>
                          </tr>
                          <tr>
                            <td >
                            <img border="0" src="../images/mediaend.gif" width="606" ></td>
                          </tr>

</td></tr></table>

</td>

</table></td></tr>


</table>
<table width="778" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr> 
    <td><img src="../images/end-gree.gif" width="778" height="10"></td>
  </tr>
</table>
<TABLE height=46 cellSpacing=0 cellPadding=0 width=778 align=center border=0>
  <TBODY>
    <TR> 
      <TD bgColor=#b4d541 height=5></TD>
    </TR>
    <TR> 
      <TD height="49" align=middle bgColor=#c3ef29><FONT 
      color=#3b591b>注:本程序可提供下载 有需要请致电 E_mail:dai035@163.com<br>本站影视来源于互联网和会员交流,仅供宽带网用户测试,影片版权归相关影音公司所有 客服QQ:</FONT><font color="#3B591B">149598016</font></TD>
    </TR>
  </TBODY>
</TABLE>
<iframe border=0 name=main marginwidth=1 marginheight=1 src="incRefresh.asp" frameborder=0  width=0 scrolling=no height=0></iframe>
</BODY></HTML>

⌨️ 快捷键说明

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