以下是 新書內容:

FileUpload控制項真的簡單好用,不使用它來作批次上傳,卻要改用別的方法,實在不聰明。要用就一次用到底,

公開FileUpload控制項「批次上傳」的範例,千萬不能錯過。

首先,進行HTML畫面的設計,根據上圖,在畫面上使用多個 FileUpload控制項,然後搭配一個按鈕控制項即可

除此以外,範例 8_Multi_Upload.aspx還加入了「避免上傳同名檔案」的功能(本範例共有三種子功能,其中沿用本章之前介紹的兩個範例),可以說是把本章的各種範例作一個大融合。

(本文於2008/10/14修改)以下是後置程式碼:
 

 

    Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click
        '--註解:網站上的目錄路徑。所以不寫磁碟名稱(不寫 “實體”路徑)。
        Dim saveDir As String = "\[Book]FileUpload\Uploads\"
        Dim appPath As String = Request.PhysicalApplicationPath

        Dim tempfileName As String = Nothing
        Dim myLabel As New System.Text.StringBuilder

        Dim i As Integer        

        For i = 1 To (Request.Files.Count)
            Dim myFL As New FileUpload
            myFL = CType(Page.FindControl("FileUpload" & i), FileUpload)

            If (myFL.HasFile) Then
                Dim fileName As String = myFL.FileName
                Dim pathToCheck As String = appPath & saveDir & fileName

                '========================================(Start)
                If (System.IO.File.Exists(pathToCheck)) Then
                    Dim my_counter As Integer = 2
                    Dim error_msg As String = Nothing

                    While (System.IO.File.Exists(pathToCheck))
                        ' --檔名相同的話,目前上傳的檔名(改成 tempfileName),前面會用數字來代替。
                        tempfileName = my_counter.ToString & "_" & fileName
                        pathToCheck = appPath & saveDir & tempfileName
                        my_counter = my_counter + 1
                    End While

                    fileName = tempfileName
                    error_msg = error_msg & "<br>抱歉,您上傳的檔名發生衝突,檔名修改--- " & fileName
                    Label1.Text = error_msg

                End If

                ' –完成檔案上傳的動作。
                Dim savePath As String = appPath & saveDir & fileName
                myFL.SaveAs(savePath)
                '========================================(End)
                myLabel.Append("<hr>檔名---- " & fileName)
            End If
        Next

        Label2.Text = "上傳成功" & myLabel.ToString
    End Sub

本範例, C#的語法在此 ---- [C#]FileUpload控制項「批次上傳 / 多檔案同時上傳」的範例

以下是新書內容:

更完整的內容,書本裡面都有~~

 --------------------------------------------------------------------------------------------------------------------------------------------

Nick網友修改後的範例:Project.rar

 

 ...........................................................................................................................................................

本書的相關範例,還有----

  • 避免上傳的「檔名」重複。會自動修改檔名並且提示。
  • 限制上傳檔案的大小(用程式控制、或是透過Web.Config設定檔來作)
  • 限制上傳檔案的「副檔名」
  • 限制上傳時,Server端的目錄(避免上傳到其他目錄,有安全疑慮)

這些都是常用、網路上最常問到的範例,本書通通有~

 

 

 

 

補充----

 

 

 

今日值班正妹,Jolin

 


 

 

......  寄信給我    mis2000lab (at) 雅虎.com.台灣 ................................................................................................................
ASP.NET專題實務  (文魁出版,VB版 P8187 / C#版P09027

              下集已經出版囉~~~ASP.NET專題實務II:範例應用與4.0新功能

.............................................................................................................. 寄信給我    mis2000lab (at) 雅虎.com.台灣 ........