?? pic.asp
字號:
<!--#include file="conn.asp"-->
<!--#include file="page.asp"-->
<body oncontextmenu="return false" onselectstart="return false" leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">
<% set rs=server.CreateObject("adodb.recordset")
sql="select * from dy_load order by dy_id desc"
rs.open sql,conn,1,1
if rs.eof and rs.bof then%>
<table width="633" height="67" border="0" cellpadding="0" cellspacing="1"
bgcolor="#CCCCCC">
<tr bgcolor="#FFFFFF">
<td align="center">當前沒有圖片！！</td>
</tr></table>
<%else
page=request.querystring("page")
rs.PageSize = 12
if Not IsEmpty(page) then
if Not IsNumeric(page) then
page=1
else
Page = cint(page)
end if
if Page > rs.PageCount then
rs.AbsolutePage = rs.PageCount
elseif Page <= 0 then
rs.AbsolutePage = 1
else
rs.AbsolutePage = Page
end if
else
rs.AbsolutePage=1
end if
Page = rs.AbsolutePage%>
<table width="633" border="0" cellspacing="0" cellpadding="0">
<%dim i
i=1
do while not rs.eof%>
<tr><%for j=1 to 4
if rs.eof then
exit for
end if%>
<td width="150" height="160"><table><tr><td><a href="showpic.asp?id=<%=rs("dy_id")%>" target="_blank"><img src="<%=rs("dy_content")%>" width="150" height="160" border="0" title="<%=rs("dy_title")%>"></a></td></tr><tr><td align="center"><%if session("oursky")="oursky" then%><a href="pic_edi.asp?id=<%=rs("dy_id")%>">編輯</a>
<script language="JavaScript">
<!--
function suredo(src,q)
{
var ret;
ret = confirm(q);
if(ret!=false)window.location=src;
}
//-->
</script>
<a href='javascript:suredo("pic_del.asp?id=<%=rs("dy_id")%>","確定刪除?")'>刪除</a><%end if%></td></tr></table>
</td>
<%rs.movenext
i=i+1
next
%>
</tr>
<tr>
<td height="8"> </td>
</tr>
<%if i>rs.pagesize then exit do
loop
end if%>
</table>
<table width="633" height="27" border="0" cellpadding="0" cellspacing="1"
bgcolor="#CCCCCC">
<tr>
<td align="center" bgcolor="#FFFFFF"><%
call pagination(rs.pagecount,rs.pagesize,page,rs.recordcount)
rs.close
set rs=nothing
conn.close
set conn=nothing %></td>
</tr>
</table>
</body>?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -