Novità

Errore aggiornamento spaziometria

cutoff

Advanced Member >PLATINUM<
Ciao a tutti.

Da alcune estrazioni non riesco più a fare l'aggiornamento in automatico dal sito di Silop. Sul mio pc non è cambiato nulla nell'ultima settimana, (nessun programma installato/disinstallato o aggiornamento)per cui non riesco a capire il motivo.
Sono costretto a scaricarlo e metterlo a mano nella cartella.
Cosa potrei provare a fare? Ho windows 7 64 bit e fino alla settimana scorsa mai avuto problemi ad aggiornare.
Grazie


errSpaz.png
 

silop2005

Advanced Member >PLATINUM<
Ciao a tutti.

Da alcune estrazioni non riesco più a fare l'aggiornamento in automatico dal sito di Silop. Sul mio pc non è cambiato nulla nell'ultima settimana, (nessun programma installato/disinstallato o aggiornamento)per cui non riesco a capire il motivo.
Sono costretto a scaricarlo e metterlo a mano nella cartella.
Cosa potrei provare a fare? Ho windows 7 64 bit e fino alla settimana scorsa mai avuto problemi ad aggiornare.
Grazie


Vedi l'allegato 2212415
========================================
LOGOSILOP.gif
SPMT vers. 1.6.34_Agg.Web e relativo plugin SVP vers. 1.0.56 e Plugin_FTP vers. 1.0 e SpazioScript vers.1.0.9 e RicercaLunghetta vers.1.0.31 e LottoOpen vers.1.0.56
======================
Ciao Cutoff ,
======================
adesso ho letto il tuo messaggio.
Ho controllato sul mio spazio web e i due archivi
del Lotto classico e del Superenalotto sono aggiornati alla sera del 27/03/2021 sabato.
Non ho fatto niente di nuovo sul mio spazio web.
Se prima ti funzionava con il link mio senza la "s" vicino a "http://"
doveva funzionare anche dopo.
Vedo che hai fatto l'aggiornamento alla versione 1.6.35, forse sarà questo?
Boh!!!
Un'altra cosa che ti posso suggerire è di scaricarti il browser Explorer sul pc,
ma non di usarlo, l'importante che lo tieni sul pc.
Ho letto che anche LuigiB lo aveva consigliato ad un altro utente.
Prova anche tu, forse funzionerà.
Al limite togli anche la spunta al VisualLotto
e riprova l'aggiornamento via web.
Facci sapere.
======================
Buon lunedì a tutto il forum.
======================
stickman.gif
A presto
Silop ;) ;) ;)
 

cutoff

Advanced Member >PLATINUM<
Ciao Silop2005 e grazie del tuo intervento.
Io avevo la versione 1.6.31 di Spaziometria e dal momento che non ha funzionato più, ho provato prima a mettere la versione 1.6.34 poi la 1.6.35, ma in entrambi i casi il problema non si è risolto.E' si di fatti molto strano, dal momento che come detto, sul pc non ho installato/disinstallato nulla nell'ultimo periodo per cui non capisco i motivi. Sul mio pc è sempre stato presente anche Explorer 11, anche se non lo uso, per cui....boh. Come ultime prove, disabilito l'antivirus e magari reinstallo da capo spaziometria, Alla peggio lo metterò a mano, dopo averlo scaricato dal tuo sito.Chiedo ma non credo, per caso su Spaziometria esiste un file di log in cui magari si può andare a leggere magari la problematica che si è verificata, a parte quello dell'installazione?
 

silop2005

Advanced Member >PLATINUM<
Ciao Silop2005 e grazie del tuo intervento.
Io avevo la versione 1.6.31 di Spaziometria e dal momento che non ha funzionato più, ho provato prima a mettere la versione 1.6.34 poi la 1.6.35, ma in entrambi i casi il problema non si è risolto.E' si di fatti molto strano, dal momento che come detto, sul pc non ho installato/disinstallato nulla nell'ultimo periodo per cui non capisco i motivi. Sul mio pc è sempre stato presente anche Explorer 11, anche se non lo uso, per cui....boh. Come ultime prove, disabilito l'antivirus e magari reinstallo da capo spaziometria, Alla peggio lo metterò a mano, dopo averlo scaricato dal tuo sito.Chiedo ma non credo, per caso su Spaziometria esiste un file di log in cui magari si può andare a leggere magari la problematica che si è verificata, a parte quello dell'installazione?
========================================
LOGOSILOP.gif
SPMT vers. 1.6.34_Agg.Web e relativo plugin SVP vers. 1.0.56 e Plugin_FTP vers. 1.0 e SpazioScript vers.1.0.9 e RicercaLunghetta vers.1.0.31 e LottoOpen vers.1.0.56
======================
Ciao Cutoff ,
======================
questo non lo so
il programmatore LuigiB se passa di qua ti potrebbe dare una risposta al tuo quesito.
======================
Buon martedì a tutto il forum.
======================
stickman.gif
A presto
Silop ;) ;) ;)
 

joe

Advanced Member >PLATINUM PLUS<
Prova questo script e fammi sapere se funziona.

Codice:
Option Explicit
Sub Main
'Agg_Arc_Wget_3 By Joe
   Dim sCommand,sPercorsoWget,sDirFileDestLocal,sFileBackup,sUrl,sFileBat,DataIni,b,nTimeoutSec
   sDirFileDestLocal = GetDirectoryTemp & "Archivio.txt"
   sFileBackup = sDirFileDestLocal & ".bak"
   sPercorsoWget = GetDirectoryAppData & "wget.exe"
   sUrl = "sLink = https://www.silop.it/Archivio(televideo)/Archivio.txt"
   sCommand = """" & sPercorsoWget & """" & " -O " & """" & sDirFileDestLocal & """" & " --no-check-certificate " & sUrl
   nTimeoutSec = 60
   If FileEsistente(sPercorsoWget) Then
      If FileEsistente(sDirFileDestLocal) Then
         b = RinominaFile(sDirFileDestLocal,sFileBackup)
      Else
         b = True
      End If
      If b Then
         sFileBat = GetDirectoryTemp & "Download.bat"
         Call ScriviFile(sFileBat,sCommand,True,False)
         Call LanciaFile(sFileBat)
         Messaggio "Analisi Estrazioni"
         DataIni = Now
         Do While FileEsistente(sDirFileDestLocal) = False
            If DateDiff("s",DataIni,Now) > nTimeoutSec Then Exit Do
         Loop
         If FileEsistente(sDirFileDestLocal) Then
            Call EliminaFile(sFileBackup)
            Call EliminaFile(sFileBat)
            CloseFileHandle(sUrl)
            AGG_S_III(sDirFileDestLocal)
         Else
            Scrivi "Attenzione !!!"
            Scrivi "Il file delle estrazioni non è stato scaricato in " & GetDirectoryAppData
            Call RinominaFile(sFileBackup,sDirFileDestLocal)
         End If
      Else
         Scrivi "Attenzione !!!"
         Scrivi "Non è stato possibile creare il backup delle estrazioni"
      End If
   Else
      Scrivi "Attenzione !!!"
      Scrivi "Il file wget.exe versione 1.19.4 deve essere presente nel percorso: " & GetDirectoryAppData
   End If
End Sub
Sub AGG_S_III(sDirFileDestLocal)
   'MsgBox sDirFileDestLocal
   Dim sFileLoc
   Dim nEstrTot,sDataLastEstr,k,r,e
   Dim sDataEstr,nNumEstr,nSalvate
   Dim b
   Dim sFileBd
   Dim sLink
   Dim Ia,N,sVV,X,T,D
   Dim CfrData
   'sLink = "https://www.silop.it/Archivio(televideo)/Archivio.txt"
   b = False : N = False
   nSalvate = 0
   sFileBd = GetDirectoryAppData & "BaseDati.dat"
   sFileLoc = GetDirectoryAppData & "temp\"
   'If CreaDirectory(sDirFileDestLocal) Then
   Messaggio "Lettura Archivio Remoto ..."
   If FileEsistente(sDirFileDestLocal) Then
      T = Now
      Do While D <= 30
         D = DateDiff("s",T,Now)
         AvanzamentoElab 1,10,D
      Loop
      nEstrTot = EstrazioniArchivio
      sDataLastEstr = DataEstrazione(nEstrTot,,,"/")
      Ia = IndiceAnnuale(nEstrTot)
      ReDim aRighe(0)
      Call LeggiRigheFileDiTesto(sDirFileDestLocal,aRighe)
      'MsgBox (UBound(aRighe))
      For k = 1 To UBound(aRighe) 'To 0 Step - 1
         ReDim aV(0) ': Scrivi Len(aRighe(k))
         If Len(aRighe(k)) = 118 Then
            sDataEstr = Left(aRighe(k),2) & "/" & Mid(aRighe(k),3,2) & "/" & Mid(aRighe(k),5,4) ': Scrivi sDataEstr
            sVV = Right(aRighe(k),110) ': Scrivi sVV
            If b Then
               If(Right(sDataEstr,4) <> Right(sDataLastEstr,4)) Then Ia = 0
               If sDataEstr <> sDataLastEstr Then
                  Ia = Ia + 1
                  nNumEstr =(Ia)
                  'ColoreTesto 4 : Scrivi Ia : ColoreTesto 0
                  'ColoreTesto 1 : Scrivi sDataEstr : ColoreTesto 0
                  'ColoreTesto 2 : Scrivi sVV : ColoreTesto 0
                  If nNumEstr > 0 And IsDate(sDataEstr) Then
                     ReDim aEstr(11,5)
                     r = 1 : e = 0
                     For X = 1 To 110 Step 2
                        e = e + 1
                        'Scrivi Mid(sVV,x,2) & " ",0,0
                        aEstr(r,e) = Mid(sVV,X,2)
                        If e = 5 Then r = r + 1 : e = 0 ': Scrivi
                     Next
                     'ScriviMatrice(aEstr)
                     If CfrData <> Left(sDataEstr,5) Then
                        If SalvaEstrazione(aEstr,sDataEstr,nNumEstr,sFileBd) Then
                           CfrData = Left(sDataEstr,5)
                           nSalvate = nSalvate + 1
                           Call Messaggio(nSalvate)
                        End If
                     Else
                        ColoreTesto 2
                        Scrivi "ATTENZIONE " & sDataEstr & " ESTRAZIONE DUPLICATA",True
                        ColoreTesto 0
                     End If
                  End If
                  sDataLastEstr = sDataEstr
               End If
            End If
            If sDataEstr = sDataLastEstr Then b = True
         End If
      Next
      If nSalvate > 0 Then AllineaArchivi
   Else
      MsgBox "Errore download verificare il link con il browser"
   End If
   Call Scrivi("")
   ColoreTesto 1 : Call Scrivi("PlugIn per Spaziometria V.3.0 By Joe ",True) : ColoreTesto 0
   Call Scrivi("")
   Call Scrivi("Sono state aggiunte " & nSalvate & " estrazioni")
   Call Scrivi("")
   Call Scrivi("Estrazioni totali " & QuantitaEstrazioniInFile(sFileBd))
   Call Scrivi("")
   Call Scrivi("Utilizzato Archivio del sito www.silop.it")
   Call Scrivi("")
   'End If
End Sub

Buona Serata a tutte/i.

:) Joe
 

cutoff

Advanced Member >PLATINUM<
Prova questo script e fammi sapere se funziona.

Codice:
Option Explicit
Sub Main
'Agg_Arc_Wget_3 By Joe
   Dim sCommand,sPercorsoWget,sDirFileDestLocal,sFileBackup,sUrl,sFileBat,DataIni,b,nTimeoutSec
   sDirFileDestLocal = GetDirectoryTemp & "Archivio.txt"
   sFileBackup = sDirFileDestLocal & ".bak"
   sPercorsoWget = GetDirectoryAppData & "wget.exe"
   sUrl = "sLink = https://www.silop.it/Archivio(televideo)/Archivio.txt"
   sCommand = """" & sPercorsoWget & """" & " -O " & """" & sDirFileDestLocal & """" & " --no-check-certificate " & sUrl
   nTimeoutSec = 60
   If FileEsistente(sPercorsoWget) Then
      If FileEsistente(sDirFileDestLocal) Then
         b = RinominaFile(sDirFileDestLocal,sFileBackup)
      Else
         b = True
      End If
      If b Then
         sFileBat = GetDirectoryTemp & "Download.bat"
         Call ScriviFile(sFileBat,sCommand,True,False)
         Call LanciaFile(sFileBat)
         Messaggio "Analisi Estrazioni"
         DataIni = Now
         Do While FileEsistente(sDirFileDestLocal) = False
            If DateDiff("s",DataIni,Now) > nTimeoutSec Then Exit Do
         Loop
         If FileEsistente(sDirFileDestLocal) Then
            Call EliminaFile(sFileBackup)
            Call EliminaFile(sFileBat)
            CloseFileHandle(sUrl)
            AGG_S_III(sDirFileDestLocal)
         Else
            Scrivi "Attenzione !!!"
            Scrivi "Il file delle estrazioni non è stato scaricato in " & GetDirectoryAppData
            Call RinominaFile(sFileBackup,sDirFileDestLocal)
         End If
      Else
         Scrivi "Attenzione !!!"
         Scrivi "Non è stato possibile creare il backup delle estrazioni"
      End If
   Else
      Scrivi "Attenzione !!!"
      Scrivi "Il file wget.exe versione 1.19.4 deve essere presente nel percorso: " & GetDirectoryAppData
   End If
End Sub
Sub AGG_S_III(sDirFileDestLocal)
   'MsgBox sDirFileDestLocal
   Dim sFileLoc
   Dim nEstrTot,sDataLastEstr,k,r,e
   Dim sDataEstr,nNumEstr,nSalvate
   Dim b
   Dim sFileBd
   Dim sLink
   Dim Ia,N,sVV,X,T,D
   Dim CfrData
   'sLink = "https://www.silop.it/Archivio(televideo)/Archivio.txt"
   b = False : N = False
   nSalvate = 0
   sFileBd = GetDirectoryAppData & "BaseDati.dat"
   sFileLoc = GetDirectoryAppData & "temp\"
   'If CreaDirectory(sDirFileDestLocal) Then
   Messaggio "Lettura Archivio Remoto ..."
   If FileEsistente(sDirFileDestLocal) Then
      T = Now
      Do While D <= 30
         D = DateDiff("s",T,Now)
         AvanzamentoElab 1,10,D
      Loop
      nEstrTot = EstrazioniArchivio
      sDataLastEstr = DataEstrazione(nEstrTot,,,"/")
      Ia = IndiceAnnuale(nEstrTot)
      ReDim aRighe(0)
      Call LeggiRigheFileDiTesto(sDirFileDestLocal,aRighe)
      'MsgBox (UBound(aRighe))
      For k = 1 To UBound(aRighe) 'To 0 Step - 1
         ReDim aV(0) ': Scrivi Len(aRighe(k))
         If Len(aRighe(k)) = 118 Then
            sDataEstr = Left(aRighe(k),2) & "/" & Mid(aRighe(k),3,2) & "/" & Mid(aRighe(k),5,4) ': Scrivi sDataEstr
            sVV = Right(aRighe(k),110) ': Scrivi sVV
            If b Then
               If(Right(sDataEstr,4) <> Right(sDataLastEstr,4)) Then Ia = 0
               If sDataEstr <> sDataLastEstr Then
                  Ia = Ia + 1
                  nNumEstr =(Ia)
                  'ColoreTesto 4 : Scrivi Ia : ColoreTesto 0
                  'ColoreTesto 1 : Scrivi sDataEstr : ColoreTesto 0
                  'ColoreTesto 2 : Scrivi sVV : ColoreTesto 0
                  If nNumEstr > 0 And IsDate(sDataEstr) Then
                     ReDim aEstr(11,5)
                     r = 1 : e = 0
                     For X = 1 To 110 Step 2
                        e = e + 1
                        'Scrivi Mid(sVV,x,2) & " ",0,0
                        aEstr(r,e) = Mid(sVV,X,2)
                        If e = 5 Then r = r + 1 : e = 0 ': Scrivi
                     Next
                     'ScriviMatrice(aEstr)
                     If CfrData <> Left(sDataEstr,5) Then
                        If SalvaEstrazione(aEstr,sDataEstr,nNumEstr,sFileBd) Then
                           CfrData = Left(sDataEstr,5)
                           nSalvate = nSalvate + 1
                           Call Messaggio(nSalvate)
                        End If
                     Else
                        ColoreTesto 2
                        Scrivi "ATTENZIONE " & sDataEstr & " ESTRAZIONE DUPLICATA",True
                        ColoreTesto 0
                     End If
                  End If
                  sDataLastEstr = sDataEstr
               End If
            End If
            If sDataEstr = sDataLastEstr Then b = True
         End If
      Next
      If nSalvate > 0 Then AllineaArchivi
   Else
      MsgBox "Errore download verificare il link con il browser"
   End If
   Call Scrivi("")
   ColoreTesto 1 : Call Scrivi("PlugIn per Spaziometria V.3.0 By Joe ",True) : ColoreTesto 0
   Call Scrivi("")
   Call Scrivi("Sono state aggiunte " & nSalvate & " estrazioni")
   Call Scrivi("")
   Call Scrivi("Estrazioni totali " & QuantitaEstrazioniInFile(sFileBd))
   Call Scrivi("")
   Call Scrivi("Utilizzato Archivio del sito www.silop.it")
   Call Scrivi("")
   'End If
End Sub

Buona Serata a tutte/i.

:) Joe
ecco il risultato joe.....grazie per l'interesse


err.png
 

joe

Advanced Member >PLATINUM PLUS<
Ciao Cutoff,

lo script che ti ho proposto l'ho provato con molti sistemi operativi

e su macchine differenti ed ha sempre funzionato.

Il Wget allegato a spaziometria potrebbe non essere adatto al tuo sistema operativo.

Considerata la tua esperienza, ti consiglierei di accedere a CMD o al CommandCom.

Avviato questo eseguibile che esegue istruzioni in formato testo

dopo il classico prompt "C:\>"

Dovrai portarti alla directory di spaziometria ove c'è wget

per esempio potrebbe essere simile a: C:\users\computer\AppData\Roaming\spaziometria

quando sei nella directory di spaziometria scrivendo il comando "Dir"

ti elenca i file a corredo del programma. Tra gli ultimi c'è wget.exe

ora premendo il comando:

wget https://www.silop.it/Archivio(televideo)/Archivio.txt

dovrebbe scaricarti un archivio aggiornato (devi prestare molta attenzione a scrivere correttamente)

premuto invio dovrebbe darti in circa 1 secondo un messaggio di conferma di aver scaricato,

l'archivio per aggiornare spaziometria.

Tra i file di spaziometra (nella stessa cartella dovrebbe esserci il file "archivio.txt"

appena scaricato.

:)
 

cutoff

Advanced Member >PLATINUM<
Ciao Joe, ottengo questo indicato in foto.....forse tocca impostare qualcosa nelle opzioni di internet explorer?Ho provato a lanciarlo anche disabilitando l'antivirus....
ERRSPZ.png
 

joe

Advanced Member >PLATINUM PLUS<
Ciao,

con il classico motore di ricerca cercando

gnu wget eternallybored, puoi trovare in un elenco

la versione adatta al tuo sistema operativo.

Una volta scaricato l'eseguibile devi sovrascrivere

quello esistente nella cartella di spaziometria.

Cioè sostituire quello che non funziona e non si può utilizzare.

Può essere che si debba provare con qualche versione

che sia, meno recente e compatibile con il PC e sistema operativo.

:)
 

cutoff

Advanced Member >PLATINUM<
Ciao joe, ho scaricato l'ultima versione di wget ed ho sostituito la versione presente in spaziometria con questa.Facendo in questo modo,il problema è stato risolto, per cui mi ha scaricato correttamente il file.
Però ora ti chiedo:
Dal momento che pur mettendo il nuovo wget, l'aggiornamento delle estrazioni continua a non funzionare, a cosa mi serve quel file? forse lo devo importare dentro spaziometria?Se è così, faccio prima a scaricare il file dell'archivio dal sito di Silop e metterlo a manina nel programma. Grazie cmq per tutto.
 

joe

Advanced Member >PLATINUM PLUS<
Ciao, se risolve il problema di connessione e

se ha scaricato l' archivio, dovresti rieseguire lo script.

Perché dovrebbe funzionare.

:)
 

cutoff

Advanced Member >PLATINUM<
Grande Joe!! adesso lo script funziona e mi aggiorna le estrazioni.....il perche non funzioni più l'aggiornamento archivi da web, resta un mistero che forse solo Luigi può sapere.Grazie di tutto a te ed a Silop.
 

joe

Advanced Member >PLATINUM PLUS<
E' perché ufficialmente non ci sono gli aggiornamenti capaci di gestire i nuovi protocolli di sicurezza.

Quindi si deve aggirare il problema.

:)
 

ANGIE1911

Super Member >PLATINUM<
Nelle scorse settimane io ho avuto lo stesso problema (la mia versione è 1.6.34 ) Una sola volta ho inserito le estrazioni a mano e poi ha ricominciato a funzionare.

Mi sono appena accorta che le ESTRAZIONI sono TUTTE SBALLATE ! Incredibile ! Ho fatto il confronto dal sito di lottomatica e negli ultimi due mesi NON UNA è corretta.

Pazzesco. Il programma NON ha virus. Cosa devo fare? Riscaricare tutto? E poi le estrazioni?
 

joe

Advanced Member >PLATINUM PLUS<
Angie, puoi troncare l'archivio cancellando i 2 mesi

di estrazioni sbagliate poi lo script presente qualche messaggio sopra,

è in grado di aggiornare l'archivio, aggiungendo

le (30/40/50) estrazioni corrotte che hai cancellato.

:)
 

ANGIE1911

Super Member >PLATINUM<
Tutto a posto grazie!

Visto che nessuno mi risponde, posso chiederti come ottenere in SPAZIOMETRIA le estrazioni del SUPERENALOTTO
il mio archivio è VUOTO NON scarica suppongo per il VOLUME o non saprei. Quali soluzioni?
 

joe

Advanced Member >PLATINUM PLUS<
Non mi occupo di giochi ma penso che ... il problema ... sia lo stesso.

Per sommi capi,

Spaziometria controlla se c'è un archivio ... e poi ... lavora con quello che c'è.

Dunque se ti è necessario wget per poter accedere ad un sito,

in cui c'è l'archivio che ti serve,

puoi scaricare una copia dell'archivio completo e salvarla nella cartella di Spaziometria.

In questo caso NON essendo UN AGGIORNAMENTO VERO come quello fatto dallo script,

MA facendo un semplice "COPIA/INCOLLA" non serve uno script così complicato.

Si fa "a mano" più o meno come ha spiegato Claudio,

(o come mi sembra di ricordare che avesse fatto Druid

o qualcuno del suo calibro) oppure con l'aiuto di un semplice script.

:)
 

enry@62

Junior Member
Ciao, posso esporre il mio problema, ho scaricato il sw spaziometria vers. 1.6.34 , quando eseguo il setup nell'ultima schermata mi esce questo messaggio : errore -76 impossibile trovare percorso ( vedi foto allegata ). Grazie a chi mi può aiutare. Enrico
 

Allegati

  • errore 76 impossibile trovare percorso sw spaziometria vers. 1.6.34.png
    errore 76 impossibile trovare percorso sw spaziometria vers. 1.6.34.png
    497,5 KB · Visite: 15

Ultima estrazione Lotto

  • Estrazione del lotto
    giovedì 28 marzo 2024
    Bari
    49
    73
    67
    86
    19
    Cagliari
    64
    36
    37
    02
    04
    Firenze
    66
    27
    44
    90
    17
    Genova
    09
    44
    78
    85
    19
    Milano
    70
    14
    47
    38
    27
    Napoli
    80
    29
    28
    45
    39
    Palermo
    54
    59
    78
    47
    62
    Roma
    17
    22
    49
    52
    88
    Torino
    71
    35
    75
    74
    60
    Venezia
    40
    84
    02
    63
    29
    Nazionale
    08
    13
    44
    69
    85
    Estrazione Simbolotto
    Firenze
    06
    35
    16
    18
    05

Ultimi Messaggi

Alto