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 修改即可)。
只要程式能順利執行,而且您又是剛剛入門的初學者......沒人敢說這樣做不好。以下是範例:
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的應用)
下集也有「自動化投票區」使用了相同的技巧。
希望對您有幫助。
...... 寄信給我 mis2000lab (at) 雅虎.com.台灣 ....................................................................................................
ASP.NET 4.0 專題實務 ( I )--入門實戰篇(VB / C#)
(松崗出版,VB版 / C#版)
範例比上一本書增加 166%,內容(頁數)增加 135%
上 / 下兩集 (2010年)已經出版囉 ~ 歡迎到此參加團購(上下兩集合購,免運費)
ASP.NET專題實務( II ) 第二版:範例應用 與 4.0新功能
.................................................................................................... 寄信給我 mis2000lab (at) 雅虎.com.台灣 ........