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

2010-12-01

21635
0
ASP.NET 4.0與 VS 2010
2013-08-02

有人在論壇上發問：

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

原有的範例，多加幾列程式碼就OK囉～

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

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

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

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

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

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

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

 
 <asp:Label ID="Label1" runat="server" ForeColor="#FF3300"></asp:Label> 
 <asp:Label ID="Label2" runat="server" ForeColor="darkblue"></asp:Label>
 <hr />
 上傳之後，立即呈現圖片！ 
 
 
 
 <asp:Image ID="Image1" runat="server" Visible="False" />   
 <asp:Image ID="Image2" runat="server" Visible="False" />   
 <asp:Image ID="Image3" runat="server" Visible="False" /> 
 <asp:Image ID="Image4" runat="server" Visible="False" />   
 <asp:Image ID="Image5" 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("<hr>檔名---- " & 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 修改即可）。

只要程式能順利執行，而且您又是剛剛入門的初學者......沒人敢說這樣做不好。以下是範例：

if (FileUpload1.HasFile)
{
string fileName = FileUpload1.FileName;

//……內容與上面範例相同，在此省略……

 FileUpload1.SaveAs(savePath);
 myLabel.Append(" 檔名---- " + fileName);
}

if (FileUpload2.HasFile)
{
          string fileName = FileUpload2.FileName;
          //……省略……
          FileUpload2.SaveAs(savePath) ;
}

if (FileUpload3.HasFile)
{
          string fileName = FileUpload3.FileName;
          //……省略……
          FileUpload3.SaveAs(savePath) ;
}

//……以此類推…… 這種Copy / Paste的作法很累吧～

學生（初學者）還在學習中，所以寫出上面的程式，我不會責怪他，畢竟能正確執行更重要。

但如果進入業界，還用這種 Copy / Paste的方法來寫程式，可能會被前輩「唸」一頓

您可以參閱這篇文章（[回憶].....一些感慨 #2.....什麼樣的程式？什麼樣的寫法？對初學者有幫助），我有作了解釋。

在我的書本裡面，有數個範例都用上這個技巧。

例如：

上集的「FileUpload」多重檔案批次上傳、網路聊天室，介紹 Application與Session的最佳案例（用來解說Application與 Session的應用）

下集也有「自動化投票區」使用了相同的技巧。

希望對您有幫助。

2013/8/2補充：

[ASP.NET] 在頁面上顯示上傳的圖片

http://www.dotblogs.com.tw/aquarius6913/archive/2013/04/26/102317.aspx

使用 JavaScript，使用者挑選圖片後就能在瀏覽器上預覽（不用上傳就能預覽）

http://blog.csdn.net/danhuang2012/article/details/7703606

http://www.jb51.net/article/16210.htm

=== 最後要打一下廣告 ==========================

1. 如果您覺得我的描述、寫作方式，符合您的胃口。

2. 如果您看完以後，知道我寫書、介紹一些控制項或是技術........不是「混過去」、「帶過去」而已，而是真真確確地蒐集 "有用的範例"，讓您學得更深入！

3. 如果您覺得：我出完書以後，還不定期地提供售後服務，提供補充教材......這樣的互動是 "良性"的，是值得鼓勵的。......已經推出兩百多篇補充範例了

4. 如果您（尤其是學生）真的想把基礎學好，而不是 "混"過這一門課就好、而不是寫個（畢業專題的）屍體出來交差（能畢業就好）.....那麼.......

請您購買下面的書籍，

東西多到您學不完

上 / 下兩集，兩本書的厚度（我蒐集的各種範例）將近兩千頁！！......絕對不會讓您失望

我將思想傳授他人，他人之所得，亦無損於我之所有；

猶如一人以我的燭火點燭，光亮與他同在，我卻不因此身處黑暗。----Thomas Jefferson

線上課程教學，遠距教學 (Web Form 約 51hr) https://dotblogs.com.tw/mis2000lab/2016/02/01/aspnet_online_learning_distance_education_VS2015

線上課程教學，遠距教學 (ASP.NET MVC 約 140hr) https://dotblogs.com.tw/mis2000lab/2018/08/14/ASPnet_MVC_Online_Learning_MIS2000Lab

寫信給我，不要私訊 -- mis2000lab (at) yahoo.com.tw 或 school (at) mis2000lab.net

(1) 第一天 ASP.NET MVC5 完整影片（5.5小時 / .NET 4.x版）免費試聽。影片 https://youtu.be/9spaHik87-A

(2) 第一天 ASP.NET Core MVC 完整影片（3小時 / .NET Core 6.0~8.0）免費試聽。影片 https://youtu.be/TSmwpT-Bx4I

[學員感言] mis2000lab課程評價 - ASP.NET MVC , WebForm 。 https://mis2000lab.medium.com/%E5%AD%B8%E5%93%A1%E6%84%9F%E8%A8%80-mis2000lab%E8%AA%B2%E7%A8%8B%E8%A9%95%E5%83%B9-asp-net-mvc-webform-77903ce9680b

ASP.NET遠距教學、線上課程（Web Form + MVC）。第一天課程， "完整" 試聽。

......... facebook社團 https://www.facebook.com/mis2000lab ......................

......... YouTube (ASP.NET) 線上教學影片 https://www.youtube.com/channel/UC6IPPf6tvsNG8zX3u1LddvA/

Blog文章 "附的範例" 無法下載，請看 https://dotblogs.com.tw/mis2000lab/2016/03/14/2008_2015_mis2000lab_sample_download

請看我們的「售後服務」範圍（嚴格認定）。

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

ASP.NET MVC => .NET Core MVC 線上教學 ...... 第一天課程完整內容 "免費"讓您評估 / 試聽

[遠距教學、教學影片] ASP.NET (Web Form) 課程上線了！MIS2000Lab.主講事先錄好的影片，並非上課側錄！觀看時，有如「一對一」面對面講課。

回首頁

ASP.NET專題實務 WebForm + MVC線上教學影片 -- MIS2000Lab.

MIS2000 Lab.已推出20餘本電腦書，曾任資策會專任講師與微軟MVP。自.NET 1.x起，已出版15本ASP.NET (Web Form)書籍，也有遠距教學線上教程教學影片