Here is Code behind:
Protected Sub btnUpload_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnUpload.Click
Dim fileExt As String
fileExt = System.IO.Path.GetExtension(FileUpload1.FileName)
If (fileExt <> ".exe") Then
Try
Dim hfc As HttpFileCollection = Request.Files
Label1.Text = String.Empty
'lblNames.Text = String.Empty ...
Go to the complete details ...