asp.net上傳檔案小結

 

＜input id = " loFile " type = " file " runat = " server " ＞
＜form method = " post " enctype =" multipart/form-data " runat = " server "＞
＜/form ＞
1.獲得上傳檔案的名稱：（關鍵是PostedFile類的應用）
 使用Path類中的GetFileName方法，具體如下：

lstrFileName = loFile.PostedFile.FileName 　　' 註： loFile.PostedFile.FileName 返回的是通過檔案對話方塊選擇的檔案名稱， 　　這之中包含了檔案的目錄資訊 lstrFileName = Path.GetFileName ( lstrFileName ) 　　' 去掉目錄資訊，返迴文件名稱

（2）. 判斷上傳目錄是否存在，不存在就建立

　　建立目錄要使用到Directory類中的 CreateDirectory 方法，判斷目錄是否存在要用到 Directory 類中的Exists方法。具體如下：

If ( not Directory.Exists( lstrFileFolder ) ) Then 　Directory.CreateDirectory ( lstrFileFolder ) End If 　' 註：lstrFileFolder是使用者填入的目錄名稱，或者是預設的目錄名稱

　　＜四＞．上傳選定檔案到伺服器上

　　在前面工作都已經完成以後，就可以上傳檔案了，上傳檔案相對比較簡單，就用下面2行語句就可以完成上傳工作。

lstrFileNamePath = lstrFileFolder & lstrFileName 　' 得到上傳目錄及檔案名稱 loFile.PostedFile.SaveAs ( lstrFileNamePath ) 　'上傳檔案到伺服器

　　＜五＞．獲得並顯示上傳檔案的屬性

FileName.Text = lstrFileName 　' 獲得檔案名稱 FileType.Text = loFile.PostedFile.ContentType 　'獲得檔案類型 FileLength.Text = cStr ( loFile.PostedFile.ContentLength ) 　'獲得檔案長度 FileUploadForm.visible = false AnswerMsg.visible = true 　'顯示上傳檔案屬性

＜% @ Import Namespace=" System.IO " %＞
＜html ＞
＜BODY ＞
＜SCRIPT LANGUAGE = "VB" RUNAT = "SERVER" ＞
　Sub UploadFile_Clicked ( Sender as Object, e as EventArgs )
　　Dim lstrFileName as string
　　Dim lstrFileNamePath as string
　　Dim lstrFileFolder as string
　　' 如果上傳目錄為空白，就使用" c:/ "作為預設上傳目錄
　　' 獲得上傳到伺服器的目錄名稱
　　if dir.value ＜＞ "" then
　　　lstrFileFolder = dir.value
　　else
　　　lstrFileFolder = "c:/"
　　end if

　　' 獲得檔案名稱
　　lstrFileName = loFile.PostedFile.FileName
　　　' 註： loFile.PostedFile.FileName 返回的是
　　　通過檔案對話方塊選擇的檔案名稱，這之中包含了檔案的目錄資訊
　　lstrFileName = Path.GetFileName ( lstrFileName )
　　　' 去掉目錄資訊，返迴文件名稱

　　' 判斷上傳目錄是否存在，不存在就建立
　　If ( not Directory.Exists ( lstrFileFolder ) ) Then
　　　Directory.CreateDirectory ( lstrFileFolder )
　　End If

　　　'上傳檔案到伺服器
　　lstrFileNamePath = lstrFileFolder & lstrFileName
　　　' 得到上傳目錄及檔案名稱
　　loFile.PostedFile.SaveAs ( lstrFileNamePath )

　　　' 獲得並顯示上傳檔案的屬性
　　FileName.Text = lstrFileName
　　　' 獲得檔案名稱
　　FileType.Text = loFile.PostedFile.ContentType
　　　' 獲得檔案類型
　　FileLength.Text = cStr ( loFile.PostedFile.ContentLength )
　　　' 獲得檔案長度
　　FileUploadForm.visible = false
　　AnswerMsg.visible = true
　　　' 顯示上傳檔案屬性
　　End sub
＜/SCRIPT ＞
＜ASP:panel id = "FileUploadForm" visible = " true " runat = "server" ＞
＜form method = "post" enctype = "multipart/form-data" runat = "server" ＞
　＜h1 ＞ 歡迎使用ASP.NET頁面實現檔案上傳 ＜/h1 ＞
　　請選擇上傳到伺服器的檔案名稱：
　＜input id = "loFile" type = "file" runat = "server" ＞ ＜br ＞
　　請輸入上傳到伺服器的目錄名稱：
　＜input id = "dir" type = "text" runat = "server" ＞ ＜br ＞
　＜input type = "submit" value = "開始上傳" OnServerClick = " 　
　　 UploadFile_Clicked" runat = "server" ＞
　＜br ＞
＜/form ＞
＜/ASP:panel ＞

＜ASP:panel id = "AnswerMsg" visible = " false " runat = "server" ＞
　謝謝使用ASP.NET頁面實現檔案上傳 ＜br ＞
　成功上傳 ＜ASP:label id = "FileName" runat = "server" /＞ ＜br ＞
　檔案大小 ＜ASP:label id = "FileLength" runat = "server" /＞ 位元組 ＜br ＞ 　檔案類型 ＜ASP:label id = "FileType " runat = "server" /＞ ＜br ＞
＜/ASP:panel ＞
＜/BODY ＞
＜/HTML ＞

 

Trackback: http://tb.donews.net/TrackBack.aspx?PostId=240207