⭐ 欢迎来到虫虫下载站！ | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站
📤 上传资源

📄 user_photo.asp

📁 不是我做的一个留言板
💻 ASP
字号:
🔍 
<%
bg_id=1
%>
<!--#include file="conn.asp" -->
<!--#include file="../js/vbjava.asp" -->
<!--#include file="../function/nextpage.asp" -->

<!--#include file="session.asp" -->
<head>
<SCRIPT src="../js/win_js.js"></SCRIPT>
</HEAD>
<center>
<SCRIPT>SL_open(735,350);</SCRIPT>
<center><table>
<%
on_web=L_USERPHOTO_ONWEB
username=session_cookie_name
set rs=server.CreateObject("adodb.recordset") 
sql="select * from photo where photouser='"&username&"' and g_id='"&session_cookie_gid&"' order by phototime desc"
   rs.open sql,conn,1,1 
  if not rs.eof then 
rs.PageSize =user_photopage '每页记录条数
result_num=rs.RecordCount '记录总数
										
maxpage=rs.PageCount 
page=request("page")
											
if Not IsNumeric(page) or page="" then
	page=1
else
	page=cint(page)
end if
											
if page<1 then
	page=1
elseif  page>maxpage then
	page=maxpage
end if
											
	rs.AbsolutePage=Page
										
else
	result_num=0
	maxpage=0
	page=0
end if
 for user_P_i=0 to (rs.RecordCount-1)
if (user_P_i mod 4)=0 then
        RESPONSE.WRITE "</tr><tr>"
end if
%>
<td colspan='4' align=center>
 <table bgColor="#cccccc" border="0" cellPadding="2" cellSpacing="2">
        <tbody>
          <tr>
             <td BGCOLOR="#EAEAEA">
              <table align="center" bgColor="#ffffff" border="0" cellPadding="1" cellSpacing="1">
                <tbody>
                  <tr>
                    <td align=center>
	<a href="photo_brow.asp?id=<%=rs("photoid")%>" target=_blank>
	<img src="<%=photopath%>/<%=rs("photoname")%>" border="0" onload="javascript:DrawImage(this);" >
	</a>


                   </td>
                  </tr>
                </tbody>
              </table>
            </td>
          </tr>
        </tbody>
      </table>  


 <table bgColor="#cccccc" border="0" cellPadding="2" cellSpacing="2">
        <tbody>
          <tr>
            <td  bgColor="#ffffff">
              <table align="center" BGCOLOR="#EAEAEA" border="0" cellPadding="1" cellSpacing="1">
                <tbody>
                  <tr>
<%
        RESPONSE.WRITE "<td>"&L_CLASS_photo_text&":"&mid(trim(rs("photocomment")),1,10)&"....<br>"
        RESPONSE.WRITE L_CLASS_UPtime&":"&trim(rs("phototime"))&"<br><center>" 
if rs("photouser")=session_cookie_name then
        RESPONSE.WRITE "<a href=photoedit.asp?id="&trim(rs("photoid"))&"&group=user>"
        RESPONSE.WRITE "<img border=0 src="&web_background&"/edit.gif></a>"
%>
<a href='javascript:go("photodel.asp?photoid=<%=rs("photoid")%>&filename=<%=rs("photoname")%>&group=user","<%=L_CLASSi_pMsgEDEL1%>")'>

<img src="<%=web_background%>/del.gif" alt="<%=L_PRIMSG_DEL%>" border="0"><%=L_PRIMSG_DEL%></a>
	
<%
end if
	RESPONSE.WRITE "</center></tr></tr></tbody></table></table>"     
	RESPONSE.WRITE "</td>"
rs.movenext
next
rs.close
set rs=nothing
%>

</table>

<SCRIPT>SL_close()</SCRIPT>  
<center>
<table>

<tr>  
<td colspan="3">
<br><br><br>
<% call LastNextPage(maxpage,page,result_num) %></td></tr>

</table>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -