📄 showpic.asp
字号:
</table>
</form></td>
</tr>
</table></td>
</tr>
<tr>
<td> <strong><font color="#0066FF"> 数据统计</font></strong></td>
</tr>
<tr>
<td><table width="100%" height="92" border="0" cellpadding="0" cellspacing="0" bordercolor="#111111" class="unnamed1" id="AutoNumber3" style="border-collapse: collapse">
<tr>
<td width="67%" height="11"></td>
<td width="33%" height="11"></td>
</tr>
<tr>
<td width="67%" height="17" align="center">相片总数:</td>
<td width="33%" height="17"><font color="#FF0000"><%=allphotoes("all")%></font> 张</td>
</tr>
<tr>
<td width="67%" height="15" align="center"></td>
<td width="33%" height="15"></td>
</tr>
<tr>
<td width="67%" height="21" align="center">校园风光:</td>
<td width="33%" height="21"><font color="#FF0000"><%=allphotoes("校园风光")%></font> 张</td>
</tr>
<tr>
<td width="67%" height="13" align="center"></td>
<td width="33%" height="13"></td>
</tr>
<tr>
<td width="67%" height="19" align="center">同学合影:</td>
<td width="33%" height="19"><font color="#FF0000"><%=allphotoes("同学合影")%></font> 张</td>
</tr>
<tr>
<td width="67%" height="16" align="center"></td>
<td width="33%" height="16"></td>
</tr>
<tr>
<td width="67%" height="18" align="center">自我风采:</td>
<td width="33%" height="18"><font color="#FF0000"><%=allphotoes("个人照片")%></font> 张</td>
</tr>
<tr>
<td width="67%" height="15" align="center"></td>
<td width="33%" height="15"></td>
</tr>
<tr>
<td width="67%" height="18" align="center">其他相片:</td>
<td width="33%" height="18"><font color="#FF0000"><%=allphotoes("其它照片")%></font> 张</td>
</tr>
<tr>
<td width="67%" height="15" align="center"></td>
<td width="33%" height="15"></td>
</tr>
<tr>
<td height="18" colspan="2" align="center"><font color="#FF0000">上传照片后请刷新当前页面(按一下F5)，才能看到上传的照片
</font></td>
</tr>
</table></td>
</tr>
</table></td>
<td valign="top" background="images/index_r7_c5.gif"><img name="index_r7_c5" src="images/index_r7_c5.gif" width="5" height="553" border="0" alt=""></td>
<td colspan="8" valign="top" bgcolor="#FFFFFF"><table width="100%" border="0" class="unnamed1">
<tr>
<td colspan="2"><span lang="zh-cn">
<%dim rs,sql
set rs=server.createobject("adodb.recordset")
if keytype="all" then
sql="select classpic.*,txluser.truename from [classpic],[txluser] where txluser.userid=classpic.name order by picid desc"
else
sql="select classpic.*,txluser.truename from [classpic],[txluser] where txluser.userid=classpic.name and classpic.type='"&keytype&"' order by picid desc"
end if
rs.open sql,conn,1,1
if rs.eof and rs.bof then
%>
目前没有相片<a href="#" onClick="window.open('addpic.asp','ToseePlay','top=0,scrollbars=1,resizable=1,height=420,width=470,left='+(screen.width-650)/2);return false;">上传照片</a>
<%
else
Rs.Pagesize =40
Pageno = CLng(Request("page")) '取得用page信息，并处理
If Pageno < 1 Then Pageno = 1
If Pageno > Rs.PageCount Then Pageno = Rs.PageCount
If pageNo = "" Then Pageno = 1
%>
</span></td>
</tr>
<tr>
<td> <div align="left"><span lang="zh-cn">当前位置：</span>
<%if keytype="all" then
%>
所 有 相 片
<%elseif keytype="校园风光" then%>
校 园 风 光
<%elseif keytype="同学合影" then%>
同 学 合 影
<%elseif keytype="个人照片" then%>
真 我 风 采
<%else%>
其 它 照 片
<%end if%>
</div></td>
<td><form name="form2" method="get" action="showpic.asp">
第
<select name="page">
<%
For I = 1 To Rs.PageCount
Response.Write "<option>" & I & "</option>"
Next
%>
</select>
<input type="hidden" name="keytype" value="<%=keytype%>">
页
<input type="submit" value="Go" name="submit">
</form></td>
</tr>
<tr>
<td colspan="2"><div align="center">
<center>
<table border="0" cellpadding="4" cellspacing="4" style="border-collapse: collapse" id="AutoNumber6" bordercolor="#111111" width="98%" >
<%
if rs.eof then
else
Sub Showpage(Rs,pageno) '接受参数，显示记录
Rs.AbsolutePage = Pageno
for i=1 to 10
if rs.eof then
exit for
end if
%>
<tr>
<td width="25%" align="center"><a href=javascript:doPopUp("look.asp?id=<%=rs("picid")%>")><img class=hand
style="BORDER-LEFT-COLOR: #426e72; BORDER-BOTTOM-COLOR: #426e72; BORDER-TOP-COLOR: #426e72; BORDER-RIGHT-COLOR: #426e72"
height=70 src="photo/<%=rs("filename")%>" width=95
border=1 dypop="图片名称:<%=rs("remark")%><br>所有者:<%=rs("name")%><br>描述:<%=rs("detail")%>" dyclass="red"></a></td>
<%rs.movenext
if rs.eof then
exit for
end if
%>
<td width="25%" align="center"><a href=javascript:doPopUp("look.asp?id=<%=rs("picid")%>")><img class=hand
style="BORDER-LEFT-COLOR: #426e72; BORDER-BOTTOM-COLOR: #426e72; BORDER-TOP-COLOR: #426e72; BORDER-RIGHT-COLOR: #426e72"
height=70 src="photo/<%=rs("filename")%>" width=95
border=1 dypop="图片名称:<%=rs("remark")%><br>所有者:<%=rs("name")%><br>描述:<%=rs("detail")%>" dyclass="red"></a> </td>
<%rs.movenext
if rs.eof then
exit for
end if
%>
<td width="25%" align="center"><a href=javascript:doPopUp("look.asp?id=<%=rs("picid")%>")><img class=hand
style="BORDER-LEFT-COLOR: #426e72; BORDER-BOTTOM-COLOR: #426e72; BORDER-TOP-COLOR: #426e72; BORDER-RIGHT-COLOR: #426e72"
height=70 src="photo/<%=rs("filename")%>" width=95
border=1 dypop="图片名称:<%=rs("remark")%><br>所有者:<%=rs("name")%><br>描述:<%=rs("detail")%>" dyclass="red"></a></td>
<%rs.movenext
if rs.eof then
exit for
end if
%>
<td width="25%" align="center"><a href=javascript:doPopUp("look.asp?id=<%=rs("picid")%>")><img class=hand
style="BORDER-LEFT-COLOR: #426e72; BORDER-BOTTOM-COLOR: #426e72; BORDER-TOP-COLOR: #426e72; BORDER-RIGHT-COLOR: #426e72"
height=70 src="photo/<%=rs("filename")%>" width=95
border=1 dypop="图片名称:<%=rs("remark")%><br>所有者:<%=rs("name")%><br>描述:<%=rs("detail")%>" dyclass="red"></a> </td>
</tr>
<%
rs.movenext
next
end sub
%>
<% showpage rs,pageno %>
</table>
</center>
</div>
<%end if%> <%end if%> </td>
</tr>
</table></td>
<td><img src="images/spacer.gif" width="1" height="553" border="0" alt=""></td>
</tr>
</table>
<table width="782" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td bgcolor="#FFFFFF">
<hr width="99%" noshade style="border:1 green dotted">
</td>
</tr>
<tr>
<td><img src="images/index_r8_c1.gif" width="782" height="71"></td>
</tr>
</table>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -