controllo estensione file

[sanny82]

Ciao autti ho un problema...
Come posso fare il controllo sull'estensione di un file e dire se è esatto oppure no?

In pratica io ho una textBox con scritto all'interno un file, io voglio controllare se ha scritto l'estensione del file oppure no e se l'ha inserita giusta...
Es: pippo.pdf
controllo se c'è il pto e dopo se il punto c'è se l'estensione è pdf

Potete aiutarmi?
Grazie mille

[Pieruccio]

esempio uno:

if instr(Text1.text,".PDF")>0 then
'estensione OK
else
'senza estensione
end if

oppure:

if right(Text1.text,4)=".PDF" then
'estensione OK
else
'senza estensione
end if

[sanny82]

Proprio quello che fa al caso mio grazie

[cik]

meglio che usi la seconda opzione.

La prima cerca .pdf nel nome del file e funzionerebbe anche con un file pippo.pdf.zip, mentre l'altra controlla che il nome finisca con .pdf(che sono due cose diverse)