[TABLE="border: 0, cellpadding: 0, cellspacing: 0, width: 192"]
[TR]
[TD="width: 192, colspan: 3"]DAL 14.09.1946 AL 30.09.2017[/TD]
[TD="width: 64"] [/TD]
[/TR]
[TR]
[TD] [/TD]
[TD] [/TD]
[TD] [/TD]
[TD] [/TD]
[/TR]
[TR]
[TD="colspan: 4"]NELL' ARCHIVIO, SONO PRESENTI : [/TD]
[/TR]
[TR]
[TD] [/TD]
[TD] [/TD]
[TD] [/TD]
[TD] [/TD]
[/TR]
[TR]
[TD="colspan: 2"]BA 5427 Estrazioni.[/TD]
[TD] [/TD]
[TD] [/TD]
[/TR]
[TR]
[TD="colspan: 2"]CA 5427 Estrazioni.[/TD]
[TD] [/TD]
[TD] [/TD]
[/TR]
[TR]
[TD="colspan: 2"]FI 5427 Estrazioni.[/TD]
[TD] [/TD]
[TD] [/TD]
[/TR]
[TR]
[TD="colspan: 2"]GE 5427 Estrazioni.[/TD]
[TD] [/TD]
[TD] [/TD]
[/TR]
[TR]
[TD="colspan: 2"]MI 5427 Estrazioni.[/TD]
[TD] [/TD]
[TD] [/TD]
[/TR]
[TR]
[TD="colspan: 2"]NA 5427 Estrazioni.[/TD]
[TD] [/TD]
[TD] [/TD]
[/TR]
[TR]
[TD="colspan: 2"]PA 5427 Estrazioni.[/TD]
[TD] [/TD]
[TD] [/TD]
[/TR]
[TR]
[TD="colspan: 2"]RO 5427 Estrazioni.[/TD]
[TD] [/TD]
[TD] [/TD]
[/TR]
[TR]
[TD="colspan: 2"]TO 5427 Estrazioni.[/TD]
[TD] [/TD]
[TD] [/TD]
[/TR]
[TR]
[TD="colspan: 2"]VE 5427 Estrazioni.[/TD]
[TD] [/TD]
[TD] [/TD]
[/TR]
[TR]
[TD="colspan: 2"]NZ 1937 Estrazioni.[/TD]
[TD] [/TD]
[TD] [/TD]
[/TR]
[TR]
[TD] [/TD]
[TD] [/TD]
[TD] [/TD]
[TD] [/TD]
[/TR]
[TR]
[TD="colspan: 3"] 5427 Estrazioni Totali[/TD]
[TD] [/TD]
[/TR]
[/TABLE]
Inizio;Fine;Ruota;Concorsi;SommaEstratti;Buchi;Conc.
174;9376;BA;9203;2092141;0
3575;9376;CA;5728;1326346;74;3766;3767;3768;3769;3770;3771;3772;3773;3777;3778;3779;3793;3794;3795;3796;3797;3798;3799;3800;3801;3802;3803;3804;3805;3806;3807;3808;3809;3810;3811;3812;3813;3814;3815;3816;3817;3818;3819;3820;3821;3822;3823;3824;3825;3826;3827;3828;3829;3830;3831;3832;3833;3834;3835;3836;3837;3838;3839;3840;3841;3842;3843;3844;3845;3846;3847;3848;3849;3856;3857;3858;3859;3860;3861
1;9376;FI;9369;2133395;7;3840;3841;3842;3843;3844;3845;3846
3575;9376;GE;5800;1323955;2;3793;3794
1;9376;MI;9374;2135048;2;3795;3949
1;9376;NA;9371;2132379;5;3794;3795;3796;3797;3798
1;9376;PA;9351;2128951;25;3772;3773;3774;3775;3776;3777;3778;3779;3786;3787;3788;3789;3790;3791;3792;3793;3794;3795;3796;3797;3798;3799;3800;3801;3802
1;9376;RO;9375;2141755;1;3793
1;9376;TO;9375;2136071;1;3878
1;9376;VE;9374;2142140;2;3819;3878
7440;9376;NZ;1937;437048;0
Option Explicit
'Da verificare se i risultati riportati siano corretti
Sub Main
Dim IdEstr,R,M,Ini,Mem,Vuote,sVuote,SumEstr
Scrivi"Inizio;Fine;Ruota;Concorsi;SommaEstratti;Buchi;Conc."
For R = 1 To 12
If R = 11 Then R = 12
If ScriptInterrotto Then Exit For
For IdEstr = 1 To 9376
If Estratto(IdEstr,R,1) > 0 Then Mem = IdEstr:Exit For
Next
Vuote = 0
sVuote = ""
SumEstr = 0
For IdEstr = Mem To EstrazioneFin
SumEstr = SumEstr + SommaEstratti(IdEstr,R)
If Estratto(IdEstr,R,1) > 0 Then
M = M + 1
Else
Vuote = Vuote + 1
sVuote = sVuote & ";" & IdEstr
End If
Next
Scrivi(Mem) & ";" &(EstrazioneFin) & ";" & SiglaRuota(R) & ";" & M & ";" & SumEstr & ";" & Vuote & sVuote
M = 0
Next
End Sub
i legend;n2081778 ha scritto:è impossibile postare da pc. i pop up bloccano la textbox
succede solo a me?
i legend;n2081775 ha scritto:Ciao allora sempre: 1-9376
da altro archivio ho questi risultati
sarebbe utile che anche altri postarssero i propri
ora non saprei proprio quale sia quello corretto
x Silop
ciao ho letto che hai fatto un lavoro di ricerca certosino per i tuoi archivi
sarebbe interessante conoscere i tuoi risultati
anche chi ha altri software potrebbe unirsi al confronto
|
SPMT vers. 1.5.87 e relativo plugin SVP vers. 1.0.56 e Plugin_FTP vers. 1.0 |
====================== |
Ciao i legend , |
Per quanto riguarda il tuo ALTRO archivio sempre da 1-9376 |
non saprei cosa dirti perché non conosco le fonti dell'archivio. |
|
Poi utilizzando il tuo script del post #27 |
sul mio archivio intero 1-9376 di Spaziometria |
ho gli stessi risultati che tu evidenzi nel post #24 |
che allego sotto : |
|
Buona serata a tutti. |
A presto |
Silop
Codice:
|
Inizio;Fine;Ruota;Concorsi;SommaEstratti;Buchi;Conc.
174;9376;BA;9203;2092169;0
3575;9376;CA;5728;1326346;74;3766;3767;3768;3769;3770;3771;3772;3773;3777;3778;3779;3793;3794;3795;3796;3797;3798;3799;3800;3801;3802;3803;3804;3805;3806;3807;3808;3809;3810;3811;3812;3813;3814;3815;3816;3817;3818;3819;3820;3821;3822;3823;3824;3825;3826;3827;3828;3829;3830;3831;3832;3833;3834;3835;3836;3837;3838;3839;3840;3841;3842;3843;3844;3845;3846;3847;3848;3849;3856;3857;3858;3859;3860;3861
1;9376;FI;9369;2133379;7;3840;3841;3842;3843;3844;3845;3846
3575;9376;GE;5800;1323951;2;3793;3794
1;9376;MI;9375;2135250;1;3949
1;9376;NA;9371;2132422;5;3794;3795;3796;3797;3798
1;9376;PA;9351;2128951;25;3772;3773;3774;3775;3776;3777;3778;3779;3786;3787;3788;3789;3790;3791;3792;3793;3794;3795;3796;3797;3798;3799;3800;3801;3802
1;9376;RO;9375;2141755;1;3793
1;9376;TO;9375;2136071;1;3878
1;9376;VE;9374;2142139;2;3819;3878
7440;9376;NZ;1937;437048;0
12/10/1963 |