Untitled

<html>
<head>

<script language="VB" runat="server">

Sub Button1_Click(sender As Object, e As EventArgs)

if FileUpLoad1.HasFile
'Uncomment this line to Save the uploaded file
FileUpLoad1.SaveAs("C:\Development\sites\eXpressCourse3\" & FileUpLoad1.Filename)
Label1.Text = "Received " & FileUpLoad1.FileName & " Content Type " & FileUpLoad1.PostedFile.ContentType & " Length " & FileUpLoad1.PostedFile.ContentLength
else
Label1.Text = "No uploaded file"
end if

end sub

</script>

</head>
<body>

<h3><font face="Verdana">File Upload</font></h3>

<form runat=server>

<asp:FileUpLoad id="FileUpLoad1" AlternateText="You cannot upload files" runat="server" />
<asp:Button id="Button1" Text="Upload" OnClick="Button1_Click" runat="server" />
<asp:Label id="Label1" runat="server" />
</form>

</body>
</html>