<% ' Dichiara variabili Dim strURL Dim aryURL Dim query Dim strPagina ' Assegna l'URL della pagina corrente strURL = Request.ServerVariables("URL") ' Splitta il percorso ai valori / aryURL = Split(strURL, "/") ' copia la query query = request.servervariables("QUERY_STRING") ' Prendi l'ultimo elemento dell'array strPagina = aryURL(Ubound(aryURL))&"?"& query %>
Bookmark and Share
select your language
CREDIT
Credit

Concept e Architettura del sito:
Francesco Luglio - Web Designer Palazzo Spinelli
 
Coordinamento redazionale:
Ester Calabrò
Francesco Amodei

Progetto:
Emanuele Amodei
Francesco Luglio

Supporto editoriale:
Claudio Paolini
Elena Amodei

Powered by:
Istituto per l'Arte e il Restauro

 

UNI EN ISO
9001:2000
 
    info@spinelli.it
Credit
Legal Disclaimer Admin Privacy Policy © Copyright