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

📄 sendphoto.asp

📁 在线交友模块:在线交友是指通过网络来结交朋友。利用网络资源的无限性实现跨地域的信息交流
💻 ASP
字号:
<%Option Explicit%>
<!--#include file="conn.asp"-->
<%
dim rs_lar,rs
dim sql
dim i

'判断此用户是否已经注册
Set rs_lar = Server.CreateObject("ADODB.Recordset")
sql="select * from larchives where user_id =" & session("user_id")
rs_lar.open sql,conn,3,2

if rs_lar.eof and rs_lar.bof then
    if session("user_id")=1 then response.redirect "notreg.htm"
	 response.redirect "notregist.htm"
	 response.end
end if

%>
<!--#include file="connpic.asp"-->
<%
Set rs = Server.CreateObject("ADODB.Recordset")
sql="select * from pic where user_id=" & session("user_id")
rs.open sql,conn,3,2
%>
<HTML><HEAD><TITLE>会员相片上传</TITLE>
<META http-equiv=Content-Type content="text/html; charset=gb2312">
<STYLE type=text/css>TD {
	FONT-SIZE: 12px; COLOR: #800000; LINE-HEIGHT: 18pt
}
A {
	FONT-SIZE: 9pt; COLOR: red; TEXT-DECORATION: none
}
A:hover {
	COLOR: #000000; TEXT-DECORATION: none
}
.pt {
	BORDER-RIGHT: #000000 1px solid; BORDER-TOP: #ffffff 1px solid; FONT-SIZE: 9pt; BORDER-LEFT: #ffffff 1px solid; COLOR: #000000; BORDER-BOTTOM: #000000 1px solid
}
.put {
	BORDER-RIGHT: #f7e0e0 1px solid; BORDER-TOP: #f7e0e0 1px solid; FONT-SIZE: 9pt; BORDER-LEFT: #f7e0e0 1px solid; COLOR: #000000; BORDER-BOTTOM: #f7e0e0 1px solid; BACKGROUND-COLOR: #fef7f7
}
input {
	BORDER-RIGHT: #f7e0e0 1px solid; BORDER-TOP: #f7e0e0 1px solid; FONT-SIZE: 9pt; BORDER-LEFT: #f7e0e0 1px solid; COLOR: #000000; BORDER-BOTTOM: #f7e0e0 1px solid; BACKGROUND-COLOR: #fef7f7
}
select {
	BORDER-RIGHT: #f7e0e0 1px solid; BORDER-TOP: #f7e0e0 1px solid; FONT-SIZE: 9pt; BORDER-LEFT: #f7e0e0 1px solid; COLOR: #000000; BORDER-BOTTOM: #f7e0e0 1px solid; BACKGROUND-COLOR: #fef7f7
}
BODY {
	SCROLLBAR-FACE-COLOR: #ee9999; SCROLLBAR-HIGHLIGHT-COLOR: #fef7f7; SCROLLBAR-SHADOW-COLOR: #fef7f7; SCROLLBAR-3DLIGHT-COLOR: #fef7f7; SCROLLBAR-ARROW-COLOR: #ffffff; SCROLLBAR-TRACK-COLOR: #fef7f7; SCROLLBAR-DARKSHADOW-COLOR: #fef7f7
}
</STYLE>
<Script language="javascript">
function mysubmit(theform)
{
    if(theform.big.value=="")
    {
    alert("请点击浏览按钮,选择您要上传的jpg或gif文件!")
    theform.big.focus;
    return (false);
    }
    else
    {
    str= theform.big.value;
    strs=str.toLowerCase();
    lens=strs.length;
    extname=strs.substring(lens-4,lens);
    if(extname!=".jpg" && extname!=".gif")
    {
    alert("请选择jpg或gif文件!");
    return (false);
    }
    }
    return (true);
}
</script>
</HEAD>
<BODY leftMargin=0 topMargin=0>
<TABLE cellSpacing=0 cellPadding=0 width=760 border=0 height="274">
<TBODY>
  <TR vAlign=top>
    <TD width=221 height=274><IMG src="img/007.gif"></TD>
    <TD width=14 background=img/guestbk.gif height=274></TD>
    <TD width=525 height=274>
      <DIV align=center>
      <DIV align=center>
      <CENTER>
      <TABLE width="420" border=0>
        <TBODY>
        <TR>
          <TD height=12 width="424"> 
<form enctype="multipart/form-data" action="addpic.asp" method=post onsubmit="return mysubmit(this)">
<table border="1" width="422" cellspacing="0" cellpadding="0" bordercolor="#F7E0E0" style="border-collapse: collapse" height="60">
        <tr>
          <td width="420" bgcolor="#FEF7F7" height="10"><font color="#000000"><b><center><font style="FONT-SIZE: 14px; FILTER: Shadow(Color=999999,direction=150); HEIGHT: 0px">相片上传--></font></center></b></font></td>
        </tr>
        <tr>
          <td width="420" height="24">
            <p align="center">传相片:&nbsp; <input type="file" name="big" size="20"></p>
          </td>
        </tr>
        <tr>
          <td width="420" height="24">
            <p align="center"><input type="submit" value="  上传  " name="B3">  <a href="read.asp?user_id=<%=session("user_id")%>" >查看个人资料</a></p>
          </td>
        </tr>
      </table></form>
          </TD></TR></TBODY></TABLE></CENTER><form>
      <table border="0" width="347" height="1" cellspacing="0" cellpadding="0">
        <tr>
          <td width="347" height="1" bgcolor="#F7E0E0" colspan="2"><b>您已上传<%=rs.recordcount%>张相片</b></td>
        </tr>
        <%for i=1 to rs.recordcount%>
        <tr>
          <td width="34" height="1">第<%=i%>张</td>
          <td width="313" height="1">
            <p align="right"><a href="displaypic.asp?id=<%=rs("id")%>">[查看]</a><a href="delphoto.asp?id=<%=rs("id")%>&user_id=<%=rs("user_id")%>">[删除]</a></td>
        </tr>
        <%rs.movenext%>
        <%next%>
      </table>
      </form>
      <table cellSpacing="0" cellPadding="0" width="66%" border="0">
        <tr style="font-size: 9pt">
          <td width="100%" style="font-size: 9pt"><b>请注意<span class="content">相片规格</span>:</b></td>
        </tr>
        <tr style="font-size: 9pt">
          <td width="100%" style="font-size: 9pt">1.相片文件大小在60K以下</td>
        </tr>
        <tr style="font-size: 9pt">
          <td width="100%" style="font-size: 9pt">2.相片格式:GIF、JPG<table cellSpacing="0" cellPadding="0" width="100%" border="0">
            <tr style="font-size: 9pt">
              <td width="100%" style="font-size: 9pt"><b>上传相片内容说明</b></td>
            </tr>
            <tr style="font-size: 9pt">
              <td width="100%" style="font-size: 9pt">1.不得上传色情图片,如有违者一切后果自负</td>
            </tr>
            <tr style="font-size: 9pt">
              <td width="100%" style="font-size: 9pt">2.不得上传与本人无关的相片</td>
            </tr>
            <tr style="font-size: 9pt">
              <td width="100%" style="font-size: 9pt">&nbsp;</td>
            </tr>
          </table>
          </td>
        </tr>
      </table>
      </DIV></DIV></TD></TR></TBODY></TABLE>
<!--#include file=CopyRight.asp -->
</BODY></HTML>

⌨️ 快捷键说明

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