Novità

Due domande su archivio spaziometria

fillott0

Senior Member
siccome mi sono accorto che nell'archivio in mio possesso di spaziometria manca un'estrazione precisamente quella del 9/4/26 , che invece trovo su un archivio in excel vi chiedo : Quale numero portare come ultima estrazione in spazio (quella del 30/4/26)? Io porto 10847 progressivo annuo 68 . Come rimediare ?Attualmente io aggiorno con questo script.......
Option Explicit
Sub Main
'Agg_Lotto V.4.3 By Joe *** Archivio LottoPython *** - 08/02/2026 -
'Script per Spaziometria By Joe.
Dim sFileLoc
Dim nEstrTot,sDataLastEstr,k,r
Dim sDataEstr,nNumEstr,nSalvate
Dim b
Dim sFileBd
Dim sLink
Dim Ia,N,sVV,x
Dim CfrData
Dim Vecchio,Nuovo
Dim V
Dim E
sLink = "https://raw.githubusercontent.com/Lottopython/exstrazionales/refs/heads/main/Estrazionales lotto.txt"
b = False : N = False
nSalvate = 0
sFileBd = GetDirectoryAppData & "BaseDati.dat"
Scrivi sFileBd,1,,,2 : Scrivi
sFileLoc = GetDirectoryAppData & "ArcTlv\"
Messaggio "Agg_Lotto V.4.3 By Joe *** Archivio LottoPython ***"
If CreaDirectory(sFileLoc) Then
sFileLoc = sFileLoc & "Archivio.txt"
If DownloadFromWeb(sLink,sFileLoc) Then
nEstrTot = EstrazioniArchivio
sDataLastEstr = DataEstrazione(nEstrTot,,,"/")
Vecchio = Right(sDataLastEstr,4)
Ia = IndiceAnnuale(nEstrTot)
If nEstrTot = 0 Then CfrData = "01/01/1871" : b = True : Ia = 0
ReDim aRighe(0)
Call LeggiRigheFileDiTesto(sFileLoc,aRighe)
For k = 0 To UBound(aRighe) Step 12
AvanzamentoElab 1,UBound(aRighe),k
ReDim aV(0)
If Len(aRighe(k)) = 53 Then
sDataEstr = Left(aRighe(k),2) & "/" & Mid(aRighe(k),4,2) & "/" & Mid(aRighe(k),7,4)
ReDim aEstr(11,5)
For r = 0 To 10
sVV = Right(aRighe(k + r),27)
V = Split(sVV," ") '4 Spazi
For x = 0 To 4
aEstr(r + 1,x + 1) = V(x)
Next
Next
Nuovo = Right(sDataEstr,4)
If b Then
If Nuovo <> Vecchio Then Ia = 0 : Vecchio = Nuovo
If sDataEstr <> sDataLastEstr Then
Ia = Ia + 1
nNumEstr = Ia
If nNumEstr > 0 And IsDate(sDataEstr) Then
If CfrData <> sDataEstr Then
If SalvaEstrazione(aEstr,sDataEstr,nNumEstr,sFileBd) Then
CfrData = sDataEstr
nSalvate = nSalvate + 1
End If
Else
ColoreTesto 2
Scrivi "ATTENZIONE " & sDataEstr & " ERRORE NELLE DATE",True
ColoreTesto 0
End If
End If
End If
End If
If sDataEstr = sDataLastEstr Then b = True
Else
Scrivi "Errore nel Download"
End If
Next
If nSalvate > 0 Then AllineaArchivi
Else
Scrivi "Errore nella creazione Dei File Necessari"
End If
Call Scrivi("Aggiornamento Lotto V.4.3 By Joe *** Utilizza Archivio lottoPython ***",1)
Call Scrivi("")
Call Scrivi("Estrazioni trovate in Archivio Remoto " & QuantitaEstrazioniInFile(sFileBd))
Call Scrivi("")
Call Scrivi("Archivio Locale Aggiornato all' Estrazione N° " & IndiceAnnuale(EstrazioniArchivio) & " del " & DataEstrazione(EstrazioneFin,,,"/"))
Call Scrivi("")
Call Scrivi("- Sono state Aggiunte " & nSalvate & " Estrazioni -",1,,,1)
Call Scrivi("")
End If
End Sub
 
Nel menù "Base dati" di Spaziometria,

scegli Aggiornamento Lotto e poi Tronca Archivio.

Con la freccia alla sinistra della barra blu

RETROCEDI nelle date, fino a prima della estrazione mancante e confermi di voler cancellare.

Nella pratica ... tutto Aprile.

Riesegui lo stesso script che dovrebbe aggiungerti TUTTE le Estrazione mancanti.

Controlla anche che il piccolo imbuto in basso a sinistra (vicino alla scritta "archivio reale lotto" sia di colore verde.

:)
 
Nel menù "Base dati" di Spaziometria,

scegli Aggiornamento Lotto e poi Tronca Archivio.

Con la freccia alla sinistra della barra blu

RETROCEDI nelle date, fino a prima della estrazione mancante e confermi di voler cancellare.

Nella pratica ... tutto Aprile.

Riesegui lo stesso script che dovrebbe aggiungerti TUTTE le Estrazione mancanti.

Controlla anche che il piccolo imbuto in basso a sinistra (vicino alla scritta "archivio reale lotto" sia di colore verde.
sono andato su base dati ... aggiornamento manuale...... ho eliminato tutte le date di aprile ........ imbutino verde ok !..........ho rilanciato lo script....... mi ha rimesso tutte le date compresa l'ultima ma la data del 9/4/26 con le relativi num niente!!!!!!! non ho usato tronca archivio (non so da dove trovarlo) però penso che la procedura che ho descritto abbia elimininato tutte le date/estrazioni di aprile.
 
Ultima modifica:
Ho provato la procedura che ti ho descritto ed effettivamente manca una estrazione.

Utilizzando invece lo script di Ramco, che si riferisce direttamente al sito istituzionale,

si arriva ad avere 10848 Estrazioni fino al 30/04/2026 (compreso).

Dunque devi nuovamente troncare l'archivio cancellando tutto aprile e poi usare lo script fatto da Ramco.

Oppure ancora Silop ha rilasciato l'archivio completo fino al 28/04/2026 che puoi scaricare dal suo sito.

Trovi script ed istruzioni qui tra gli ultimi messaggi di Ramco e/o di Silop.

Poi anche quello stesso script che aggiunge solo le estrazioni mancanti, può caricare le ultime.

:)
 
Ho provato la procedura che ti ho descritto ed effettivamente manca una estrazione.

Utilizzando invece lo script di Ramco, che si riferisce direttamente al sito istituzionale,

si arriva ad avere 10848 Estrazioni fino al 30/04/2026 (compreso).

Dunque devi nuovamente troncare l'archivio cancellando tutto aprile e poi usare lo script fatto da Ramco.

Oppure ancora Silop ha rilasciato l'archivio completo fino al 28/04/2026 che puoi scaricare dal suo sito.

Trovi script ed istruzioni qui tra gli ultimi messaggi di Ramco e/o di Silop.

Poi anche quello stesso script che aggiunge solo le estrazioni mancanti, può caricare le ultime.

:)
e dove lo trovo lo script di ramco?
 
e dove lo trovo lo script di ramco?

al primo messaggio c'è lo script che ti ho descritto.

:)
 
probabilmente io le avrò perse per qualche altro motivo.

Nell'archivio al quale si riferisce lo script proposto da Filotto, quell'estrazione (AL MOMENTO) proprio non c'è.

E' la ragione per cui lo script non ha potuto "leggerla" ed aggiungerla all'archivio.


07-04-2026 BARI 80 54 31 75 71
07-04-2026 CAGLIARI 38 23 54 50 89
07-04-2026 FIRENZE 57 73 82 35 45
07-04-2026 GENOVA 58 70 12 65 85
07-04-2026 MILANO 82 20 35 14 08
07-04-2026 NAPOLI 48 65 79 52 16
07-04-2026 PALERMO 05 60 56 01 25
07-04-2026 ROMA 65 12 73 03 49
07-04-2026 TORINO 39 43 44 36 67
07-04-2026 VENEZIA 71 76 49 06 56
07-04-2026 NAZIONALE 85 42 37 41 07

<<<< MANCA QUELLA DEL 9/4/2026 >>>>

10-04-2026 BARI 79 07 19 57 33
10-04-2026 CAGLIARI 62 76 31 54 48
10-04-2026 FIRENZE 72 11 41 48 06
10-04-2026 GENOVA 75 60 09 41 40
10-04-2026 MILANO 79 28 27 18 48
10-04-2026 NAPOLI 02 33 78 19 74
10-04-2026 PALERMO 81 44 31 63 69
10-04-2026 ROMA 30 11 82 56 41
10-04-2026 TORINO 07 43 50 18 82
10-04-2026 VENEZIA 08 19 36 07 75
10-04-2026 NAZIONALE 18 36 75 26 27

:)
 

Ultima estrazione Lotto

  • Estrazione del lotto
    giovedì 30 aprile 2026
    Bari
    02
    58
    76
    30
    50
    Cagliari
    28
    06
    35
    51
    39
    Firenze
    46
    27
    71
    88
    50
    Genova
    01
    08
    15
    17
    38
    Milano
    82
    50
    87
    51
    02
    Napoli
    65
    38
    37
    53
    46
    Palermo
    56
    62
    58
    10
    67
    Roma
    57
    82
    49
    80
    02
    Torino
    39
    74
    29
    35
    47
    Venezia
    54
    76
    22
    73
    85
    Nazionale
    69
    62
    88
    43
    21
    Estrazione Simbolotto
    Genova
    01
    37
    04
    17
    23
Indietro
Alto