Tuesday, July 1, 2008

File Upload

Label1.Text = "File Name : " & FileUpload1.FileName
Dim i As Integer = FileUpload1.PostedFile.ContentLength
Label2.Text = Math.Round(i / 1024, 2) & "KB"
FileUpload1.PostedFile.SaveAs(Server.MapPath("~/images/") & FileUpload1.FileName)