upload: inviare solo estensioni scelte

[grario]

Buongiorno a tutti, dopo tanto tempo ho ripreso a studiare un pò di script.

Vorrei fare un upload in aspx di solo 2 tipi di file da me preconfigurati jpg e pdf:
l'utente non può inviare nessun altro tipo di file.
Ho fatto tante ricerche ma non riesco a trovare un codice adatto.
Posto il mio codice dopo aver effettuato il form standard, se abilito il controllo file image non invia nessun file.
Come posso fare? Grazie.

<%@ page language="VB" %>

<script runat="Server">

Private Sub Upload(Sender as Object, e as EventArgs)

If Len(Trim(FileUpload1.Value)) = 0 Then
Messaggio.Text = "Campo vuoto: sfoglia per caricare un file"

ElseIf FileUpload1.PostedFile.ContentType <> "image/pjpeg" Then
Messaggio.Text = "Puoi caricare solo file JPEG"

Else
Dim s() As String = Split(FileUpload1.Value, "\")
FileUpload1.PostedFile.SaveAs(Server.MapPath("cgi-bin/" & s(UBound(s))))
Messaggio.Text = "File caricato con successo"
End If

End Sub
</script>

[grario]

Ho trovato la soluzione da solo.
Posto qui se a qualcuno può servire.

'--controllo tipo estensione file
'--recupero solo il nome del file non il percorso
Dim strFileName As String = System.IO.Path.GetFileName(FileUpload1.PostedFile.FileName)
'--recupero estensione del file compreso il punto
Dim strextension As String = System.IO.Path.GetExtension(FileUpload1.PostedFile.FileName)
'--creo un confronto
If strextension = ".jpg" or strextension = ".pdf" then
else
risposta.Text = "Errore: puoi caricare solo file jpg o pdf (case sensitive)"
errore=true
'exit sub
end if