<% ' Fruibile - L'elemento CMS Open Source che mancava ' Copyright (C) 2002-2006 Roberto Scano ' ' Licensed under the terms of the GNU Lesser General Public License: ' http://www.opensource.org/licenses/lgpl-license.php ' ' For further information visit: ' http://www.fruibile.it/ ' ' File Author: ' Roberto Scano (mail@robertoscano.info) %> <% 'controllo sicurezza -------------- if Session("WEBGODLogin") <> "W3C_VALIDATOR" then If session("manutenzione")<> 1 Then response.Redirect "/backoffice/noentry.asp" end if end if '--------------------------------------------------------- 'Prevent your website from cross website attacks --------- refererUrl = Cstr(Request.ServerVariables("HTTP_REFERER")) serverName = Cstr(Request.ServerVariables("SERVER_NAME")) refererName = mid(refererUrl,8,len(serverName)) if refererName <> serverName then response.Redirect "/backoffice/noentry.asp" response.end end if '--------------------------------------------------------- %> <% lingua = split(Session("editlanguage"),",") %>
<%=DICLanguage(87)%>:
<%=DICLanguage(236)%>: <%=DICLanguage(3)%>
<%=DICLanguage(22)%>
<%=DICLanguage(79)%>
<%=DICLanguage(64)%>
<%=DICLanguage(182)%>
<%=DICLanguage(142)%>
<% conta = 0 for j=LBound(lingua) to UBound(lingua) conta = conta + 1 SQL = "SELECT * FROM " & application("prefix") & "configurazione_lingue where codice='" & lingua(j) & "'" SET lng = conn.execute(sql) CODLINGUA = trim(lng("codice")) if lcase(codlingua) = Session("backofficelanguage") then NOMELINGUA = fixstring(lng("lingua"),"d") else NOMELINGUA = "" & fixstring(lng("lingua_int"),"d") & "" end if set lng = nothing %>

<%=nomelingua%>

<%=replace(DICLanguage(49),"[LINGUA]", NOMELINGUA)%>: <%if Session("supervisor") = true or Session("reviewer") = true or Session("poweruser") = true then%> <%end if%>
<%=DICLanguage(48)%>
ucase(Session("backofficelanguage")) then%> <%=lac(lingua(j))%>"<%end if%> type="text" name="Title_<%=lingua(j)%>" class="input-lungo" id="Title_<%=lingua(j)%>" />
<%next%>
<%=DICLanguage(20)%>

" /> " />