<!--#include file="../../conn/conn.asp"-->
<!--#include file="../../conn/nosql.asp"-->
<!--#include file="../../conn/config.asp"-->
<!--#include file="../../conn/count.asp"-->
<!--#include file="../page.asp"-->
<!--#include file="../count.asp"-->
<%
if isChkInteger(request("web_id")) then
web_id=request("web_id")
else
Response.Redirect ("../../index.asp")
end if
if isChkInteger(request("id")) then
id=request("id")
else
Response.Redirect ("../../index.asp")
end if
sql="select * from snsn_user where id="&web_id
Set rs= Server.CreateObject("ADODB.Recordset") 
rs.open sql,conn,1,1
if rs.eof or rs.bof then
response.write "<script language='javascript'>"
response.write "alert('没有此用户，请确认后或联系管理员再访问本页！');"
response.write"this.location.href='/index.asp';</SCRIPT>"
response.end
else
%><html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>无标题文档</title>
<link rel="stylesheet" href="css.css" type="text/css">
<style type="text/css">
<!--
.style1 {color: #000000}
.style2 {color: #FF0000}
.style3 {	font-size: 14px;
	font-weight: bold;
}
.tmpstr {word-break:break-all}

-->
</style>
</head>
<body>
<%
if nosql(request("act"))="del" then
if isChkInteger(request("ida")) then
ida=request("ida")
else
response.write "<script language='javascript'>"
response.write "alert('非法操作，正在返回！');"
response.write"this.location.href='/index.asp';</SCRIPT>"
response.end
end if
conn.execute"delete from snsn_m_msn where id="&ida&" and username='"&session("user")&"'"
response.Write("<script>alert('删除成功!!!');location.href='pic_m.asp?web_id="&web_id&"&id="&nosql(request("id"))&"'</script>")
response.end()
end if
if isChkInteger(request("id")) then
id=request("id")
else
response.write "<script language='javascript'>"
response.write "alert('非法操作，正在返回！');"
response.write"this.location.href='/index.asp';</SCRIPT>"
response.end
end if
set rs1=server.CreateObject("adodb.recordset")
rs1.open"select  * from snsn_m_photo where poto_id="&id,conn,1,3
if nosql(request("act"))="save" then
if isChkInteger(request("id")) then
id=request("id")
else
response.write "<script language='javascript'>"
response.write "alert('非法操作，正在返回！');"
response.write"this.location.href='/index.asp';</SCRIPT>"
response.end
end if
'今日更新
sql="select * from snsn_user where id="&web_id
Set rscount= Server.CreateObject("ADODB.Recordset") 
rscount.open sql,conn,1,1
if rscount.eof or rscount.bof then
response.write "<script language='javascript'>"
response.write "alert('没有此用户，请确认后或联系管理员再访问本页！');"
response.write"this.location.href='/index.asp';</SCRIPT>"
response.end
else

    if datediff("d",rscount("inewdate"),now())<1 then
	conn.execute("update snsn_user set inew=inew+1 where id="&web_id)
    else
	conn.execute("update snsn_user set inew=1,inewdate=getdate() where id="&web_id)
    end if
    
end if
rscount.close
set rscount=nothing
'结束

conn.execute"insert into snsn_m_msn(fren,picid,fdate,username,nr)values('"&session("user")&"','"&id&"',getdate(),'"&rs1("poto_user_name")&"','"&nosql(request("nr"))&"')"
response.Write("<script>location.href='pic_m.asp?web_id="&web_id&"&id="&nosql(request("id"))&"';</script>")
response.end()
end if
%>
<table width="420"  border="0" cellspacing="0" cellpadding="0">
  <tr>
    <td height="22">
      <table width="420"  border="0" align="center" cellpadding="0" cellspacing="0">
        <tr>
          <td width="1" height="1"></td>
          <td height="1" colspan="2" bgcolor="#CCCCCC"></td>
          <td width="1" height="1"></td>
        </tr>
        <tr>
          <td width="1" bgcolor="#CCCCCC"></td>
          <td width="30" bgcolor="#F1F1F1"><div align="center"><span class="M"><IMG 
                              src="img/icon_04.gif" 
                              name=image1754891 width="16" height="13" border=0></span></div></td>
          <td height="25" bgcolor="#F1F1F1"><span class="M"><FONT 
                              color=#000000><a href="web.asp?web_id=<%=web_id%>"><U><%=home%></U></a></FONT> -&gt; <FONT 
                              color=#000000><a href="photo.asp?web_id=<%=web_id%>"><U><%=xc%></U></a> -&gt; <FONT 
                              color=#000000><span class="tmpstr21"><a href="photo_m.asp?web_id=<%=web_id%>" ><U>移动相册</U></a></span> <FONT 
                              color=#000000>-&gt;</FONT> <U>浏览相片</U></FONT></FONT></span></td>
          <td width="1" bgcolor="#CCCCCC"></td>
        </tr>
        <tr>
          <td width="1" height="1"></td>
          <td height="1" colspan="2" bgcolor="#CCCCCC"></td>
          <td width="1" height="1"></td>
        </tr>
      </table></td>
  </tr><tr>
    <td height="6"></td>
  </tr>
  <tr>
    <td valign="top"><div align="center">      <form name="form1" method="post" action="?web_id=<%=web_id%>&act=save&id=<%=nosql(request("id"))%>" onsubmit="return ck1()">
        <table width="98%"  border="0" align="center" cellpadding="0" cellspacing="0">
          <tr>
            <td width="1" height="1"></td>
            <td height="1" bgcolor="#CCCCCC"></td>
            <td width="1" height="1"></td>
          </tr>
          <tr>
            <td width="1" rowspan="3" bgcolor="#CCCCCC"></td>
            <td height="25" bgcolor="f9f9f9"><span class="tmpstr4"><span class="style3">&nbsp;<%=rs1("poto_title")%>&nbsp;</span><span class="tmpstr31">[上传时间:<%=rs1("poto_up_time")%>] </span></span></td>
            <td width="1" rowspan="3" bgcolor="#CCCCCC"></td>
          </tr>
          <tr>
            <td height="1" bgcolor="#CCCCCC"></td>
          </tr>
          <tr>
            <td><table width="100%"  border="0" align="center" cellpadding="0" cellspacing="5">
              <tr>
                <td><span class="tmpstr11">[简介]&nbsp;<%=rs1("poto_info")%></span></td>
              </tr>
            </table></td>
          </tr>
          <tr>
            <td width="1" height="1"></td>
            <td height="1" bgcolor="#CCCCCC"></td>
            <td width="1" height="1"></td>
          </tr>
        </table>
        <table  border="0" align="center" cellpadding="0" cellspacing="5">
          <tr>
            <td><img src=<%=rs1("poto_url")%> border="0" id=aaa></td>
          </tr>
        </table>
        <table width="99%"  border="0" cellpadding="0" cellspacing="0">
          <tr>
            <td height="25"><div align="center"><img src="img/pl.gif" width="410" height="22"></div></td>
          </tr>
		  <%if isChkInteger(request("id")) then
id=request("id")
else
response.write "<script language='javascript'>"
response.write "alert('非法操作，正在返回！');"
response.write"this.location.href='/index.asp';</SCRIPT>"
response.end
end if
		  set rs2=server.CreateObject("adodb.recordset")
rs2.open"select  * from snsn_m_msn where picid="&id&" order by id desc",conn,1,3
	  do while not rs2.eof%>
          <tr>
            <td height="25" bgcolor="#FFFFFF" class="tmpstr">&nbsp;<img src="img/news_d.gif"><%=rs2("nr")%>&nbsp;
			<%set rs_user=conn.execute("select * from [snsn_user] where username='"&rs2("fren")&"'")
			if rs_user.eof or rs_user.bof then
response.write rs2("fren")
else
response.write "<a href=""javascript:;"" onClick=""window.open('/web/"&rs_user("url")&"/index.asp?web_id="&rs_user("id")&"','cheng','scrollbars=no,resizable=no,width=920,height=565,menubar=no,top=10,left=10')"" class=over>"&rs2("fren")&"</a>"
end if
rs_user.close
set rs_user=nothing%>&nbsp;<font color=999999><%=FormatDate(rs2("fdate"),2)%></font>&nbsp;
          <%if session("id")<>"" and session("id")=cint(web_id) then %>
          <a href=pic_m.asp?web_id=<%=web_id%>&act=del&ida=<%=rs2("id")%>&id=<%=request("id")%> onClick="return confirm('确定删除')">删</a>
          <%end if%></td>
          </tr>
		    <%
rs2.movenext
	  loop%>
          <tr>
            <td height="25" bgcolor="#FFFFFF"><table width="100%"  border="0" align="center" cellpadding="0" cellspacing="5">
        <tr>
          <td><input name="nr" type="text" id="nr2" size="58" maxlength="100"  class="wenbenkuang">
              <input name="Submit" type="submit"   class="go-wenbenkuang" value="评论"></td>
        </tr>
    </table></td>
          </tr>
        </table>
        <script language=javascript>
  function ck1(){
  if(form1.nr.value==""){
  alert("请输入评论内容")
  form1.nr.focus()
  return false
    } 
    }
      </script>
        </form>
    </div></td>
  </tr>
</table>
</body>
</html>
<script language="javascript">
function cc(){
	var style1=document.all.aaa.width	
	if(style1>400){
	document.all.aaa.style.width="400px"
	}
}
cc()
</script><%
end if%>