📄 sendphoto.asp
字号:
<%Option Explicit%><!--#include file="conn.asp"--><%
dim rs_lar,rs
dim sql
dim i
'叛断此用户是否已经注册 k666软件园 收集 http://www.vv66.net
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>
<LINK href="pic/gufeng.css" rel=stylesheet>
<script language="JavaScript" src="pic/fade_image.js"></script>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<meta name="ProgId" content="FrontPage.Editor.Document">
<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>
<title>..::味道网::..交友中心</title>
<SCRIPT language=JavaScript>
<!--
function MM_openBrWindow(theURL,winName,features) { //v2.0
if (theURL != "fuckyou")
{ window.open(theURL,winName,features);}
}
//-->
</SCRIPT></head>
<body topmargin="0" leftmargin="0">
<!--#include file="hand.htm" -->
<div align="center">
<table border="0" cellpadding="0" cellspacing="0" width="777" height="228">
<tr>
<td width="512" height="196" bgcolor="#FCFCFC" rowspan="2" valign="top">
<table border="0" width="100%" cellspacing="0" cellpadding="0">
<tr>
<td width="47%" height="65" valign="top">
<form enctype="multipart/form-data" action="addpic.asp" method=post onsubmit="return mysubmit(this)">
<table border="0" width="100%" cellspacing="0" cellpadding="0">
<tr>
<td width="277" bgcolor="#FFFFFF"><font color="#000000" size="2">相片上传</font></td>
</tr>
<tr>
<td width="331">
<p align="center"><font color="#000000" size="2">大相片 <input type="file" name="big" size="20"></font></p>
</td>
</tr>
<tr>
<td width="337">
<p align="center"><font color="#000000" size="2"><input type="submit" value=" 上传 " name="B3"> </font></p>
</td>
</tr>
</table>
</form>
<form>
<table border="0" width="100%" height="13" cellspacing="0" cellpadding="0">
<tr>
<td width="100%" height="10" bgcolor="#FFFFFF" colspan="2"><font color="#000000" size="2">您已上传<%=rs.recordcount%>张相片</font></td>
</tr>
<%for i=1 to rs.recordcount%>
<tr>
<td width="55%" height="5"><font color="#000000" size="2">第<%=i%>张</font></td>
<td width="45%" height="5">
<p align="right"><a href="displaypic.asp?id=<%=rs("id")%>"><font color="#000000" size="2">[查看]</font></a><font color="#000000" size="2"><a href="delphoto.asp?id=<%=rs("id")%>&user_id=<%=rs("user_id")%>">[删除]</a></font></td>
</tr>
<%rs.movenext%>
<%next%>
</table>
</form>
<font color="#000000" size="2">
<br>
</font>
<table border="0" width="100%" cellspacing="0" cellpadding="0">
<tr>
<td width="100%">
<p align="center"><a href="read.asp?user_id=<%=session("user_id")%>" ><font color="#000000" size="2">查看个人资料</font></a></td>
</tr>
</table>
</td>
<td width="3%" height="65" valign="top">++</td>
<td width="50%" height="65" valign="top" style="border-left-style: solid; border-left-width: 1">
<table border="0" width="100%" cellspacing="0" cellpadding="0">
<tr>
<td width="100%" bgcolor="#FFFFFF"><font color="#000000" size="2">关于相片上传</font></td>
</tr>
<tr>
<td width="100%"><font color="#000000" size="2"> </font></td>
</tr>
<tr>
<td width="100%"><font color="#000000" size="2">请注意<span class="content">相片规格</span>:</font></td>
</tr>
<tr>
<td width="100%"><font color="#000000" size="2">1.相片文件大小在60K以下</font></td>
</tr>
<tr>
<td width="100%"><font color="#000000" size="2">2.相片格式：GIF、JPG</font></td>
</tr>
<tr>
<td width="100%"><font color="#000000" size="2"> </font></td>
</tr>
<tr>
<td width="100%"><font color="#000000" size="2">上传相片内容说明</font></td>
</tr>
<tr>
<td width="100%"><font color="#000000" size="2">1.不得上传色情图片,如有违者一切后果自负</font></td>
</tr>
<tr>
<td width="100%"><font color="#000000" size="2">2.不得上传与本人无关的相片</font></td>
</tr>
<tr>
<td width="100%"><font color="#000000" size="2"> </font></td>
</tr>
<tr>
<td width="100%"><font color="#000000" size="2">广大网友如有发现有和人物的相片不合，请<a href="mailto:kinwah.chen@sohu.com">通知管理员</a></font></td>
</tr>
</table>
</td>
</tr>
</table>
</td>
<td width="5" height="196" bgcolor="#EABB00" rowspan="2"> </td>
<td width="235" height="51" bgcolor="#EABB00" valign="top">
为了体现您完美与真实的自我，请祥细和认真的填写您的个人档案。
<p> 如果您想上传照片，请提交了个人档案以后，进入<a href="sendphoto.asp">[相片上传]</a>栏目。</p>
<p> 本交友中心初建于2001年5月，至今已得到了很多网友的支持。<span style="font-family:宋体; font-size: 9pt"><a href=# title=点击些处，关于我们... style="color:blue" target="_new" onClick="javascript:alert('\t\『味道网\』 版权所有\n\n程序设计:Kinwah.CHEN \n\t 陈贤福\n\n站点美工:陈健华\n\t 陈贤福 Ai\n\n社区顾问:Kinwah.CHEN\n\n味道网(C.)2001-2003');return false;"><font color="#000000">..:味道网:.</font></a></span>在此特向所有持我们网站的网友表示感谢！</p>
<p> 祝愿所有的网友都能找到人生知己。
</p>
<p align="right"><span style="font-family:宋体; font-size: 9pt"><a href=# title=点击些处，关于我们... style="color:blue" target="_new" onClick="javascript:alert('\t\『味道网\』 版权所有\n\n程序设计:Kinwah.CHEN \n\t 陈贤福\n\n站点美工:陈健华\n\t 陈贤福 Ai\n\n社区顾问:Kinwah.CHEN\n\n味道网(C.)2001-2003');return false;"><font color="#000000">..:味道网:.</font></a></span></p>
<p align="right">2001-05-08.
</p>
</td>
</tr>
<tr>
<td width="235" height="1" bgcolor="#EABB00">
<hr size="1" color="#FFCE09">
</td>
</tr>
</table>
</div>
<div align="center">
<center>
<table border="0" cellpadding="0" cellspacing="0" width="777" bgcolor="#FFFFFF" height="22">
<tr>
<td width="100%" height="22"><img border="0" src="ku/dididi.gif" width="777" height="28"></td>
</tr>
</table>
</center>
</div>
<div align="center">
<center>
<table border="0" cellpadding="0" cellspacing="0" width="777" height="29" bgcolor="#EABB00">
<tr>
<td width="773" height="29">
<p align="center"> ..:味道网:.. 版权所有，<span style="font-family:宋体; font-size: 9pt"><a href=# title=点击些处，关于我们... style="color:blue" target="_new" onClick="javascript:alert('\t\『味道网\』 版权所有\n\n程序设计:Kinwah.CHEN \n\t 陈贤福\n\n站点美工:陈健华\n\t 陈贤福 Ai\n\n社区顾问:Kinwah.CHEN\n\n味道网(C.)2001-2003');return false;"><font color="#000000">Three-UNknown拍档组合</font></a></span>©2001-2003
All Rights Reserved</p>
</td>
</tr>
</table>
</center>
</div>
<div align="center">
<center>
<table border="0" cellpadding="0" cellspacing="0" width="777" bgcolor="#000000">
<tr>
<td width="100%"></td>
</tr>
</table>
</center>
</div>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -