[習題]FileUpload 批次上傳 / 多檔案同時上傳，上傳成功後展示圖片 (圖片預覽 / VB語法)

2011年3月4日星期五

[習題]FileUpload 批次上傳 / 多檔案同時上傳，上傳成功後展示圖片 (圖片預覽 / VB語法)

http://www.dotblogs.com.tw/mis2000lab/archive/2010/12/01/fileupload_show_image_20101201.aspx

[習題]FileUpload控制項「批次上傳 / 多檔案同時上傳」，上傳成功後展示圖片 (圖片預覽 / VB語法)

有人在論壇上發問：
「檔案透過 FileUpload控制項上傳成功之後，
如何 "立即" 呈現在畫面上呢？ (圖片預覽)」

這很簡單，請參閱以前的範例：

VB語法： FileUpload控制項「批次上傳 / 多檔案同時上傳」的範例 (VB語法)

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

沿用上面的範例，繼續作下去即可。

(1). 在 HTML畫面的最下方，添加幾個 Image控制項。

上傳之後，立即呈現圖片！

1" runat="server" Visible="False" />
2" runat="server" Visible="False" />
3" runat="server" Visible="False" />

4" runat="server" Visible="False" />
5" runat="server" Visible="False" />

把每一個 Image控制項設定為 .Visible = False，讓它隱形起來（看不見）

(2). 後置程式碼（VB）的範例裡面，
我們在 For...Next迴圈裡面，加上這幾列程式碼即可。很簡單。

Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click
'--註解：網站上的目錄路徑。所以不寫磁碟名稱（不寫 “實體”路徑）。
'--以下的路徑，請依照實際狀況，進行修改。否則程式會報錯！

Dim saveDir As String = "VS2010_Book_Sample\[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.Form.FindControl("FileUpload" & i), FileUpload)

Dim myImg As New Image
myImg = CType(Page.Form.FindControl("Image" & i), Image)

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
'=========================
'==省略，跟上面的範例程式一模一樣。
'=========================
End If

' –完成檔案上傳的動作。
Dim savePath As String = appPath & saveDir & fileName
myFL.SaveAs(savePath)
'========================================(End)

myLabel.Append("

檔名---- " & fileName)

'*******************************************************
'*** 上傳後，立即展示圖片 *************************

myImg.Visible = True

'--以下的路徑，請依照實際狀況，進行修改。否則程式會報錯！
myImg.ImageUrl = "http://localhost:8080/WebSite1/這裡是你上傳檔案的路徑，請自行修改/" & fileName

'*******************************************************
End If
Next

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

=================================================================================
這個範例最有趣的地方，就是我用迴圈，
自動產生變數名稱，例如： FileUpload1、FileUpload2、FileUpload3......等等。

或是 Image1、Image2、Image3......等等。

（請看上面紅字的部分）

這種作法從以前 ASP / JSP / PHP都可以用，一直到 ASP.NET都可以繼續這樣玩下去。

我看見很多高手都會這招（常在程式碼裡面有見過這種技巧），但好像沒人想公開出來

（依照我的教學經驗來看，對初學者來說，你講了他們也「暫時」聽不懂。）

=================================================================================

如果不使用上面的兩種技巧，初學者也可以乖乖地用五個 if判別式來作（以下是C#語法）

（一個 FileUpload控制項，就作一次，程式碼不斷COPY 修改即可）。