Novità

Aggiornamento archivio lotto e superenalotto per SPAZIOMETRIA da spazio/web silop

Si lo so sono un pò casinista acc..volevo dire alieno. .allora avrei risolto tutto ricominciamo da capo spaziometria mi andava benissimo solo che per errore ho cancellato una scheda gialla non mi faceva più vedere l'archivio ma con gli script aggiornavo tutto lotto,superenalotto , -.Sono un pò smanettone a volte sono "bra ...vino" ma sono astemio ho chiuso spaziometria poi son venuto qua su CED ho scaricato spaziomentria e "miracolo"adesso vedo pure l'archivio superenalotto ma................non mi sviluppa più gli script dopo aver messo lo script di joe puoi dire cosa faceva quello script dato che anche tu sei un "MAGO" IN QUESTO CAMPO. cosa è questo eliminato ? Call EliminaFile(sFile)
 
Si lo so sono un pò casinista acc..volevo dire alieno. .allora avrei risolto tutto ricominciamo da capo spaziometria mi andava benissimo solo che per errore ho cancellato una scheda gialla non mi faceva più vedere l'archivio ma con gli script aggiornavo tutto lotto,superenalotto , -.Sono un pò smanettone a volte sono "bra ...vino" ma sono astemio ho chiuso spaziometria poi son venuto qua su CED ho scaricato spaziomentria e "miracolo"adesso vedo pure l'archivio superenalotto ma................non mi sviluppa più gli script dopo aver messo lo script di joe puoi dire cosa faceva quello script dato che anche tu sei un "MAGO" IN QUESTO CAMPO. cosa è questo eliminato ? Call EliminaFile(sFile)

Lo script scarica una copia dell' archivio

e lo mette nella cartella di spaziometria.

È necessario cancellare il vecchio file per lasciare posto al nuovo.

Perché altrimenti il sistema operativo prima di scriverlo lo rinomina aggiungendo un numero progressivo.

Ed è così che ne avevi (cioè hai creato) 16 o più copie dell' archivio del SuperEnalotto senza aggiornare quella giusta.

Per il resto diciamo che non mi hai per nulla convinto sull'esito del non aver seguito i consigli.

:)

PS & NB Cancellando l'archivio ... si cancella l'archivio. Niente di più niente di meno.

Lo script lo fa con cognizione di causa e per necessità e poi lo reinserisce "aggiornato".

Ergo c'è!

Invece :

Cancellando una cartella, si creano problemi.

Incollando copie di archivi su copie di archivi ... anche!

Va da sé che ... all'esito dell'anamnesi, la diagnosi è infausta.
 
Ultima modifica:
joe perche hai cancellato lo script al messaggio 1000 ? è QUELLO CHE MI HA CREATO IL CORNETTO MA IO LO MANGIO VEGANO.

ED è QUESTO

Option Explicit
Sub Main
Dim D,S,sFile,Riga
D = GetDirectoryAppData
S = Split(D,"\")
sFile = S(0) & "\" & S(1) & "\" & S(2) & "\Desktop\Download Archvio.bat"
Riga = """" & D & "Wget.exe" & """" & " -O " & """" & D & "BaseDatiSuperEna.Dat" & """" & " --no-check-certificate www.silop.it/spaziometria/BaseDatiSuperEna.Dat"
Call EliminaFile(sFile)
Call ScriviFile(sFile,Riga)
Call LanciaFile(sFile)
End Sub

COSA HA ELIMINATO : Call EliminaFile(sFile)



******************************************************************************

Ciao Alien

prova a controllare se con questo script risolvi il problema :

Codice:
Rimosso dall' autore
Dopo averlo eseguito chiudi e poi riavvii Spaziometria e controlli se ha trovato l'ArchivioSE.

:)

Ultima modifica: Ieri alle 22:48
 
Ultima modifica:
Ciao a tutti.
Questo script messo gentilmente a disposizione per l'aggiornamento dell'archivio del superenalotto funzionava,
ora però non aggiorna più. Ho l'archivio fermo al 23/04.
Si può fare qualcosa?
Un grazie a chi mi aiuta.

Ho l'archivio fermo
Codice:
Sub Main
   'ARCHIVIO_SUPERENALOTTO x Spaziometria
   'Script LuigiB-LottoPython-Joe V.4.3 del 12/02/2026
   Dim sPercorsoLocale,sFileLocale
   sPercorsoLocale = GetDirectoryTemp
   CreaDirectory(sPercorsoLocale)
   sFileLocale = sPercorsoLocale & "superenalotto_completo.csv"
   Call EliminaFile(sFileLocale)
   Dim sFileBaseDati : sFileBaseDati = GetDirectoryAppData & "BaseDatiSuperEna.Dat"
   Dim eDate,eClock,sPercorsosFileBaseDatiBackup,sFileBaseDatiBackup
   Call DateTimeTest(eDate) : Call ClockTimeTest(eClock)
   sPercorsosFileBaseDatiBackup = GetDirectoryAppData & "Archivio SuperEnalotto\Backup\dat\"
   CreaDirectory(sPercorsosFileBaseDatiBackup)
   sFileBaseDatiBackup = sPercorsosFileBaseDatiBackup & "BaseDatiSuperEna.Dat.backup_Del_" & eDate & "_ore_" & eClock & ".bak"
   If FileEsistente(sFileBaseDati) Then
      Call CopiaFile(sFileBaseDati,sFileBaseDatiBackup)
   End If
   Dim sUrlCompleto,sScelta
 
         sUrlCompleto = "https://raw.githubusercontent.com/Lottopython/SUPERENALOTTO-SPAZIOMETRIA/refs/heads/main/superenalotto.txt"
         Call Messaggio("Scelto download da GitHub (predefinito).")
 
   Dim StrMessInfo
   StrMessInfo = MsgBox("Ricreare l'intero archivio dal 1997?" & vbCrLf & _
                        "Verranno eliminate tutte le estrazioni esistenti.",vbQuestion + vbYesNo,"Conferma Ricreazione")
   If StrMessInfo = vbNo Then
      MsgBox "Operazione annullata dall'utente.",vbInformation
      Exit Sub
   End If
   Call EliminaFile(sFileBaseDati)
   If Not DownloadFromWeb(sUrlCompleto,sFileLocale) Then
      MsgBox "Errore nel download del file da:" & vbCrLf & sUrlCompleto,vbCritical,"Errore Download"
      Exit Sub
   End If
   If Not FileEsistente(sFileLocale) Then
      MsgBox "File temporaneo non trovato dopo il download.",vbCritical
      Exit Sub
   End If
   Dim aRighe,k,sNumEstrTrovate
   sNumEstrTrovate = 0
   If LeggiRigheFileDiTesto(sFileLocale,aRighe) Then
      For k = 0 To UBound(aRighe)
         If ScriptInterrotto Then Exit For
         Dim sRiga : sRiga = Trim(aRighe(k))
         If sRiga <> "" Then
            Dim aCampi : ReDim aCampi(0)
            Call SplitByChar(sRiga,",",aCampi)
            If UBound(aCampi) = 9 Then
               Dim sID,sData
               sID = Trim(aCampi(0))
               sData = Trim(aCampi(1))
               If Len(sData) = 10 And Mid(sData,3,1) = "/" And Mid(sData,6,1) = "/" Then
                  Dim nGiorno,nMese,nAnno
                  On Error Resume Next
                  nGiorno = Int(Split(sData,"/")(0))
                  nMese = Int(Split(sData,"/")(1))
                  nAnno = Int(Split(sData,"/")(2))
                  On Error GoTo 0
                  If nGiorno >= 1 And nGiorno <= 31 And _
                     nMese >= 1 And nMese <= 12 And _
                     nAnno >= 1997 And nAnno <= Year(Now) Then
                     Dim bValida : bValida = True
                     Dim i
                     For i = 2 To 9
                        Dim nValore
                        nValore = Int(Trim(aCampi(i)))
                        If nValore < 0 Or nValore > 90 Then
                           bValida = False
                           Exit For
                        End If
                     Next
                     If bValida Then
                        Dim aNumeri
                        ReDim aNumeri(8)
                        For i = 1 To 6
                           aNumeri(i) = Int(Trim(aCampi(i + 1)))
                        Next
                        aNumeri(7) = Int(Trim(aCampi(8)))
                        aNumeri(8) = Int(Trim(aCampi(9)))
                        Dim nID : nID = 0
                        On Error Resume Next
                        nID = CLng(sID)
                        On Error GoTo 0
                        Call SalvaEstrazioneSE(aNumeri,sData,nID,sFileBaseDati)
                        sNumEstrTrovate = sNumEstrTrovate + 1
                        If(sNumEstrTrovate Mod 500) = 0 Then
                           Call Messaggio("Estrazioni elaborate: " & sNumEstrTrovate)
                        End If
                     End If
                  End If
               End If
            End If
         End If
      Next
   End If
   Call EliminaFile(sFileLocale)
   Call MsgBox("Aggiornamento completato con successo!" & vbCrLf & _
               "Estrazioni totali importate: " & sNumEstrTrovate,vbInformation,"ARCHIVIO SUPERENALOTTO")
End Sub
Function DateTimeTest(eDate)
   Dim DD,MM,YYYY : DD = Day(Now) : MM = Month(Now) : YYYY = Year(Now)
   eDate = YYYY & Right("0" & MM,2) & Right("0" & DD,2)
End Function
Function ClockTimeTest(eClock)
   Dim HH,MM,SS : HH = Hour(Now) : MM = Minute(Now) : SS = Second(Now)
   eClock = Right("0" & HH,2) & Right("0" & MM,2) & Right("0" & SS,2)
End Function
 
Ultima modifica:
Ciao a tutti.
Questo script messo gentilmente a disposizione per l'aggiornamento dell'archivio del superenalotto funzionava,
ora però non aggiorna più. Ho l'archivio fermo al 23/04.
Si può fare qualcosa?
Un grazie a chi mi aiuta.

Ho l'archivio fermo
==============================================
SPMT vers. 1.6.34_Agg.Web e relativo plugin SVP vers. 1.0.56 e Plugin_FTP vers. 1.0 e SpazioScript vs.1.0.9 e RicercaLunghetta vers.1.0.31 e LottoOpen v.1.0.62 e LottoProjeectLB.net V.1.0.38
======================
Ciao Cinzia ,
======================
vedi il mio post #997 del 01/07/2026 mercoledì
puoi scaricare dal mio sito l'archivio intero del SuperEnalotto fino al 30/06/2026
poi con la versione SPMT 1.6.54 puoi fare l'aggiornamento in automatico.
Buon aggiornamento SE.
Ringrazio per "i mi piace": bubù, Ramco
==================== ==================================
Buon lunedì a tutto il forum.
======================
stickman.gif
A presto
Silop ;) ;) ;)
 
==============================================
SPMT vers. 1.6.34_Agg.Web e relativo plugin SVP vers. 1.0.56 e Plugin_FTP vers. 1.0 e SpazioScript vs.1.0.9 e RicercaLunghetta vers.1.0.31 e LottoOpen v.1.0.62 e LottoProjeectLB.net V.1.0.38
======================
Ciao Cinzia ,
======================
vedi il mio post #997 del 01/07/2026 mercoledì
puoi scaricare dal mio sito l'archivio intero del SuperEnalotto fino al 30/06/2026
poi con la versione SPMT 1.6.54 puoi fare l'aggiornamento in automatico.
Buon aggiornamento SE.
Ringrazio per "i mi piace": bubù, Ramco
==================== ==================================
Buon lunedì a tutto il forum.
======================
stickman.gif
A presto
Silop ;) ;) ;)
Ciao silop mi dai il link ho provato ma è in ristrutturazione e non trovo nulla hai un e mail, grazie.
 
Ciao silop mi dai il link ho provato ma è in ristrutturazione e non trovo nulla hai un e mail, grazie.
===========================================
SPMT vers. 1.6.34_Agg.Web e relativo plugin SVP vers. 1.0.56 e Plugin_FTP vers. 1.0 e SpazioScript vs.1.0.9 e RicercaLunghetta vers.1.0.31 e LottoOpen v.1.0.62 e LottoProjeectLB.net V.1.0.38
======================
Ciao Alien ,
======================
vedi con CALMA nell'immagine in fondo ci sta scritto il mio recapit
vedi il mio post #997 del 01/07/2026 mercoledì
Ringrazio per "i mi piace": Cinzia, alien
==================== ==================================
Buon lunedì a tutto il forum.
======================
stickman.gif
A presto
Silop ;) ;) ;)
 
SPMT vers. 1.6.34_Agg.Web e relativo plugin SVP vers. 1.0.56 e Plugin_FTP vers. 1.0 e SpazioScript vs.1.0.9
e RicercaLunghetta vers.1.0.31 e LottoOpen v.1.0.62 e LottoProjeectLB.net V.1.0.38
======================
Ciao @Alien. ,
======================
ho ricevuto la tua email ieri e ti ho risposto con il mio cellulare e anche da pc
ma ritornano indietro.
Forse hai qualche problema con la tua posta.
Fammi sapere
Ringrazio per "i mi piace": Alien
==================== ==================================
Buon martedì a tutto il forum.
======================
stickman.gif
A presto
Silop ;) ;) ;)
 
Ultima modifica:
Alien si muove a zig-zag.

Perché noi miserrimi umani abbiamo stabilito che gli alieni debbano muoversi in questo modo, per poterli definire tali.

Procedere con linearità negli spostamenti come fanno le auto, gli elicotteri, gli aerei, i missili ... non è da loro!

Con la premessa che non ho mai voluto interessarmi del SuperEnalotto perché lo ritengo una iattura,

sia per quanto si può vincere (tanto da rovinarti la vita) che per quanto si perde (per la colpa delle vincite RIDICOLE)

sia perché quando nel Lotto esistono ancora "Terni Vergini" possiamo facilmente immaginare che in tutta una vita,

non escano mai le formazioni di 5 o più numeri che vorremmo.

Pertanto diventano inutili "archivi" e statistiche su di essi per avere risultati a "babbo morto".

Poi ci sono i problemi con l'archivio / l'aggiornamento / la mancanza di trasparenza / correttezza / puntualità ...

Però se, non si ha neppure un archivio come si possono considerare statisticamente attendibili i risultati delle ricerche in esso ?

Per esempio e se confronto il mio archivio con quallo di Alien anche se non è possibile allineare le date e le Estrazioni,

è di tutta evidenza che i risultati sono completamente diversi.

Alien.png


Non intendo richiamare al riguardo quanto "in ricordo" ha riferito riguardo ai posteri ...

Per me sono "ori", o non ori, o di nuovo "ori" di bassisima caratura.

Questo è il problema.

Qui in Piemonte i moti popolari lo direbbero OR dulblé garantì dal tulè.

:)
 
Quelli in giallo vanno eliminati ma comunque hai un casino negli archivi e manca qualcosa ecco perchè propongo una installazione pulita da zero altrimenti non ne esci più
poi se vuoi tentare lo stesso:
Dovresti eliminare tutti i file degli archivi .dat e sostituirli con quelli scaricati....hai anche doppioni e collegamenti

CANCELLO QUELLI EVIDENZIATI IN GIALLO POI SCARICO TUTTI I TUOI ?
 
SPMT vers. 1.6.34_Agg.Web e relativo plugin SVP vers. 1.0.56 e Plugin_FTP vers. 1.0 e SpazioScript vs.1.0.9
e RicercaLunghetta vers.1.0.31 e LottoOpen v.1.0.62 e LottoProjeectLB.net V.1.0.38
======================
Ciao @Alien. ,
======================
ho ricevuto la tua email ieri e ti ho risposto con il mio cellulare e anche da pc
ma ritornano indietro.
Forse hai qualche problema con la tua posta.
Fammi sapere
Ringrazio per "i mi piace": Alien
==================== ==================================
Buon martedì a tutto il forum.
======================
stickman.gif
A presto
Silop ;) ;) ;)
Ciao silop ma strano ricevo molte e mail ma hai inserito A........................ _6 ?
 

Ultima estrazione Lotto

  • Estrazione del lotto
    martedì 07 luglio 2026
    Bari
    31
    53
    78
    76
    37
    Cagliari
    27
    23
    30
    48
    12
    Firenze
    80
    26
    18
    20
    34
    Genova
    11
    24
    08
    82
    15
    Milano
    49
    02
    54
    33
    14
    Napoli
    51
    63
    44
    18
    35
    Palermo
    90
    71
    86
    22
    40
    Roma
    58
    19
    29
    17
    15
    Torino
    04
    14
    79
    17
    45
    Venezia
    79
    50
    03
    37
    32
    Nazionale
    18
    43
    55
    23
    15
    Estrazione Simbolotto
    Nazionale
    27
    38
    33
    13
    18

Ultimi Messaggi

Indietro
Alto