📄 cases.asp
字号:
<!--#include file="top.asp" -->
<%
'☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆
'★ ★
'☆ 漂亮的企业网站ASP免费版本 ☆
'★ ★
'☆ 版权所有: ML ☆
'★ ★
'☆ 程序制作: ML ☆
'★ email:xinranyx@sina.com ★
'☆ QQ:1474579 ☆
'★ 商业版本请联系购买!!! ★
'☆ ☆
'★ ★
'☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆
%>
<table width="778" border="0" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF">
<tr>
<td width="184" background="image/07.jpg"> <!--#include file="left.asp" --> </td>
<td width="631" valign="top"><div align="center">
<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><img src="image/39.jpg" width="594" height="35"></td>
</tr>
</table>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td> </td>
</tr>
</table>
<%
SQL="Select * from product where pro_name='project'"
Set rs=Server.CreateObject("ADODB.RecordSet")
rs.Open SQL,con,1,1
rs.PageSize=12
count=1
if Request("count")<>"" then
count=Cint(Request("count"))
if count<1 then
count=1
end if
if count>rs.PageCount then
count=rs.PageCount
end if
end if
if not rs.Bof and not rs.Eof then
rs.ABSolutePage=count
end if
pagecountx=rs.pagecount
for i=0 to 2
if i*4>=rs.RecordCount-((count-1)*rs.PageSize) then
exit for
end if
%>
<table width="586" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="19"> </td>
<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="image/mm_r2_c2.jpg" width="108" height="88" name="img<%=i%>1"></td>
</tr>
<tr>
<td height="85" valign="top"> <table width="100%" border="0" cellspacing="10" cellpadding="0">
<tr>
<td class="text03"> <p><a href="#" id="a<%=i%>1"><font id=f<%=i%>1>暂无内容</font></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>
<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="image/27.jpg" width="108" height="88" name="img<%=i%>2"></td>
</tr>
<tr>
<td height="85" valign="top"> <table width="100%" border="0" cellspacing="10" cellpadding="0">
<tr>
<td><p class="text03"><a href="#" id="a<%=i%>2"><font id=f<%=i%>2>暂无内容</font></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>
<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="image/28.jpg" name="img<%=i%>3" width="108" height="88" id="img<%=i%>3"></td>
</tr>
<tr>
<td height="85" valign="top"> <table width="100%" border="0" cellspacing="10" cellpadding="0">
<tr>
<td><p class="text03"><a href="#" id="a<%=i%>3"><font id=f<%=i%>3>暂无内容</font></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>
<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="image/29.jpg" name="img<%=i%>4" width="108" height="88" id="img<%=i%>4"></td>
</tr>
<tr>
<td height="85" valign="top"> <table width="100%" border="0" cellspacing="10" cellpadding="0">
<tr>
<td><p class="text03"><a href="#" id="a<%=i%>4"><font id="f<%=i%>4">暂无内容</font></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="23"> </td>
</tr>
</table>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td> </td>
</tr>
</table>
<%
next
%>
<table width="562" border="0" cellspacing="0" cellpadding="0">
<tr>
<td><img src="image/36.jpg" width="562" height="1"></td>
</tr>
<tr class="text03">
<td><div align="right"><!--#include file="fy.asp" -->
</div></td>
</tr>
</table>
<%
rs.Close
Set rs=nothing
SQL="Select * from product where pro_name='project' order by id desc"
Set rs=Server.CreateObject("ADODB.RecordSet")
rs.Open SQL,con,1,1
rs.PageSize=12
if not rs.Bof and not rs.Eof then
rs.ABSolutePage=count
end if
k=0
t=1
Response.write("<script>"&chr(13))
for i=1 to rs.PageSize
if ((count-1)*rs.PageSize)+i>rs.RecordCount then
exit for
end if
if rs("img")<>"" and vartype(rs("img"))<>1 then
Response.write("document.img"&k&t&".src='admin/img/"&rs("img")&"'"&chr(13))
end if
Response.write("document.all.a"&k&t&".href='cases_more.asp?id="&rs("id")&"'"&chr(13))
Response.write("document.all.f"&k&t&".innerHTML='"&rs("title")&"'"&chr(13))
t=t+1
if i mod 4 =0 then
k=k+1
t=1
end if
rs.movenext
next
rs.Close
Set rs=nothing
Response.write("</script>")
%>
</div></td>
</tr>
</table>
<!--#include file="down.asp" -->
<!--#include file="close.asp" -->⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -