L

<% 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)