<% section = "metrologia" extra = "add" lang = Request.QueryString("lang") If Request.QueryString("lang")="" Then lang = "ita" If lang = "eng" Then title = "Power analizers" Else title = "Power analizers" End if function MakeContent() %>

<%= title %>

<% i=1 Do While i <= 3 If lang = "eng" Then %> <% Else %> <% End if select case i case "1" immagine = "/img/tm_analiz/ca8230.jpg" link = "http://www.chauvin-arnoux.com" pdf = "" case "2" immagine = "/img/tm_analiz/ca8334b.jpg" link = "http://www.chauvin-arnoux.com" pdf = "" case "3" immagine = "/img/tm_analiz/ca8352.jpg" link = "http://www.chauvin-arnoux.com" pdf = "" end select %> <% i=i+1 loop %>
<% end function MakeTemplate() %>