estensione su campo

[davidspy]

come estraggo l'estensione della foto(.gif o .jpg) del percorso che sta qui

<tr>
<td bgcolor="#FFFFFF" width="100%" height="75" align="center" colspan="2">


" >[img]<%=rsestrai([/img]"></td>

<% ' resize2.aspx?img=<%=rsestrai("foto1")&height=80%>

</tr><tr>

[DarioN1]

dim tmpArray , nomefile , estensione
tmpArray = array()

tmpArray = split(rsestrai("foto1"),",")

 nomefile = tmpArray(0)
estensione= tmpArray(1)

Se proprio vuoi far eil figo crea una funzione usando lo script sopra che prende il nome del file e restituisce nome ed estensione

[teorema55]

nel senso che devi prendere il nome del file ed estrarre solo l'estensione .gif .jpeg .chelchelé?

[teorema55]

..o più semplicemente:

nome="nome/diquesto:male.detto//file.altro.fido"
do while instr(nome, ".") > 0
nome=mid(nome, instr(nome, ".") + 1, 99)
loop

autore: teorema55

oppure

str = "tuofileestrattodaldatabase.gif"
estensione = right(str,Instr(1,StrReverse(str),".")-1)

autore: shagrat