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

📄 manage.asp

📁 文件上传功能。本例中包括文件上载有组件和无组件两种上载方法。
💻 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>&nbsp<%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">&nbsp;</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 + -