Default.aspx (Form 內必要部分) |
<form id="form1" runat="server"> <div> <asp:FileUpload ID="FileUpload1" runat="server" /> <br /> <asp:Button ID="Button1" runat="server" Text="Submit" /> </div> </form> |
Default.aspx.vb |
Imports System.Data Imports System.IO Imports System.Web Imports System.Configuration Imports System.Web.UI Imports System.Web.Security Imports System.Web.UI.HtmlControls Imports System.Web.UI.WebControls Imports System.Web.UI.WebControls.WebParts Partial Class _Default Inherits System.Web.UI.Page Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click Dim filereceived As String = FileUpload1.PostedFile.FileName Dim filename As String = Path.GetFileName(filereceived) Dim fileuploadpath As String = "C:\AAAA" FileUpload1.PostedFile.SaveAs(Path.Combine(fileuploadpath, filename)) End Sub End Class |