📄 index.asp
字号:
<form action="vote.asp" target="newwindow" method=post name=research>
<tr>
<td valign=top width="100%">
<%
for i=1 to 8
if rs("Select"&i)<>"" then
%>
<input style="border: 0" <%if i=1 then%>checked<%end if%> name=Options type=radio value=<%=i%>>
<%=i%>.<%=rs("Select"&i)%><br>
<%
end if
next
%>
</td>
</tr>
<tr>
<td width="100%" height=30 align=center>
<input type="image" border="0" name="submit2" src="images/vote1.gif" width="59" height="19" style="cursor:hand">
<a href="vote.asp?stype=view" target="_blank"><img src="images/vote.gif" width="59" height="19" border="0"></a>
</td>
</tr>
</form>
</table>
<%end if%>
</td>
</tr>
</table>
</td>
</tr>
<tr>
<td background="images/bj_2.gif"> </td>
</tr>
</table>
</td>
<td width="1" valign="top" background="images/bj_x.gif"></td>
<td valign="top">
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td background="images/bj_x.gif" height="1"></td>
</tr>
<tr>
<td>
<table cellspacing=0 cellpadding=0 width=563 height="22" align="center">
<tr>
<td width=18>
<div align="center"><img src="images/icon2.gif" width="12" height="13"></div>
</td>
<td class=hg12 width="492"> <b>最新图片</b></td>
</tr>
</table>
</td>
</tr>
<tr>
<td background="images/bj_x.gif" height="1"></td>
</tr>
</table>
</div>
<div align="center"> </div>
<table width="540" border="0" cellspacing="0" cellpadding="0" align="center">
<tr>
<td>
<%set rs=server.CreateObject("adodb.recordset")
rs.open "select top 20 * from shop_books order by adddate desc",conn,1,1
if rs.eof and rs.bof then
response.write "<center><br><font color=red size=2>对不起，请您先到后台添加图片！</font></font>"
else
%>
<table cellspacing=0 cellpadding=0 border=0 width="100%">
<%
dim i_1,i_count
i_1=int((rs.recordcount+1)/2)
if i_1>5 then
i_1=5
end if
for i_count=1 to i_1%>
<tr>
<td valign=top width="33%">
<table cellspacing=0 cellpadding=0 width="100%">
<tr>
<td valign=top style="PADDING-LEFT: 6px"><br>
<img height=115 hspace=5
src="images/bg_book.gif" width=145 vspace=5 border=0>
<p style="MARGIN-TOP: -130px"><a
href=book.asp?id=<%=rs("bookid")%> target=_blank>
<img
height=110 alt=<%=trim(rs("bookname"))%> hspace=5
src="<%if trim(rs("bookpic"))<>"" then response.write trim(rs("bookpic")) else response.write "images/emptybook.gif" end if%>" width=135 vspace=3
border=0></a> <br>
<a class=a4
href=book.asp?id=<%=rs("bookid")%> target=_blank><font color=#FF6600><br>
<%=trim(rs("bookname"))%></font></a><br>
<%rs.movenext%></td>
</tr>
</table>
</td>
<td valign=top width="33%" colspan="2">
<%if rs.eof then%>
<%else%>
<table cellspacing=0 cellpadding=0 width="99%">
<tr>
<td valign=top style="PADDING-LEFT: 6px"><br>
<img height=115 hspace=5
src="images/bg_book.gif" width=145 vspace=5 border=0>
<p style="MARGIN-TOP: -130px"><a
href=book.asp?id=<%=rs("bookid")%> target=_blank>
<img
height=110 alt=<%=trim(rs("bookname"))%> hspace=5
src="<%if trim(rs("bookpic"))<>"" then response.write trim(rs("bookpic")) else response.write "images/emptybook.gif" end if%>" width=135 vspace=3
border=0></a><br>
<a class=a4
href=book.asp?id=<%=rs("bookid")%> target=_blank><font color=#FF6600><br>
<%=trim(rs("bookname"))%></font></a><br>
<%rs.movenext%></td>
</tr>
</table>
<%end if%>
</td>
<td valign=top width="33%">
<%if rs.eof then%>
<%else%>
<table cellspacing=0 cellpadding=0 width="100%">
<tr>
<td valign=top style="PADDING-LEFT: 6px"><br>
<img height=115 hspace=5
src="images/bg_book.gif" width=145 vspace=5 border=0>
<p style="MARGIN-TOP: -130px"><a
href=book.asp?id=<%=rs("bookid")%> target=_blank>
<img
height=110 alt=<%=trim(rs("bookname"))%> hspace=5
src="<%if trim(rs("bookpic"))<>"" then response.write trim(rs("bookpic")) else response.write "images/emptybook.gif" end if%>" width=135 vspace=3
border=0></a> <br>
<a class=a4
href=book.asp?id=<%=rs("bookid")%> target=_blank><font color=#FF6600><br>
<%=trim(rs("bookname"))%></font></a><br>
<%rs.movenext%></td>
</tr>
</table>
<%end if%>
</td>
</tr>
<%next%>
<%if rs.recordcount>20 then
rs.absoluteposition=13
i=0
do while not rs.eof%>
<tr>
<td style="PADDING-LEFT: 6px" height="28" colspan="2">
<img src="images/new-fram_05.gif" width="12" height="13">
<a href=book.asp?id=<%=rs("bookid")%> target=_blank>
<%if len(trim(rs("bookname")))>16 then
response.write left(trim(rs("bookname")),16)&"..."
else
response.write trim(rs("bookname"))
end if%>
</a></td><%rs.movenext%>
<td style="PADDING-LEFT: 6px" height="28" colspan="2">
<%if rs.eof then%>
<%else%>
<img src="images/new-fram_05.gif" width="12" height="13">
<a href=book.asp?id=<%=rs("bookid")%> target=_blank>
<%if len(trim(rs("bookname")))>16 then
response.write left(trim(rs("bookname")),16)&"..."
else
response.write trim(rs("bookname"))
end if%>
</a><%rs.movenext%>
<%end if%>
</td>
</tr>
<%if i>=6 then exit do
loop
end if
rs.close
set rs=nothing%>
</table>
<%end if%>
</td>
</tr>
</table></div>
</td>
</tr>
</table>
</td>
</tr>
</table>
<!--#include file="service.asp"-->
<!--#include file="copyright.asp"-->
<div id=floater
style="Z-INDEX: 20; WIDTH: 130px; POSITION: absolute; TOP: 342px; overflow: visible;; left: 2px">
</div>
<script language=javascript src="floater.js"></script>
</td>
</tr>
</table>
</body>
</html>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -