<% dim comandosql,titolo,lnSezTot,lnSezTmp,lnPercSez,lnPercSezReg,RSdataora,RSelezioni,data,ora dim lnSezTotReg,lnSezTmpReg Set Conn = Server.CreateObject("ADODB.Connection") 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 Set RSelezioni = Server.CreateObject ("ADODB.RecordSet") RSelezioni.ActiveConnection = Conn RSelezioni.CursorType = adOpenStatic RSelezioni.Source = "select * from scrutiniosezioni" RSelezioni.Open() lnSezTot = "" lnSezTmp = "" lnPercSez = "" lnValidi = "" lnBianche = "" lnCont = "" 'if RSelezioni.recordcount > 0 then lnSezTot = Rselezioni("seztot") lnSezTmp = Rselezioni("seztmp") lnPercSez = Rselezioni("percsez") lnValidi =Rselezioni("validi") lnBianche=Rselezioni("bianche") lnCont = Rselezioni("cont") 'end if RSelezioni.close RSelezioni.Source = "select * from scrutiniosezionireg" RSelezioni.Open() lnSezTotReg = "" lnSezTmpReg = "" lnPercSezReg = "" lnValidip = "" lnBianche = "" lnContp = "" lnValidiReg = "" 'if RSelezioni.recordcount > 0 then lnSezTotReg = Rselezioni("seztot") lnSezTmpReg = Rselezioni("seztmp") lnPercSezReg = Rselezioni("percsez") lnValidip =Rselezioni("validi") lnBianche=Rselezioni("bianche") lnContp = Rselezioni("cont") lnValidireg =Rselezioni("validireg") 'end if RSelezioni.close Set RSelreg = Server.CreateObject ("ADODB.RecordSet") RSelreg.ActiveConnection = Conn RSelreg.CursorType = adOpenStatic RSelreg.Source = "select * from votireg" RSelreg.Open() if RSelreg.bof = true or RSelreg.eof = true then response.write "NON CI SONO DATI DA VISUALIZZARE" response.end else if RSelreg("voti1") = 0 and RSelreg("voti2") = 0 and RSelreg("voti3") = 0 and RSelreg("voti4") = 0 then response.write "NON CI SONO DATI DA VISUALIZZARE" response.end end if end if RSelezioni.Source = "select * from voti" RSelezioni.Open() %> <% lcVoti = "" lcPerc = "" if Rselezioni("voti3") > 0 then lcVoti = Rselezioni("voti3") lcPerc = Rselezioni("perc3") & "%" end if %>

(2) Comunisti  Italiani

<% lcVoti = "" lcPerc = "" if Rselezioni("voti2") > 0 then lcVoti = Rselezioni("voti2") lcPerc = Rselezioni("perc2") & "%" end if %> <%=lcVoti%>

<%=lcPerc%>

RICCARDO SARFATTI <%=RSelreg("voti1")%> - <%=RSelreg("perc1")%>%
(di cui <%=RSelreg("votisoloreg1")%>  - <%=RSelreg("percsoloreg1")%>% alla sola l.regionale)

(1) Alleanza Nazionale   

<% lcVoti = "" lcPerc = "" if Rselezioni("voti1") > 0 then lcVoti = Rselezioni("voti1") lcPerc = Rselezioni("perc1") & "%" end if %> <%=lcVoti%>

<%=lcPerc%>

ROBERTO FORMIGONI <%=RSelreg("voti2")%> - <%=RSelreg("perc2")%>%
(di cui <%=RSelreg("votisoloreg2")%>  - <%=RSelreg("percsoloreg2")%>% alla sola l.regionale)

 

(3) Partito Comunista Rifondazione  

<%=lcVoti%>

<%=lcPerc%>

(4) UDC Libertas  

<% lcVoti = "" lcPerc = "" if Rselezioni("voti4") > 0 then lcVoti = Rselezioni("voti4") lcPerc = Rselezioni("perc4") & "%" end if %>

<%=lcVoti%>

<%=lcPerc%>

(5) Uniti nell'Ulivo per Sarfatti  

<% lcVoti = "" lcPerc = "" if Rselezioni("voti5") > 0 then lcVoti = Rselezioni("voti5") lcPerc = Rselezioni("perc5") & "%" end if %>

<%=lcVoti%>

<%=lcPerc%>

(7) Polo Laico  

<% lcVoti = "" lcPerc = "" if Rselezioni("voti7") > 0 then lcVoti = Rselezioni("voti7") lcPerc = Rselezioni("perc7") & "%" end if %>

<%=lcVoti%>

<%=lcPerc%>

 

(6) Pensionati  

<% lcVoti = "" lcPerc = "" if Rselezioni("voti6") > 0 then lcVoti = Rselezioni("voti6") lcPerc = Rselezioni("perc6") & "%" end if %>

<%=lcVoti%>

<%=lcPerc%>

(8) Partito Socialista Nuovo PSI  

<% lcVoti = "" lcPerc = "" if Rselezioni("voti8") > 0 then lcVoti = Rselezioni("voti8") lcPerc = Rselezioni("perc8") & "%" end if %>

<%=lcVoti%>

<%=lcPerc%>

(11) Italia dei valori  

<% lcVoti = "" lcPerc = "" if Rselezioni("voti11") > 0 then lcVoti = Rselezioni("voti11") lcPerc = Rselezioni("perc11") & "%" end if %>

<%=lcVoti%>

<%=lcPerc%>

(9) Lega Nord Padania  

<% lcVoti = "" lcPerc = "" if Rselezioni("voti9") > 0 then lcVoti = Rselezioni("voti9") lcPerc = Rselezioni("perc9") & "%" end if %>

<%=lcVoti%>

<%=lcPerc%>

(12) Verdi per la pace  

<% lcVoti = "" lcPerc = "" if Rselezioni("voti12") > 0 then lcVoti = Rselezioni("voti12") lcPerc = Rselezioni("perc12") & "%" end if %>

<%=lcVoti%>

<%=lcPerc%>

(10) Forza Italia  

<% lcVoti = "" lcPerc = "" if Rselezioni("voti10") > 0 then lcVoti = Rselezioni("voti10") lcPerc = Rselezioni("perc10") & "%" end if %>

<%=lcVoti%>

<%=lcPerc%>

PREFETTURA DI VARESE - ELEZIONI REGIONALI 2005
SITUAZIONE ALLE ore <%=ora%> del <%=data%>

PARTE MAGGIORITARIO (LISTE REGIONALI)
SEZIONI SCRUTINATE <%=lnPercSezReg%> % (<%=lnSezTmpReg%> SU <%=lnSezTotReg%>)
schede BIANCHE <%=lnbianche%> schede CONTESTATE <%=lncontp%>
totale voti VALIDI <%=lnvalidip%>  (di cui alle sole liste reg. <%=lnvalidireg%> )

PARTE PROPORZIONALE (LISTE PROVINCIALI)
SEZIONI SCRUTINATE <%=lnPercSez%> % (<%=lnSezTmp%> SU <%=lnSezTot%>)
schede BIANCHE <%=lnbianche%> schede CONTESTATE <%=lnCont%>
totale voti VALIDI <%=lnvalidi%>

risultati UFFICIALI regionali 2000 (prov. Varese)

risultati UFFICIALI europee 2004 (prov. Varese)

(14) Alternativa Sociale  

<% lcVoti = "" lcPerc = "" if Rselezioni("voti14") > 0 then lcVoti = Rselezioni("voti14") lcPerc = Rselezioni("perc14") & "%" end if %> <%=lcVoti%>

<%=lcPerc%>

INVERNIZZI GIANMARIO <%=RSelreg("voti3")%> - <%=RSelreg("perc3")%>%
(di cui <%=RSelreg("votisoloreg3")%>  - <%=RSelreg("percsoloreg3")%>% alla sola l.regionale)

(13) Liberal democratici LD 

<% lcVoti = "" lcPerc = "" if Rselezioni("voti13") > 0 then lcVoti = Rselezioni("voti13") lcPerc = Rselezioni("perc13") & "%" end if %> <%=lcVoti%>

<%=lcPerc%>

MARSILI MARCO <%=RSelreg("voti4")%> - <%=RSelreg("perc4")%>%
(di cui <%=RSelreg("votisoloreg4")%>  - <%=RSelreg("percsoloreg4")%>% alla sola l.regionale)