📄 multiupload.aspx

📁 本文件包基于asp.net + javascript方式
💻 ASPX
字号:
<%@ Page Language="vb"%>
<script language="vb" runat="server">
 Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
    MyTitle.Text = "<h2>网页所需文件上传</h2>"
    Upload.Text = "开始上传"
    If (Me.IsPostBack) Then Me.SaveImages()
  End Sub

  Private Function SaveImages() As System.Boolean
    '遍历File表单元素
    Dim files As System.Web.HttpFileCollection = System.Web.HttpContext.Current.Request.Files
    '状态信息
    Dim strMsg As New System.Text.StringBuilder("上传的文件分别是：<hr>")
    Dim iFile As System.Int32
    Try
      For iFile = 0 To files.Count - 1
        '检查文件扩展名字
        Dim postedFile As System.Web.HttpPostedFile = files(iFile)
        Dim fileName, fileExtension As System.String
        fileName = System.IO.Path.GetFileName(postedFile.FileName)
        If Not (fileName = String.Empty) Then
          fileExtension = System.IO.Path.GetExtension(fileName)
          strMsg.Append("上传的文件类型：" + postedFile.ContentType.ToString() + "<br>")
          strMsg.Append("客户端文件地址：" + postedFile.FileName + "<br>")
          strMsg.Append("上传文件的文件名：" + fileName + "<br>")
          strMsg.Append("上传文件的扩展名：" + fileExtension + "<br><hr>")
          '可根据扩展名字的不同保存到不同的文件夹
          postedFile.SaveAs(System.Web.HttpContext.Current.Request.MapPath("userweb\images") + "\" +fileName)
        End If
      Next
      strStatus.Text = strMsg.ToString()
      Return True
    Catch Ex As System.Exception
      strStatus.Text = Ex.Message
      Return False
    End Try
  End Function
</script>

<HTML>
  <HEAD>
    <title>多文件上传</title>
    <meta http-equiv="Content-Type" content="text/html; charset=gb2312">
	<style>
	td{font-size:10pt}
	input{border:1px solid #800000}
	</style>
	<script language="JavaScript">
    function addFile()
    {
    	var str = '<INPUT type="file" size="50" NAME="File">'
    	document.getElementById('MyFile').insertAdjacentHTML("beforeEnd",str)
    }
function window.onload ()
{
	if(window.opener !=null){
		var oForm=window.opener .document.all.sys_upload;
		//var otable=document.createElement("table");
		//document.all.sys_upload.appendChild(otable);
		var otable=document.all.sys_files;
		var i;
		var ofile="<input type=\"file\" name=\"File\">"
		for(i=0;i<oForm.elements.length;i++){
			if(oForm[i].type=="hidden"){
				var otr=otable.insertRow();
				var otdvalue=otr.insertCell();
				var otdfile=otr.insertCell();
				otdvalue.align="right";
				otdvalue.width="50%";
				otdvalue.innerHTML=oForm[i].value+"&nbsp;&nbsp;";
				otdfile.innerHTML=ofile;
				if(i%2!=0) otr.style.backgroundColor="#E6E6FA"
				else
					otr.style.backgroundColor="#ffffff"
			}
		}
	}
	else
		window.close();
}
    </script>
  
  </HEAD>
  <body bgcolor="#ffcc66">
    <form id="sys_upload" method="post" runat="server" enctype="multipart/form-data">
      <center>
        <asp:Label Runat="server" ID="MyTitle"></asp:Label>
        <P id="MyFile">
          <asp:Button Runat="server" Text="上传" ID="Upload"></asp:Button>
        </p>
      </center>
      <P align="center">
        <asp:Label id="strStatus" runat="server" Font-Names="宋体" Font-Bold="True"
         Font-Size="9pt" Width="500px" BorderStyle="None" BorderColor="White"></asp:Label>
      </P>
      <table width="90%" align="center" cellpadding="0" cellspacing="0" bgcolor="#FFFAF0">
        <tr>
          <td>
            <table id=sys_files width="100%" cellpadding="3" cellspacing="1">
          </td>
        </tr>
      </table>
    </form>
  </body>
</HTML>
⌨️ 快捷键说明

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