<% ServerDir=Server.MapPath("/database")&"/" 'Response.write ServerDir 'Response.end Protetto=Session("Protetto") Lingua=Request("lin") DaCategoria=Request("dcat") DaPagina=Request("dacat") RicercaParola=Request.form("ricerca") If RicercaParola="" then RicercaParola=Request("ricerca") IF Lingua<>"1" and Lingua <>"2" then Lingua="1" NumeroProdotto=Request("pro") CategoriaSel=Request("cat") CategoriaMostra=Request("cat") Variabili="lin="&Lingua&"&cat="&CategoriaSel&"&dacat="&DaPagina&"&ricerca="&RicercaParola Variabili=Server.HTMLEncode(Variabili) EsciDettagli="Catalogo.ASP?"&Variabili Programma="Catalogo.ASP" %> onLoad="MM_displayStatusMsg('Ora è visibile solo in Anteprima dal gestore del sito');return document.MM_returnValue" <%End If%>> <%If StatoCatalogo<>"OFF" or Session("Gestionale")="OK" then%> <%If NumeroProdotto="" then%> <%Else%> <%End if%> <%Else%> <%End if%>