Lottopython
Advanced Member >GOLD<
reset e tuo percorso.i PERCORSI
Follow along with the video below to see how to install our site as a web app on your home screen.
Nota: This feature may not be available in some browsers.
reset e tuo percorso.i PERCORSI
sCUSAMI MA SONO DURO DI COMPRENDORIO DEVO PREMERE I TASTI RESET ?reset e tuo percorso.
Option Explicit
Sub Main
'Archivio_Lotto V.3.0 By Joe *** Utilizza Archivio LottoPython *** - 08/12/2025 -
'Script per Spaziometria By Joe.
Dim sLink,sDir,sFileALP,sFileArc,sData,sEstr
Dim K,R,X
Dim sVV,V
sLink = "https://raw.githubusercontent.com/Lottopython/exstrazionales/refs/heads/main/Estrazionales%20lotto.txt"
sDir = GetDirectoryAppData & "Temp\"
Messaggio "Archivio_Lotto V.3 By Joe *** Archivio LottoPython ***"
If CreaDirectory(sDir) Then
sFileALP = sDir & "ALP.txt"
sFileArc = sDir & "Archivio.txt"
If DownloadFromWeb(sLink,sFileALP) Then
ReDim aRighe(0)
Call LeggiRigheFileDiTesto(sFileALP,aRighe)
For K = 1 To UBound(aRighe) Step 12
sEstr = ""
AvanzamentoElab 1,UBound(aRighe),K
ReDim aV(0)
sData = Left(aRighe(K),2) & Mid(aRighe(K),4,2) & Mid(aRighe(K),7,4)
For R = 0 To 10
sVV = Right(aRighe(K + R),26)
V = Split(sVV," ") '4 Spazi
For X = 0 To 4
sEstr = sEstr &(V(X))
Next
Next
Call ScriviFile(sFileArc,sData & sEstr,False,True)
Call EliminaFile(sFileALP)
Next
End If
End If
Call Scrivi ("Creato il File 'Archivio.txt' in : " & sFileArc)
End Sub
Grazie SEMBRA FUNZIONARE . Ma facendo girare alcuni script in python mi da erroreEugenio, prova questo script.
Codice:Option Explicit Sub Main 'Archivio_Lotto V.3.0 By Joe *** Utilizza Archivio LottoPython *** - 08/12/2025 - 'Script per Spaziometria By Joe. Dim sLink,sDir,sFileALP,sFileArc,sData,sEstr Dim K,R,X Dim sVV,V sLink = "https://raw.githubusercontent.com/Lottopython/exstrazionales/refs/heads/main/Estrazionales%20lotto.txt" sDir = GetDirectoryAppData & "Temp\" Messaggio "Archivio_Lotto V.3 By Joe *** Archivio LottoPython ***" If CreaDirectory(sDir) Then sFileALP = sDir & "ALP.txt" sFileArc = sDir & "Archivio.txt" If DownloadFromWeb(sLink,sFileALP) Then ReDim aRighe(0) Call LeggiRigheFileDiTesto(sFileALP,aRighe) For K = 1 To UBound(aRighe) Step 12 sEstr = "" AvanzamentoElab 1,UBound(aRighe),K ReDim aV(0) sData = Left(aRighe(K),2) & Mid(aRighe(K),4,2) & Mid(aRighe(K),7,4) For R = 0 To 10 sVV = Right(aRighe(K + R),26) V = Split(sVV," ") '4 Spazi For X = 0 To 4 sEstr = sEstr &(V(X)) Next Next Call ScriviFile(sFileArc,sData & sEstr,False,True) Call EliminaFile(sFileALP) Next End If End If Call Scrivi ("Creato il File 'Archivio.txt' in : " & sFileArc) End Sub
![]()
Grazie SEMBRA FUNZIONARE . Ma facendo girare alcuni script in python mi da errore
L’errore si presenta anche con estrazione 10000 →
CIÒ SIGNIFICA CHE nel tuo Archivio.txt ci sono righe troppo corte, cioè NON contengono tutti i 110 numeri delle 11 ruote.
Quindi quando arrivi a quella estrazione, Python prova a prendere 10 caratteri e non li trova.
Ma cambiando il percorso si potrebbe mandarlo in C:\Users\HP\AppData\Roaming\SpazioMetria\ArcTlv\Archivio.txt
PENSO CHE TU ABBIA RAGIONE L' ARCHIVIO ArcTlv\Archivio.txt DICIAMO VECCJHIO INIZIAVA DA 1 A 10766 MENTRE QUELLO DEL TUO SCRIPT INIZIA DAL 1939 . fORSE IL MIO ERRORE STA QUI ?COMUNQUE HO COPIATO E INCOLLATO LE ESTRAZIONI MANCANTI DEL TUO ULTIMO SCRIPT IN ArcTlv\Archivio.txt E I PROGRAMMI IN PYTHON FUNZIONANO PERFETTAMENTE .No, non è possibile.
Gli archivi sono differenti per la quantità di Estrazioni.
Mentre la lunghezza delle linee è costante,
Dunque quello che scrivi è una deduzione sbagliata.
Se ci sono 7000 estrazioni l' Errore è leggerne 10000.
Il linguaggio di programmazione usato o l'ubicazione del file
non hanno nulla a che vedere, con un errore di logica.
Basta sostituire l'ultima riga con questa : Call LanciaFile (sFileArc)
per dimostrare che quanto scrivi NON trova riscontro nei fatti.
Cioè che le righe dell'archivio hanno tutte la stessa lunghezza e contengono
tutti gli estratti di tutte le ruote fino all'ultimo della Nazionale.
Il 6/12/2025 è 82
Vedi l'allegato 2309865
![]()
buongiorno a tutti ,buongiono Joe Silop ...rigenerato e ritemprato son qui a proporvi l'ulteriore ver.4 con piccole aggiunte e lievi modifiche al codiceGrazie SEMBRA FUNZIONARE . Ma facendo girare alcuni script in python mi da errore
L’errore si presenta anche con estrazione 10000 →
CIÒ SIGNIFICA CHE nel tuo Archivio.txt ci sono righe troppo corte, cioè NON contengono tutti i 110 numeri delle 11 ruote.
Quindi quando arrivi a quella estrazione, Python prova a prendere 10 caratteri e non li trova.
Ma cambiando il percorso si potrebbe mandarlo in C:\Users\HP\AppData\Roaming\SpazioMetria\ArcTlv\Archivio.txt