photoview.asp
上传用户:stone001
上传日期:2016-10-28
资源大小:685k
文件大小:1k
源码类别:

WEB源码(ASP,PHP,...)

开发平台:

ASP/ASPX

  1. <!--插入html头部分以及数据库接口-->
  2. <!--#include file="in_conn.asp"-->
  3. <body style="font-family: 宋体;font-size: 9pt;line-height: 14pt;color: <% =cotxt %>; background:<% =bg3 %>">
  4. <!--权限判断-->
  5. <%
  6. if u_name="" then
  7. Response.Redirect "log_err.asp"
  8. end if
  9. u_power=conn.Execute("SELECT power FROM tblmates WHERE name='"&u_name&"'",0,1)(0)
  10. IF u_power=0 THEN
  11. Response.Redirect "resp.asp?cmd=id_wait"
  12. END IF
  13. %>
  14. <%
  15. '获取id传值
  16. dim vid
  17. IF isNumeric(Request.QueryString("id")) THEN
  18. vid=CLng(Request.QueryString("id"))
  19. '找出该照片
  20. sqlstr="SELECT p_url FROM tblphoto WHERE p_ID="&vid
  21. rs.open sqlstr,conn,0,1
  22. if rs.eof AND rs.bof then
  23. response.Redirect "resp.asp?cmd=phidmiss"
  24. else
  25. %>
  26. <br>
  27. <table align="center" width="25" height="25" border="0" cellspacing="0" cellpadding="0" class="rdkuang" style="padding:5px;">
  28. <tr>
  29. <th width="100%" height="100%" valign="top">
  30. <img src="<% =rs("p_url") %>" border="0">
  31. </th>
  32. </tr>
  33. </table>
  34. <%   end if
  35. rs.close
  36. ELSE
  37. Response.Redirect "resp.asp"
  38. END IF
  39. %>
  40. <!--插入网站置底-->
  41. <!--#include file="in_bottom.asp"-->
  42. </body>
  43. </html>