Estrarre l'estensione dal file che si sta caricando

[brutusin]

upload recupero il nome del file cosi

Dim sFile as string = foto1.PostedFile.FileName
Dim sSplit() as string = Split(sFile, "\")
sFile = sSplit(Ubound(sSplit))

come posso recuperare e memorizzare in una variabile l'estensione del file appena caricato comprensiva di . ????
ciao e grazie a tutti

[zampa28]

System.IO.Path.GetExtension(tuaPath)