📄 index.asp
字号:
<!--#include file="top.asp" -->
<table width="778" border="0" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF">
<tr>
<td width="184" valign="top" background="image/07.jpg">
<!--#include file="left.asp" -->
</td>
<td width="594" valign="top"><table width="97%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td> </td>
</tr>
</table>
<table width="95%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td><img src="image/19.jpg" width="238" height="31"></td>
</tr>
</table>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td height="6"><img name="" src="" width="1" height="1" alt=""></td>
</tr>
</table>
<table width="99%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td><table width="585" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="184"><table width="181" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="12"> </td>
<td width="169"><table width="166" height="178" border="0" cellpadding="0" cellspacing="1" bgcolor="#CCCCCC">
<tr>
<td width="172" height="178" valign="top" bgcolor="#FFFFFF"><div align="center">
<%SQL="Select * from product where pro_name='news' and img is not null"
Set rs=server.CreateObject("ADODB.RecordSet")
rs.Open SQL,con,1,1
if not rs.eof then
%>
<table width="100%" border="0" cellpadding="0" cellspacing="3">
<tr>
<td><img src="admin/img/<%=rs("img")%>" width="158" height="126"></td>
</tr>
<tr>
<td height="41" class="text03"><a href="news_more.asp?id=<%=rs("id")%>"><%=rs("title")%></a></td>
</tr>
</table>
<%
end if
rs.Close
Set rs=nothing
%>
</div></td>
</tr>
</table></td>
</tr>
</table></td>
<td width="401" valign="top"><table width="98%" border="0" cellpadding="0" cellspacing="4">
<tr>
<td><table width="100%" border="0" cellspacing="8" cellpadding="0">
<%SQL="Select * from product where pro_name='news' order by id desc"
Set rs=server.CreateObject("ADODB.RecordSet")
rs.Open SQL,con,1,1
for i=0 to 7
if i>=rs.RecordCount then
Exit for
end if
%>
<tr>
<td width="5%"><div align="center"><img src="image/20.jpg" width="6" height="9"></div></td>
<td width="70%"><a href="news_more.asp?id=<%=rs("id")%>"><%=rs("title")%></a></td>
<td width="25%" style="font-size=12px">[<%=rs("pub_date")%>]</td>
</tr>
<%
rs.movenext
next
rs.Close
Set rs=nothing
%>
<tr>
<td colspan="3" style="font-size:12px"><div align="right"><a href="news.asp">更多</a>>>></div></td>
</tr>
</table></td>
</tr>
</table></td>
</tr>
</table></td>
</tr>
</table>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td> </td>
</tr>
</table>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td><a href="cases.asp"><img src="image/22.jpg" width="594" height="31" border="0"></a></td>
</tr>
</table>
<table width="594" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="594" height="8"> </td>
</tr>
</table>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td><table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td><table width="99%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="433"> <div align="center">
<table width="181" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="19"> </td>
<MARQUEE onmouseover=this.stop() onmouseout=this.start() behavior=alternate>
<%
SQL="Select * from product where pro_name='project' and img is not null"
Set rs=server.CreateObject("ADODB.RecordSet")
rs.Open SQL,con,1,1
for i=0 to 3
if i>=rs.RecordCount then
exit for
end if
%>
<td width="124"> <table width="124" border="0" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF">
<tr>
<td colspan="3"><img src="image/mm_r1_c1.jpg" width="124" height="4"></td>
</tr>
<tr>
<td width="5" background="image/mm_r2_c1.jpg"><img src="image/mm_r2_c1.jpg" width="5" height="173"></td>
<td width="108" valign="top"> <table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td><img src="admin/img/<%=rs("img")%>" width="108" height="88"></td>
</tr>
<tr>
<td height="85" valign="top"> <table width="100%" border="0" cellspacing="10" cellpadding="0">
<tr>
<td class="text03"> <p><a href="cases_more.asp?id=<%=rs("id")%>"><%=rs("title")%></a></p></td>
</tr>
</table></td>
</tr>
</table></td>
<td width="11" background="image/mm_r2_c3.jpg"><img src="image/mm_r2_c3.jpg" width="11" height="173"></td>
</tr>
<tr>
<td colspan="3"><img src="image/mm_r4_c1.jpg" width="124" height="6"></td>
</tr>
</table></td>
<td width="14"> </td>
<%
rs.movenext
next
rs.Close
Set rs=nothing
%>
</tr>
</table>
</MARQUEE>
</div></td>
</tr>
</table></td>
</tr>
</table></td>
</tr>
</table>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td> </td>
</tr>
</table>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td><a href="product.asp"><img src="image/26.jpg" width="594" height="31" border="0"></a></td>
</tr>
</table>
<table width="594" border="0" cellspacing="0" cellpadding="0">
<tr>
<td height="8"> </td>
</tr>
</table>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td><table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td><table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td> <div align="center">
<table width="181" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="20"> </td>
<%
SQL="Select * from product where pro_name='product' and img is not null order by id desc"
Set rs=server.CreateObject("ADODB.RecordSet")
rs.Open SQL,con,1,1
for i=0 to 3
if i>=rs.RecordCount then
exit for
end if
%>
<td width="124"> <table width="124" border="0" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF">
<tr>
<td colspan="3"><img src="image/mm_r1_c1.jpg" width="124" height="4"></td>
</tr>
<tr>
<td width="5" background="image/mm_r2_c1.jpg"><img src="image/mm_r2_c1.jpg" width="5" height="173"></td>
<td width="108" valign="top"> <table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td><img src="admin/img/<%=rs("img")%>" width="108" height="88"></td>
</tr>
<tr>
<td height="85" valign="top"> <table width="100%" border="0" cellspacing="10" cellpadding="0">
<tr>
<td class="text03"> <p><a href="product_more.asp?id=<%=rs("id")%>"><%=rs("title")%></a></p></td>
</tr>
</table></td>
</tr>
</table></td>
<td width="11" background="image/mm_r2_c3.jpg"><img src="image/mm_r2_c3.jpg" width="11" height="173"></td>
</tr>
<tr>
<td colspan="3"><img src="image/mm_r4_c1.jpg" width="124" height="6"></td>
</tr>
</table></td>
<td width="19"> </td>
<%
rs.movenext
next
rs.Close
Set rs=nothing
%>
</tr>
</table>
</div></td>
</tr>
</table></td>
</tr>
</table></td>
</tr>
</table>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td> </td>
</tr>
</table></td>
</tr>
</table>
<!--#include file="down.asp" -->
<!--#include file="close.asp" -->⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -