📄 pic.asp

📁 个人网站系统毕业论文大家可以借鉴下

💻 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>&nbsp;
   <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">&nbsp;</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 + -