?? manage.asp
字號:
<%Option Explicit%>
<%
dim rs_lar,rs,rs1
dim sql,sql1
dim i,id
dim conn,DBPath
'叛斷此用戶是否已經注冊
%>
<!--#include file="connpic.asp"-->
<%
Set rs = Server.CreateObject("ADODB.Recordset")
sql="select * from pic,shuoming where pic.id1=shuoming.ID order by shuoming.ID desc"
rs.open sql,conn,3,3
if not rs.eof then
rs.absolutepage=1
rs.pagesize=15
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="GENERATOR" content="Namo WebEditor v4.0(Trial)">
<meta name="ProgId" content="FrontPage.Editor.Document">
<title>圖片上傳</title>
<style>
<!--#include file="css.htm"-->
</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>
<title>天翔網交朋識友</title>
<meta name="generator" content="Namo WebEditor v4.0(Trial)">
<style type="text/css">
A:visited {
COLOR: #000000; TEXT-DECORATION: none
}
A:link {
COLOR: #000000; TEXT-DECORATION: none
}
A:hover {
COLOR: #0080c0; TEXT-DECORATION: none
}
TD {
FONT-SIZE: 9pt; COLOR: #000000; FONT-FAMILY: "宋體"
}
.f1 {
LINE-HEIGHT: 18px
}
.en {
FONT-WEIGHT: bold; FONT-FAMILY: "Arial","Verdana"
}
.new {
FONT-WEIGHT: bold; COLOR: #ff3300; FONT-FAMILY: "Arial"
}
.line {
LINE-HEIGHT: 19px
}
.STYLE1 {
color: #FFFFFF;
font-size: 16px;
font-weight: bold;
}
</style>
<SCRIPT language=JavaScript>
<!--
function MM_openBrWindow(theURL,winName,features) { //v2.0
if (theURL != "fuckyou")
{ window.open(theURL,winName,features);}
}
//-->
</SCRIPT></head>
<body align=center background="back.gif">
<p>
<!------------------------------------------------------------------------------------------------------------------------------>
<div align=center>
</p>
<table width="70%" height="56" border="0" cellspacing="0">
<tr>
<td><div align="right"><a href="sendphoto.asp">退出管理</a></div></td>
</tr>
</table>
<table border="0" width="70%" cellspacing="0" cellpadding="1" bgcolor=blue>
<tr>
<td valign="top">
<table width="100%" border="1" cellpadding="0" cellspacing="0" bordercolor="#006666" bgcolor=white>
<tr>
<td height="28"><font color=blue>
<div align="center">圖片說明</div></td>
<td ><font color=blue>
<div align="center">姓名</div></td>
<td width="25%" ><font color=blue><div align="center">操作</div></td>
</tr>
<%
for i=1 to rs.pagesize%>
<%if rs.eof then
exit for
end if
%>
<tr>
<td width="25%" height="36"><div align="center"><%=rs("shuoming")%></div></td>
<td width="15%"><div align="center"><%=rs("name")%></div></td>
<td height="36" colspan="3"><p align="center"><a href="displaypic1.asp?id=<%=rs("id")%>">[查看]</a> <a href="del.asp?id=<%=rs("id")%>">[刪除]</a> </td>
</tr>
<%rs.movenext
%>
<%next%>
</table>
</td>
</tr>
</table>
分頁: <%for i=1 to rs.pagecount%>
<a href="numpage.asp?id=<%=i%>"><%=i%></a> <%next%>
<center><a href="sendphoto.asp"></a>
<%end if %>
<form action="addshuoming.asp" method=post >
<table width="70%" border="1" cellpadding="0" cellspacing="0" bordercolor="#003366">
<tr>
<td height="23" bgcolor="#336699"><span class="STYLE1"><font color="#FFFFFF">
<center>
<div align="center"><span class="STYLE1">相片管理子系統</span></div></td>
</tr>
<tr>
<td>
<p align="left"> </p>
<p align="left">你的名字:
<input type="text" name="name" size="20">
</p>
<p align="left">相片說明:
<input type="text" name="shuoming" size="40"></p>
<p align="center"><input type="submit" value=" 下一步 " name="B3"> </p></td>
</tr>
</table>
</form>
<center>
</center>
</body>
</html>
</script>
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -