Obtener ruta, nombre y extensión de un archivo en FileUpload

Para obtener datos de un archivo seleccionado en FileUpload.

Imports System.IO

Dim ruta As String = IO.Path.GetDirectoryName(FileUpload1.PostedFile.FileName)

Dim nombre As String = FileUpload1.FileName

Dim extensión As String = Right(FileUpload1.PostedFile.ContentType.Trim, 3)