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

📄 upload.asp

📁 Flash电子相册 v1.2 Build 1108完整版本下载
💻 ASP
字号:
<%Server.ScriptTimeout = 600%>
<!-- #include file="conn.asp" -->
<!-- #include file="const.asp" -->
<%
   dim inname
   inname=session("inname")
if inname="" then
  response.redirect "login.asp"
else
function upnum()
    	tmprs=conn.execute("Select upnum from [user] where nickname='"&inname&"'") 
    	upnum=tmprs(0) 
	set tmprs=nothing 
end function

   if fileset < 1 then 
   Response.write "<script>alert('对不起!本上传功能已关闭!(The Funtion is close!)');history.back();</script>"
   else %>
<html>
<head>
<title>WLONG3D文件上传系统wlup3.5</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">

<link rel="stylesheet" href="FORUM.CSS" type="text/css">
<script language="JavaScript" type="text/JavaScript">
<!--
function MM_goToURL() { //v3.0
  var i, args=MM_goToURL.arguments; document.MM_returnValue = false;
  for (i=0; i<(args.length-1); i+=2) eval(args[i]+".location='"+args[i+1]+"'");
}
//-->
</script>
</head>
<body bgcolor="#FFFFFF" text="#000000">

<form name="form1" method="post" action="upfile<%=uplink%>.asp" enctype="multipart/form-data" >
  <table border="0" cellspacing="1" cellpadding="3" bordercolorlight="#000000" bordercolordark="#CCCCCC" width="90%" height="23" align="center" bgcolor="#6699FF">
    <tr bgcolor="#FFFFFF"> 
      <td align="left" valign="middle" width="25%" height="70"> 
        <div align="center"><a href="http://www.wlong3d.com"><img src="<%=logopath%>" border="0"></a></div>
      </td>
      <td align="left" valign="middle" width="68%" height="70"> 
        <div align="center"><img src="upfile/map/JJCBAR.GIF" width="468" height="60"></div>
      </td>
    </tr>
  </table>
  <br>
  <input type="hidden" name="act" value="upload">
  <br>
  <table width="90%" border="0" cellspacing="1" cellpadding="5" align="center" bordercolordark="#CCCCCC" bordercolorlight="#000000" bgcolor="#6699FF">
    <tr bgcolor="#CCCCCC"> 
      <td align="center" bgcolor="#99CCFF"><strong>&nbsp; <font size="3">WLONG3D文件上传系统wlup3.5</font></strong></td>
    </tr><% if uplink=1 then %>
    <tr bgcolor="#CCCCCC">
      <td align="center" bgcolor="#FFCC00">【<a href="editmyfile.asp" title="这里可以对已经存储的文件进行修改、删除管理。">管理我的上传文档</a>】&gt;&gt;&gt;目前你有<font color="#FF0000"><%=upnum()%></font>个<font color="#0000FF">存储文档模式</font>的上传文件。</td>
    </tr><% end if %>
    <tr align="left" valign="middle" bgcolor="#eeeeee"> 
      <td bgcolor="#FFFFFF" height="92" valign="top"> <br> <table width="70%" border="0" cellspacing="1" cellpadding="2" align="center">
          <tr> 
            <td><b><font color="#FF0000">*</font></b>上传的文件类型:<font color="#FF0000"><%=FileType%></font></td>
          </tr>
          <tr> 
            <td><font color="#FF0000"><b>*</b></font>上传的文件大小不能超过<font color="#FF0000"><%=FileMaxSize\1024%>KB</font>字节</td>
          </tr>
          <tr> 
            <td> <% if upset > 1 then %> <b><font color="#FF0000">*</font></b>每次可以设置同时上传<font color="#FF0000"><%=upset%></font>个文件。<br> <script language="javascript">
	  function setid()
	  {
	  str='<br>';
	  if(!window.form1.upcount.value)
	   window.form1.upcount.value=1;
	  if(window.form1.upcount.value><%=upset%>){
	  alert("您最多只能同时上传<%=upset%>个文件!");
	  window.form1.upcount.value = <%=upset%>;
	  setid();
	  }
	  else{
 	  for(i=1;i<=window.form1.upcount.value;i++)
	     str+='<div align="center">文件'+i+':<input type="file" name="file'+i+'" style="width:400" class="tx1"></div><br><br>';
	  window.upid.innerHTML=str+'<br>';}
	  }
	    </script>
              设置上传的个数 
              <input type="text" class="buttonface" value="1" name="upcount"> 
              <input type="button" name="Button" class="buttonface" onClick="setid();" value="· 设定 ·"> 
              <% end if %> </td>
          </tr>
          <tr> 
            <td> <% if pathset = 1 then %> <b><font color="#FF0000">*</font></b>请设置你要上传的文件路径: 
              <select name="filepath" class="buttonface">
                <option value="map/" selected>图片类型</option>
                <option value="soft/">软件类型</option>
                <option value="txt/">文件类型</option>
                <option value="vedio/">视频类型</option>
                <option value="midi/">音乐类型</option>
              </select> <%  end if %> </td>
          </tr>
          <tr> 
            <td> <% if nameset > 1 then %> <font color="#FF0000"><b>*</b></font><font color="#0033FF">请使用英文或数字作为文件名!</font> 
              <% end if %> </td>
          </tr>
        </table></td>
    </tr>
    <tr align="center" valign="middle"> 
      <td height="122" align="left" valign="middle" bgcolor="#FFFFFF" id="upid"> 
        <div align="center"> 
          <p>文件1: 
            <input type="file" name="file1" style="width:400" class="buttonface" size="50">
          </p>
        </div></td>
    </tr>
    <tr align="center" valign="middle" bgcolor="#eeeeee"> 
      <td height="24" valign="middle" bgcolor="#99CCFF"> <input type="submit" name="Submit" value="· 提交 ·" class="buttonface"> 
        <input type="reset" name="Submit2" value="· 重执 ·" class="buttonface">
        <br>
        <br>
        <input name="Submit3" type="button" class="buttonface" onClick="MM_goToURL('parent','LOGIN.ASP');return document.MM_returnValue" value="【退出系统】"> </td>
    </tr>
    <tr align="center" valign="middle" bgcolor="#eeeeee"> 
      <td height="24" valign="middle" bgcolor="#FFCC00">版权所有&nbsp;&copy;&nbsp;2001-2004&nbsp;<a href="http://www.wlong3d.com" target="_blank">www.wlong3d.com</a></td>
    </tr>
  </table>
</form>
<% end if %> 
    
</body>
</html>
<% end if %>
<script language="javascript"> 

setid(); 
</script>
<% conn.close
   set conn=nothing
   %>

⌨️ 快捷键说明

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