<body MS_POSITIONING="GridLayout">
<form id="Form1" method="post" encType="multipart/form-data" runat="server">
<input id="myfile" type="file" maxLength="60" size="20" runat="server">
<p><asp:button id="btnupload" Runat="server" Text="submit"></asp:button></p>
</form>
</body>
Private Sub btnupload_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnupload.Click
Dim filepart() As String = Split(myfile.PostedFile.FileName, "/")
Dim strname As String = filepart(filepart.Length - 1)
myfile.PostedFile.SaveAs("d:/" &
strname)//传送到服务器上的某个路径下
End Sub