<%
section = "metrologia"
extra = "add"
lang = Request.QueryString("lang")
If Request.QueryString("lang")="" Then lang = "ita"
If lang = "eng" Then
title = "Access networks"
Else
title = "Reti di accesso"
End if
function MakeContent()
%>
<%= title %>
<%
i=1
Do While i <= 4
If lang = "eng" Then %>
<% Else %>
<% End if
select case i
case "1"
immagine = "/img/tele_dati/ssmtt.jpg"
link = "http://www.sunrisetelecom.com/"
pdf = "/pdf/ssmtt.pdf"
case "2"
immagine = "/img/tele_acc_a/e20c.jpg"
link = "http://www.sunrisetelecom.com/"
pdf = "/pdf/sunset_e20c.pdf"
case "3"
immagine = "/img/tele_acc_a/sunlite_e1.jpg"
link = "http://www.sunrisetelecom.com/"
pdf = "/pdf/sunlite_e1.pdf"
case "4"
immagine = "/img/tele_acc_a/cardtest.jpg"
link = "http://www.sunrisetelecom.com/"
pdf = "/pdf/cardtest.pdf"
end select
%>
<%
i=i+1
loop %>