Ricavare parte finale di un URL - Script ASP

A volte potrebbe risultare necessario ricavare la parte finale di un URL, ad esempio per individuare il nome del file o della pagina corrispondente.

Immaginiamo dunque di avere un percorso assoluto, che indicheremo con la variabile strUrl.
Il contenuto può essere assegnato come valore specifico

strUrl = "http://www.weppos.com/foto/lamiafoto.gif" 

o, per esempio, potremmo voler leggere il percorso della pagina caricata dall'utente

strUrl = Request.ServerVariables("URL") 

Da questa variabile possiamo ricavare il nome del file o della pagina, quindi l'ultima parte del percorso, procedendo in due modi.

Il primo esempio consiste nell'usare le funzioni [F]Right()[/F], [F]Len()[/F] e [F]InStrRev()[/F] per tagliare la stringa prendendo in considerazione solo la porzione che ci interessa:

<% 

' Ricavo il nome del file
strPath = Right(strUrl, (Len(strUrl) - InStrRev(strUrl, "/")))

' Stampo il valore
Response.Write("Ti trovi nella pagina " & strPath) 

%> 

Altro modo consiste nell'uso della funzione [F]Split()[/F] per separare la stringa all'altezza di ciascun carattere /, corrispondente ad una directory. Il risultato è un array dove ciascun elemento è una specifica directory e l'ultimo indice rappresenta invece il contenuto della directory, ovvero il nome del file.

<% 

' Divido la stringa prendendo il simbolo / come separatore
strPath = Split(strUrl, "/") 

' Stampo il valore [/C]
Response.Write("Ti trovi nella pagina " & strPath(Ubound(strPath))) 

%>