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

📄 index.asp

📁 增添网站节日气氛
💻 ASP
字号:
<!--#include file="top.asp"-->

<TABLE cellSpacing=0 cellPadding=0 width=1002 align=center border=0>
  <TBODY>
  <TR>
    <TD vAlign=top align=middle 
    background=images/bj01.jpg>
      <TABLE cellSpacing=0 cellPadding=0 width=924 align=center border=0>
        <TBODY>
        <TR>
          <TD width=8 height=249 rowSpan=2></TD>
          <TD width=907 
          height=275 align=middle vAlign=top 
          background=images/bj.jpg>
            <TABLE cellSpacing=0 cellPadding=0 width="95%" align=center 
border=0>
              <TBODY>
              <TR>
                <TD vAlign=top align=middle width=261 height=683>
                  <TABLE cellSpacing=0 cellPadding=0 width=216 align=center 
                  border=0>
                    <TBODY>
                    <TR>
                      <TD class=m1 align=middle 
                      background=images/bj_1.jpg 
                      height=30><SPAN 
                    class=style01>今天是:<%Response.Write FormatDateTime(Date(),1) %></SPAN></TD></TR></TBODY></TABLE>
                  <br>
                                 <%
			set rs_pro =  server.CreateObject("adodb.recordset")
			rs_pro.open"select * from bigClass  order by BigClassid ",conn,1,3
		%>
              <%
				do while not rs_pro.eof
			%>   
                  <TABLE class=style02 cellSpacing=0 cellPadding=0 width=176 
                  align=center border=0>
                    <TBODY>
                    <TR>
                      <TD class=STYLE1 align=middle 
                      background=images/bj_l.jpg height=36>
                        <TABLE cellSpacing=0 cellPadding=0 width="80%" 
                          border=0><TBODY>
                          <TR>
                            <TD align=left width="31%" height=20></TD>
                            <TD align=left width="60%"><STRONG><A class=m1 
                              href="product.asp?bigClassName=<%=rs_pro("bigClassName")%>"><%=rs_pro("bigClassName")%></A></STRONG></TD></TR></TBODY></TABLE></TD></TR></TBODY></TABLE>
                  
                  
                   <%
			set rs_pro2 =  server.CreateObject("adodb.recordset")
			rs_pro2.open"select * from smallClass  where BigClassName='"&rs_pro("bigClassName")&"'  order by smallClassid ",conn,1,3
		%>
              <%
				do while not rs_pro2.eof
			%>   
                  
                  <TABLE class=style02 cellSpacing=0 cellPadding=0 width=176 
                  align=center border=0>
                    <TBODY>
                      <TR>
                        <TD class=style11 align=middle height=25><TABLE cellSpacing=0 cellPadding=0 width="80%" 
                          border=0>
                          <TBODY>
                              <TR>
                                <TD align=middle width="31%" height=20>&nbsp;</TD>
                                <TD align=left width="60%"><STRONG><A class=m2 
                              href="product.asp?bigClassName=<%=rs_pro2("bigClassName")%>&smallclassname=<%=rs_pro2("smallClassName")%>"><%=rs_pro2("smallClassName")%></A></STRONG></TD>
                              </TR>
                          </TBODY>
                        </TABLE></TD>
                      </TR>
                    </TBODY>
                  </TABLE>
                  
               
                    <%
		  	rs_pro2.movenext
			loop
			
		  %>   
                  
                 
                    <%
		  	rs_pro.movenext
			loop
			
		  %> 
                        <BR>
                  <TABLE cellSpacing=0 cellPadding=0 width=199 align=center 
                  border=0>
                    <TBODY>
                    <TR>
                      <TD height=39><IMG height=39 
                        src="images/new.jpg" 
                        width=199 useMap=#mapmap border=0></TD></TR>
                    <TR>
                      <TD vAlign=top align=middle 
                      background=images/bj_l2.jpg 
                      height=251><BR><BR>
                       <%
	  set rs_news = server.CreateObject("adodb.recordset")
	  rs_news.open"select top 6 * from News where BigClassName='新闻中心' order by ID desc",conn,1,3
	  %>
                        <TABLE class=m2 cellSpacing=0 cellPadding=0 width="90%" 
                        align=center border=0>
                          <TBODY>
                         <%
	  do while not rs_news.eof
	  %>
                          <TR>
                            <TD vAlign=top align=left height=25
                            2>
                              <P><IMG 
                              src="images/leaf.jpg"><a href="newinfo.asp?id=<%=rs_news("id")%>" target="_blank" class="blue"> <%=gotTopic(rs_news("Title"),20)%></a><BR>
                              </P></TD></TR>
                              
                              <%
		rs_news.movenext
		loop
		%>
                              </TBODY></TABLE></TD></TR></TBODY></TABLE><MAP 
                  id=map name=mapmap><AREA shape=RECT coords=150,17,186,29 
                    href="news.asp"></MAP></TD>
                <TD vAlign=top align=middle width=609><BR>
                  <TABLE cellSpacing=0 cellPadding=0 width=518 align=center 
                  border=0>
                    <TBODY>
                    <TR>
                      <TD class=about align=left 
                      background=images/bj_2.jpg 
                      height=36>    <STRONG 
                      class="about style12">公司简介</STRONG></TD></TR></TBODY></TABLE>
                  <TABLE class=about cellSpacing=0 cellPadding=0 width=518 
                  align=center border=0>
                    <TBODY>
                    <TR>
                      <TD width="20" height=110 align=left>&nbsp;</TD>
                      <TD width="494" align=left><div><a href="about.asp"><%=left(About,200)%>..</a></div></TD>
                    </TR></TBODY></TABLE>
                  <TABLE cellSpacing=0 cellPadding=0 width=518 align=center 
                  border=0>
                    <TBODY>
                    <TR>
                      <TD class=style1 align=left 
                      background=images/bj_2.jpg 
                      height=36><SPAN class=about>    <STRONG 
                        class="about style12">具体流程如下</STRONG></SPAN></TD></TR></TBODY></TABLE>
                  <TABLE class=about cellSpacing=0 cellPadding=0 width=518 
                  align=center border=0>
                    <TBODY>
                    <TR>
                      <TD width="19" height=141 align=left>&nbsp;</TD>
                      <TD width="499" align=left><%=Structure%></TD>
                    </TR></TBODY></TABLE>
                  <TABLE cellSpacing=0 cellPadding=0 width=518 align=center 
                  border=0>
                    <TBODY>
                    <TR>
                      <TD class=style1 align=left 
                      background=images/bj_2.jpg 
                      height=36><SPAN class=about>    <STRONG 
                        class="about style12">鹏飞热点产品推荐</STRONG></SPAN></TD></TR></TBODY></TABLE>
                        
                        
                        <table width="85%" border="0" align="center" cellpadding="0" cellspacing="0">
          <tr>
            <td><div align="center">
              <%
		set rs_pro = server.CreateObject("adodb.recordset")
		rs_pro.open"select * from Product where  Passed=True And Elite=True order by ArticleID desc",conn,1,3
		i = 1
	%>
              <br>
              <table width="100%" border="0" cellspacing="0" cellpadding="0">
                 
                <tr>
              
                  <%
	  	do while not rs_pro.eof
	  %> <td><TABLE cellSpacing=0 cellPadding=0 width=160 
                              align=center border=0>
                    <TBODY>
                      <TR>
                        <TD width=140><TABLE height=140 cellSpacing=1 cellPadding=0 
                                width=150 align=top bgColor=#cccccc border=0 
                                valign="center">
                            <TBODY>
                              <TR>
                                <TD vAlign=center align=top bgColor=#ffffff><DIV align=center><a href="productinfo.asp?id=<%=rs_pro("ArticleID")%>"><img src="<%=rs_pro("UploadFiles")%>" height="100" 
                                width=120 onload=javascript:drawimage(this); 
                                border=0></A> </DIV></TD>
                              </TR>
                              <TR>
                                <TD vAlign=center align=top bgColor=#eeeeee 
                                height=20><DIV align=center><a href="productinfo.asp?id=<%=rs_pro("ArticleID")%>"><%=rs_pro("Title")%></A></DIV></TD>
                              </TR>
                            </TBODY>
                        </TABLE></TD>
                        <TD vAlign=top width=6><IMG height=93 src="images/new_16.jpg" 
                                width=6></TD>
                      </TR>
                    </TBODY>
                  </TABLE></td>
                    <%
	if i mod 2 <> 0 then
		end if
	if i mod 3 = 0 then
	%>
                </tr>
                <%
		end if
			rs_pro.movenext
			i = i + 1
			if i > 6 then exit do
			loop
		%>
              </table>
              <%
	  rs_pro.close
	  set rs_pro = nothing
	  %>
              <div>
            </div></td>
          </tr>
        </table>
                  <TABLE cellSpacing=0 cellPadding=0 width=518 align=center 
                  border=0>
                    <TBODY>
                    <TR>
                      <TD vAlign=top>&nbsp;</TD>
                    </TR></TBODY></TABLE>
                  <TABLE cellSpacing=0 cellPadding=0 width=518 align=center 
                  border=0>
                    <TBODY>
                    <TR>
                      <TD class=style1 align=left 
                      background=images/bj_2.jpg 
                      height=36><SPAN class=about>    <STRONG 
                        class="about style12">工程案例</STRONG></SPAN></TD></TR></TBODY></TABLE>
                  <TABLE cellSpacing=0 cellPadding=0 width=518 align=center 
                  border=0>
                    <TBODY>
                    <TR>
                      <TD vAlign=top><table width="85%" border="0" align="center" cellpadding="0" cellspacing="0">
                        <tr>
                          <td><div align="center">
                              <%
		set rs_anlipro = server.CreateObject("adodb.recordset")
		rs_anlipro.open"select * from anli_Product where  Passed=True And Elite=True order by ArticleID desc",conn,1,3
		a = 1
	%>
                              <br>
                              <table width="100%" border="0" cellspacing="0" cellpadding="0">
                                <tr>
                                  <%
	  	do while not rs_anlipro.eof
	  %>
                                  <td><TABLE cellSpacing=0 cellPadding=0 width=249 
                              align=center border=0>
                                    <TBODY>
                                      <TR>
                                        <TD align=center 
                                background=images/bj2.jpg 
                                height=195><A title=案例的详细信息 
                                href="productinfo.asp?id=<%=rs_anli("ArticleID")%>" 
                                target=_blank><IMG height=180 
                                src="<%=rs_anli("UploadFiles")%>" width=220 
                                onload=javascript:DrawImage(this); 
                                border=0></A></TD>
                                      </TR>
                                      <TR>
                                        <TD align=middle height=30><A 
                                href="http://www.51sdbz.com/projects_view.asp?id=55"><%=rs_anlipro("Title")%></A></TD>
                                      </TR>
                                    </TBODY>
                                  </TABLE></td>
                                  <%
	if a mod 2 <> 0 then
		end if
	if a mod 2 = 0 then
	%>
                                </tr>
                                <%
		end if
			rs_anlipro.movenext
			a = a + 1
			if a > 4 then exit do
			loop
		%>
                              </table>
                            <%
	  rs_anlipro.close
	  set rs_anlipro = nothing
	  %>
                              <div> </div></td>
                        </tr>
                      </table>
                        <table width="100%" border="0" cellspacing="0" cellpadding="0">
                          <tr>
                            <td align="right"><a href="case.asp">更多>></a></td>
                          </tr>
                        </table></TD>
                    </TR></TBODY></TABLE></TD></TR></TBODY></TABLE></TD></TR>
        <TR>
          <TD align=middle 
          background=images/bj_base.jpg 
          height=28>&nbsp;</TD></TR></TBODY></TABLE><LINK 
      href="images/css.css" 
      type=text/css rel=stylesheet>
      <TABLE class=m1 cellSpacing=0 cellPadding=0 width=924 align=center 
      border=0>
        <TBODY>
        <TR>
          <TD width="113" height=82 align=center class=about></TD>
          <TD width="811" align=center class=about><!--#include file="bottom.asp"--></TD>
      </TR></TBODY></TABLE></TD></TR></TBODY></TABLE></BODY></HTML>

⌨️ 快捷键说明

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