index.asp

来自「这是一个网站后台管理的文件,请大家努力的下载,谢谢!」· ASP 代码 · 共 185 行

<!--#include file="Inc/syscode.asp" -->
<!--#include file="inc/Skin_CSS.asp"-->

<%
function cutstr(tempstr,tempwid)
if len(tempstr)>tempwid then
cutstr=left(tempstr,tempwid)&"..."
else
cutstr=tempstr
end if
end function%>
<!-- #include file="Head.asp" -->
<TABLE width="760" border=0 align="center" cellPadding=0 cellSpacing=0 bgcolor="#FFFFFF">
  <TR>
    <TD height="5"></TD>
  </TR>
  <TR> 
    <TD height="172" ><table width="746" height="100%" border="0" align="center" cellpadding="0" cellspacing="0">
        <tr> 
          <td width="190" valign="top" class="tdbg_left"> 
            <table width="100%" border="0" cellspacing="0" cellpadding="0">
              <tr> 
                <td height="34" class="title_left">&nbsp;&nbsp;&nbsp;<img src="Images/smallbook.jpg" width="10" height="10">&nbsp;&nbsp;MemberLogin 
                </td>
              </tr>
              <tr> 
                <td height="5"></td>
              </tr>
              <tr> 
                <td height="10"><table width="92%" border="0" align="center" cellpadding="0" cellspacing="0">
                    <tr> 
                      <td> <% call ShowUserLogin() %> </td>
                    </tr>
                  </table></td>
              </tr>
			  <tr> 
                <td height="5"></td>
              </tr>
            </table>
            <table width="100%" border="0" cellspacing="0" cellpadding="0">
              <tr> 
                <td height="34" class="title_left">&nbsp;&nbsp;&nbsp;<img src="Images/smallbook.jpg" width="10" height="10">&nbsp;&nbsp;ProductList</td>
              </tr>
              <tr> 
                <td height="5"></td>
              </tr>
              <tr> 
                <td height="10"><table width="92%" border="0" align="center" cellpadding="0" cellspacing="0">
                    <tr> 
                      <td> 
                        <% call ShowSmallClass_Tree() %>
                      </td>
                    </tr>
                  </table></td>
              </tr>
			  <tr> 
                <td height="5"></td>
              </tr>
            </table>
            <table width="100%" border="0" cellspacing="0" cellpadding="0">
              <tr> 
                <td height="34" class="title_left">&nbsp;&nbsp;&nbsp;<img src="Images/smallbook.jpg" width="10" height="10">&nbsp;&nbsp;ProductSearch</td>
              </tr>
              <tr> 
                <td height="5"></td>
              </tr>
              <tr> 
                <td height="10"><table width="79%" border="0" align="center" cellpadding="0" cellspacing="0">
                    <tr> 
                      <td> <% call ShowSearch(1) %> </td>
                    </tr>
                  </table></td>
              </tr>
			  <tr> 
                <td height="5"></td>
              </tr>
            </table>
            <table width="100%" border="0" cellspacing="0" cellpadding="0">
              <tr> 
                <td height="34" class="title_left">&nbsp;&nbsp;&nbsp;<img src="Images/smallbook.jpg" width="10" height="10">&nbsp;&nbsp;VoteOnline</td>
              </tr>
              <tr> 
                <td height="10">&nbsp;</td>
              </tr>
              <tr> 
                <td height="10"><table width="90%" border="0" align="center" cellpadding="0" cellspacing="0">
                    <tr> 
                      <td > <div align="center">
                          <% call ShowVote() %>
                        </div></td>
                    </tr>
                  </table></td>
              </tr>			  
            </table>
          </td>
          <td width="6" bgcolor="#FFFFFF">&nbsp;</td>
          <td Class=border valign="top"> 
<!--公司简介开始-->
         <!--#include file="dm_news.asp"-->
<!--公司简介结束-->
            <table width="100%" border="0" cellspacing="0" cellpadding="0">
              <tr> 
                <td class="title_right" height="32">&nbsp;&nbsp;&nbsp;<img src="Images/smallbook.jpg" width="10" height="10">&nbsp;&nbsp;New Products 
                  </td>
              </tr>
            </table>
            <table width="100%" border="0" cellspacing="0" cellpadding="0">
              <tr> 
                <td><!--#include file="NewsProduct.asp"--></td>
              </tr>
            </table>
            <table width="100%" border="0" cellspacing="0" cellpadding="0">
              <tr>
                <td height="6">&nbsp;</td>
              </tr>
            </table>
            <table width="100%" border="0" cellspacing="0" cellpadding="0">
              <tr> 
                <td class="title_right" height="32">&nbsp;&nbsp;&nbsp;<img src="Images/smallbook.jpg" width="10" height="10">&nbsp;&nbsp;Product List 
                  </td>
               
              </tr>
            </table>
            <table width="100%" border="0" cellspacing="0" cellpadding="0">
              <tr> 
                <td> <%i=1 
set rs_Product=server.createobject("adodb.recordset")
sqltext="select top " & Product_count & " * from Productwygk where Passed=True And Elite=True order by UpdateTime desc"
rs_Product.open sqltext,conn,1,1				 	
%> <table width="100%" border="0" cellspacing="1" cellpadding="0">
                    <tr> 
                      <td></td>
                    </tr>
                    <tr align="center"> 
                      <td><table  width="100%" border="0" cellpadding="1" cellspacing="1" bgcolor="#999999" >
                          <tr Class=tdbg > 
                            <td  width="34%" height="29"> 
                              <div align="center">Product Name</font></div></td>
                            <td  width="18%"> 
                              <div align="center">Spec</div></td>
                            <td  width="9%"> 
                              <div align="center">Unit</div></td>
                            <td  width="39%"> 
                              <div align="center">remark</div></td>
                          </tr>
                          <%
do while not rs_Product.eof
%>
                          <% if i mod 2 =0 then%>
                          <tr Class=tdbg> 
                            <% else %>
                          <tr bgcolor="#ffffff"> 
                            <% end if %>
                            <td height="22"><a href="ProductShow.asp?ID=<%=rs_Product("ID")%>" target="_blank"><%=cutstr(rs_Product("Title"),15)%></a></td>
                            <td > <div align="center"><%=cutstr(rs_Product("Spec"),6)%></div></td>
                            <td> <div align="center"><%=rs_Product("Unit")%></div></td>
                            <td> <div align="left"><%=cutstr(rs_Product("Memo"),15)%></div></td>
                          </tr>
                          <% 
i=i+1
rs_Product.movenext 
loop 
rs_Product.close  
%>
                        </table></td>
                    </tr>
                    <tr> 
                      <td></td>
                    </tr>
                  </table></td>
              </tr>
              <tr> 
                <td> <div align="right"><a href="Product.asp">More&gt;&gt;&gt;</a></div></td>
              </tr>
            </table></td>
        </tr>		
      </table></TD>
  </TR>
</TABLE>
<!-- #include file="Inc/Foot.asp" -->
<map name="Map">
  <area shape="rect" coords="18,14,69,24" href="News.asp">
</map>
</BODY></HTML>