Private Function Save() As System.Boolean
        '遍历File表单元素
        Dim files As System.Web.HttpFileCollection = System.Web.HttpContext.Current.Request.Files
        '状态信息
        Dim strMsg As New System.Text.StringBuilder("上传的文件分别是:<hr color=red>")
        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("text/公司新闻/") + 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

解决方案 »

  1.   

    <script language="JavaScript">
        function addFile()
        {
         var str = '<INPUT type="file" size="50" NAME="File">'
         document.getElementById('MyFile').insertAdjacentHTML("beforeEnd",str)
        }
    </script><form id="Form1" method="post" encType="multipart/form-data" runat="server">
    <center>
    <asp:Label Runat="server" ID="MyTitle"></asp:Label>
    <P id="MyFile"><INPUT type="file" size="50"></P>
    <P>
    <input type="button" value="增加(Add)" onclick="addFile()">
    <asp:Button Runat="server" Text="上传" ID="Upload"></asp:Button>
    <input onclick="this.form.reset()" type="button" value="重置(ReSet)">
    </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>
    </form>