<% Set Conn = Server.CreateObject("ADODB.Connection") Set RSElezioni = Server.CreateObject ("ADODB.RecordSet") Conn.Open "dsn=risult" 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 12 - 13 GIUGNO 2005    PREFETTURA DI VARESE
situazione alle ore  <%=ora%> del <%=data%>	dati sullo scrutinio  indice
Referendum 1 - procreazione medicalmente assistita - limite alla ricerca clinica e sperimentale sugli embrioni (abrogazione parziale)	Referendum 3 - procreazione medicalmente assistita - norme sulle finalità, sui diritti dei soggetti coinvolti e sui limiti dell'accesso (abrogazione parziale)
mas. fem. tot. votanti alle ore 12 del 12/6/2005 ═ ═ <%=lnTotVot1Ref1%> (<%=lnPercVot1Ref1%>) votanti alle ore 19 del 12/6/2005 ═ ═ <%=lnTotVot2Ref1%>(<%=lnPercVot2Ref1%>) votanti alle ore 22 del 12/6/2005 ═ ═ <%=lnTotVot3Ref1%>(<%=lnPercVot3Ref1%>) votanti a chiusura seggi (13/6/2005) <%=lnTotmRef1%>(<%=lnPercmRef1%>) <%=lnTotfRef1%>(<%=lnPercfRef1%>) <%=lnTotVot4Ref1%>(<%=lnPercVot4Ref1%>)	mas. fem. tot. votanti alle ore 12 del 12/6/2005 ═ ═ <%=lnTotVot1Ref3%> (<%=lnPercVot1Ref3%>) votanti alle ore 19 del 12/6/2005 ═ ═ <%=lnTotVot2Ref3%>(<%=lnPercVot2Ref3%>) votanti alle ore 22 del 12/6/2005 ═ ═ <%=lnTotVot3Ref3%>(<%=lnPercVot3Ref3%>) votanti a chiusura seggi (13/6/2005) <%=lnTotmRef3%>(<%=lnPercmRef3%>) <%=lnTotfRef3%>(<%=lnPercfRef3%>) <%=lnTotVot4Ref3%>(<%=lnPercVot4Ref3%>)
Referendum 2 - procreazione medicalmente assistita - norme sui limiti dell'accesso (abrogazione parziale)	Referendum 4 - procreazione medicalmente assistita - divieto di fecondazione eterologa (abrogazione del divieto)
mas. fem. tot. votanti alle ore 12 del 12/6/2005 ═ ═ <%=lnTotVot1Ref2%> (<%=lnPercVot1Ref2%>) votanti alle ore 19 del 12/6/2005 ═ ═ <%=lnTotVot2Ref2%>(<%=lnPercVot2Ref2%>) votanti alle ore 22 del 12/6/2005 ═ ═ <%=lnTotVot3Ref2%>(<%=lnPercVot3Ref2%>) votanti a chiusura seggi (13/6/2005) <%=lnTotmRef2%>(<%=lnPercmRef2%>) <%=lnTotfRef2%>(<%=lnPercfRef2%>) <%=lnTotVot4Ref2%>(<%=lnPercVot4Ref2%>)	mas. fem. tot. votanti alle ore 12 del 12/6/2005 ═ ═ <%=lnTotVot1Ref4%> (<%=lnPercVot1Ref4%>) votanti alle ore 19 del 12/6/2005 ═ ═ <%=lnTotVot2Ref4%>(<%=lnPercVot2Ref4%>) votanti alle ore 22 del 12/6/2005 ═ ═ <%=lnTotVot3Ref4%>(<%=lnPercVot3Ref4%>) votanti a chiusura seggi (13/6/2005) <%=lnTotmRef4%>(<%=lnPercmRef4%>) <%=lnTotfRef4%>(<%=lnPercfRef4%>) <%=lnTotVot4Ref4%>(<%=lnPercVot4Ref4%>)