<% Set Conn = Server.CreateObject("ADODB.Connection") Set RSElezioni = Server.CreateObject ("ADODB.RecordSet") Conn.Open "dsn=risult_refe2006" Set RSdataora = Server.CreateObject ("ADODB.RecordSet") RSdataora.ActiveConnection = Conn RSdataora.CursorType = adOpenStatic RSdataora.Source = "select * from dataoraagg" RSdataora.Open() data = RSdataora("dataagg") ora = RSdataora("oraagg") RSdataora.close() Set RSdataora = nothing lcSqlTotali = "select sum(elettori) as totele,"+_ "sum(votanti1ref1) as totv1ref1,sum(votanti1ref2) as totv1ref2,sum(votanti1ref3) as totv1ref3,sum(votanti1ref4) as totv1ref4,"+_ "sum(votanti2ref1) as totv2ref1,sum(votanti2ref2) as totv2ref2,sum(votanti2ref3) as totv2ref3,sum(votanti2ref4) as totv2ref4,"+_ "sum(votanti3ref1) as totv3ref1,sum(votanti3ref2) as totv3ref2,sum(votanti3ref3) as totv3ref3,sum(votanti3ref4) as totv3ref4,"+_ "sum(votanti4ref1) as totv4ref1,sum(votanti4ref2) as totv4ref2,sum(votanti4ref3) as totv4ref3,sum(votanti4ref4) as totv4ref4,"+_ "sum(votmref1) as totvmref1,sum(votfref1) as totvfref1,sum(votmref2) as totvmref2,sum(votfref2) as totvfref2,"+_ "sum(votmref3) as totvmref3,sum(votfref3) as totvfref3,sum(votmref4) as totvmref4,sum(votfref4) as totvfref4"+_ " from affluenze" RSelezioni.ActiveConnection = Conn RSelezioni.CursorType = adOpenStatic RSelezioni.Source = lcSqlTotali RSelezioni.Open() if RSelezioni.eof then response.write "NON CI SONO DATI DA VISUALIZZARE" Conn.Close Set Conn = nothing RSelezioni.Close Set RSElezioni = nothing response.end end if lnTotEle1 = Rselezioni("totele") ' lnTotVot1Ref1 = RSelezioni("totv1ref1") lnPercVot1Ref1 = FormatPercent(lnTotVot1Ref1/lnTotEle1,2) lnTotVot1Ref2 = RSelezioni("totv1ref2") lnPercVot1Ref2 = FormatPercent(lnTotVot1Ref2/lnTotEle1,2) lnTotVot1Ref3 = RSelezioni("totv1ref3") lnPercVot1Ref3 = FormatPercent(lnTotVot1Ref3/lnTotEle1,2) lnTotVot1Ref4 = RSelezioni("totv1ref4") lnPercVot1Ref4 = FormatPercent(lnTotVot1Ref4/lnTotEle1,2) ' lnTotVot2Ref1 = RSelezioni("totv2ref1") lnPercVot2Ref1 = FormatPercent(lnTotVot2Ref1/lnTotEle1,2) lnTotVot2Ref2 = RSelezioni("totv2ref2") lnPercVot2Ref2 = FormatPercent(lnTotVot2Ref2/lnTotEle1,2) lnTotVot2Ref3 = RSelezioni("totv2ref3") lnPercVot2Ref3 = FormatPercent(lnTotVot2Ref3/lnTotEle1,2) lnTotVot2Ref4 = RSelezioni("totv2ref4") lnPercVot2Ref4 = FormatPercent(lnTotVot2Ref4/lnTotEle1,2) ' lnTotVot3Ref1 = RSelezioni("totv3ref1") lnPercVot3Ref1 = FormatPercent(lnTotVot3Ref1/lnTotEle1,2) lnTotVot3Ref2 = RSelezioni("totv3ref2") lnPercVot3Ref2 = FormatPercent(lnTotVot3Ref2/lnTotEle1,2) lnTotVot3Ref3 = RSelezioni("totv3ref3") lnPercVot3Ref3 = FormatPercent(lnTotVot3Ref3/lnTotEle1,2) lnTotVot3Ref4 = RSelezioni("totv3ref4") lnPercVot3Ref4 = FormatPercent(lnTotVot3Ref4/lnTotEle1,2) ' lnTotVot4Ref1 = RSelezioni("totv4ref1") lnPercVot4Ref1 = FormatPercent(lnTotVot4Ref1/lnTotEle1,2) lnTotVot4Ref2 = RSelezioni("totv4ref2") lnPercVot4Ref2 = FormatPercent(lnTotVot4Ref2/lnTotEle1,2) lnTotVot4Ref3 = RSelezioni("totv4ref3") lnPercVot4Ref3 = FormatPercent(lnTotVot4Ref3/lnTotEle1,2) lnTotVot4Ref4 = RSelezioni("totv4ref4") lnPercVot4Ref4 = FormatPercent(lnTotVot4Ref4/lnTotEle1,2) ' lnTotmRef1 = Rselezioni("totvmref1") lnTotmRef2 = Rselezioni("totvmref2") lnTotmRef3 = Rselezioni("totvmref3") lnTotmRef4 = Rselezioni("totvmref4") lnTotfRef1 = Rselezioni("totvfref1") lnTotfRef2 = Rselezioni("totvfref2") lnTotfRef3 = Rselezioni("totvfref3") lnTotfRef4 = Rselezioni("totvfref4") ' lnPercmRef1 = FormatPercent(lnTotmRef1/lnTotEle1,2) lnPercmRef2 = FormatPercent(lnTotmRef2/lnTotEle1,2) lnPercmRef3 = FormatPercent(lnTotmRef3/lnTotEle1,2) lnPercmRef4 = FormatPercent(lnTotmRef4/lnTotEle1,2) lnPercfRef1 = FormatPercent(lnTotfRef1/lnTotEle1,2) lnPercfRef2 = FormatPercent(lnTotfRef2/lnTotEle1,2) lnPercfRef3 = FormatPercent(lnTotfRef3/lnTotEle1,2) lnPercfRef4 = FormatPercent(lnTotfRef4/lnTotEle1,2) RSelezioni.Close Conn.Close Set Conn = nothing Set RSElezioni = nothing %>
REFERENDUM 25 - 26 GIUGNO 2006    PREFETTURA DI VARESE
situazione alle ore  <%=ora%> del <%=data%> dati sullo scrutinio  indice
Referendum  - Modifiche alla parte II della Costituzione
  mas. fem. tot.
votanti alle ore 12 del 25/6/2006 <%=lnTotVot1Ref1%>
(<%=lnPercVot1Ref1%>)
votanti alle ore 19 del 25/6/2006 <%=lnTotVot2Ref1%>(<%=lnPercVot2Ref1%>)
votanti alle ore 22 del 25/6/2006 <%=lnTotVot3Ref1%>(<%=lnPercVot3Ref1%>)
votanti a chiusura seggi (26/6/2006) <%=lnTotmRef1%>(<%=lnPercmRef1%>) <%=lnTotfRef1%>(<%=lnPercfRef1%>) <%=lnTotVot4Ref1%>(<%=lnPercVot4Ref1%>)