uploadfile.aspx

来自「ASP.NET File Upload Example 文件上传」· ASPX 代码 · 共 52 行

ASPX
52 行
字号 
<%@ Import Namespace="System.IO" %>
<html>
	<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
			
			lstrFileFolder = "C:\TempUploadedFiles\"
			
			'Gets the file name
			lstrFileName = loFile.PostedFile.FileName
			lstrFileName = File.GetFileNameFromPath(lstrFileName)
			
			'Creates the folder if it does not exists
			If (not Directory.DirectoryExists(lstrFileFolder)) Then
				Directory.CreateDirectories(lstrFileFolder)
			End If
			
			'Save Uploaded file to server
			lstrFileNamePath = lstrFileFolder & lstrFileName
			loFile.PostedFile.SaveAs(lstrFileNamePath)
			
			'Sets the answer
			FileName.Text = lstrFileName
			FileType.Text = loFile.PostedFile.ContentType
			FileLength.Text = cStr(loFile.PostedFile.ContentLength)
			FileUploadForm.visible = false
			AnswerMsg.visible = true

		End sub
	</SCRIPT>
<BODY>
  <ASP:panel id="FileUploadForm" visible="true" runat="server">

	<form action="UploadFile.aspx" method="post" enctype="multipart/form-data" runat="server">
		<h1>ASP.NET File Upload Example</h1>
		Select the File to Upload to the Server:
		<input id="loFile" type="file" runat="server"><br>
		<input type="submit" value="Upload" OnServerClick="UploadFile_Clicked" runat="server">
		<br>
	</form>
   </ASP:panel>
   
   <ASP:panel id="AnswerMsg" visible="false" runat="server">
		Thanks your file <ASP:label id="FileName" runat="server" /> has been uploaded<BR>
		We received <ASP:label id="FileLength" runat="server" /> bytes of the type <ASP:label id="FileType" runat="server" /><br>
   </ASP:panel>
   
</BODY>
</HTML>

uploadfile.aspx - 源码说明

本页面展示了「ASP.NET File Upload Example 文件上传」中的 uploadfile.aspx 源码文件，采用 ASPX 编程语言编写，共 52 行代码。您可以在线阅读完整代码内容，也可以返回资源详情页下载完整源码包进行本地学习和开发。

虫虫下载站收录了大量与Example相关的技术资源，包括源代码、技术文档、电路图等，是电子工程师和嵌入式开发者的专业学习平台。

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?