Gentilmente un altro aiutino se possibile con Spaziometria

[Ufrenk]

Salve a tutti
c'e' qualcuno che sa dirmi come mai l'aggiornamento delle estrazioni del lotto si ferma sempre a luglio 2024?
Eppure andava bene prima.Come faccio ad aggiornare all'ultima?
grazie

 

[Osyman]

QUI

SCARICA IL FILE E SOVRASCRIVI

 

[Osyman]

DOPODICHE'

 

[Ufrenk]

Ciao Osyman non riesco a trovare la directory di spaziometria purtroppo

 

[Osyman]

 

[Ufrenk]

ciao Osyman
ho fatto ma l'archivio dopo l'aggiornamento segna sempre 29/03/2024
ma quell'archivio di silop non e' aggiornato

 

[Osyman]

Devi fare l'aggiornamento successivamente indicato nell'immagine

 

[Osyman]

base dati---aggiornamento lotto.---da web

 

[Ufrenk]

allora ho aperto la directory,ho sovrascritto il file .dat e poi ho fatto l'aggiornamento come da te indicato

 

[Osyman]

di che colore è quell'imbuto che indico nell'immagine

 

[Ufrenk]

verde

 

[Ufrenk]

Qualcuno puo' aiutarmi?
altrimenti mi servirebbe l'archivio estraz dat aggiornato,grazie

 

[Baciccia4251]

Caro Ufrenk saluti!
Prima di tutto per cercare e trovare i file nel computer con facilità scarica il file Everything (c'è sia installabile che portable)
lo trovi in questo sito: https://www.voidtools.com/
Poi, a questo punto, disinstalla Spaziometria. Devi eliminare tutti i file che lo riguardano sul computer (Everything ti aiuta).
Non sarebbe male eliminarlo anche dal Registro di Windows, però, se non sai come si fa, lascia perdere.
A questo punto reinstalla Spaziometria. Lo apri, e prima di tutto, controlli che l'imbutino sia verde (quello che ti ha indicato Osyman).
Poi esegui Aggiornamento Lotto da Web come indicato, sempre, da Osyman in un post precedente.
Ora, se non funziona ancora hai tre alternative:
1) andare a Lourdes
2) spedirmi il Computer che te lo sistemo
3) trovare qualcuno che scherzi meno di me e riesca ad aiutarti
A parte gli scherzi, prova e se non riesci vedremo, assieme ad altri più preparati, di risolvere il tuo problema
Buon Non Compleanno
Baciccia

 

[Ufrenk]

Ciao Baciccia
grazie per l'interessamento
Allora spaziometria mesi e mesi fa lo disinstallai e installai di nuovo ma non andava,finche' mi venne l'idea di installarlo in un altro percorso e finalmente riuscii.
ora di punto in bianco da un po di estrazioni che non ne vuole sapere l'aggiornamento via web.
Ho fatto come ha detto Osyman ma nulla.
Sinceramente mi rompe il fatto che ogni volta bisogna fare tutta sta procedura,ma se e' l'unica soluzione provero' come dici tu e ti faro' sapere,grazie

 

[margot]

Qualcuno puo' aiutarmi?
altrimenti mi servirebbe l'archivio estraz dat aggiornato,grazie

ciao, se ti può essere utile io uso questo script per aggiornare l'archivio ogni volta:


Option Explicit
Sub Main
'Agg_Silop V.3.3 del 6/05/2023
'Script per Spaziometria By Joe.
Dim sFileLoc
Dim nEstrTot,sDataLastEstr,k,r,e
Dim sDataEstr,nNumEstr,nSalvate
Dim b
Dim sFileBd
Dim sLink
Dim Ia,N,sVV,x
Dim CfrData
sLink = "https://www.silop.it/Archivio(televideo)/Archivio.txt"
b = False : N = False
nSalvate = 0
sFileBd = GetDirectoryAppData & "BaseDati.dat"
Scrivi sFileBd,1,,,2 : Scrivi
sFileLoc = GetDirectoryAppData & "ArcTlv\"
Messaggio "Script By Joe"
If CreaDirectory(sFileLoc) Then
sFileLoc = sFileLoc & "Archivio.txt"
If DownloadFromWeb(sLink,sFileLoc) Then
nEstrTot = EstrazioniArchivio
sDataLastEstr = DataEstrazione(nEstrTot,,,"/")
Ia = IndiceAnnuale(nEstrTot)
ReDim aRighe(0)
Call LeggiRigheFileDiTesto(sFileLoc,aRighe)
For k = 1 To UBound(aRighe)
AvanzamentoElab 1,UBound(aRighe),k
ReDim aV(0)
If Len(aRighe(k)) = 118 Then
sDataEstr = Left(aRighe(k),2) & "/" & Mid(aRighe(k),3,2) & "/" & Mid(aRighe(k),5,4)
sVV = Right(aRighe(k),110)
If b Then
If N = False And(Right(sDataEstr,4) <> Right(sDataLastEstr,4)) Then Ia = 0 : N = True
If Left(sDataEstr,4) <> Left(sDataLastEstr,4) Then
Ia = Ia + 1
nNumEstr =(Ia)
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
aEstr(r,e) = Mid(sVV,x,2)
If e = 5 Then r = r + 1 : e = 0
Next
If CfrData <> Left(sDataEstr,5) Then
If SalvaEstrazione(aEstr,sDataEstr,nNumEstr,sFileBd) Then
CfrData = Left(sDataEstr,5)
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
End If
Next
If nSalvate > 0 Then AllineaArchivi
Else
MsgBox "Errore download verificare il link con il browser"
End If
Call Scrivi("Sono state aggiunte " & nSalvate & " estrazioni")
Call Scrivi("")
Call Scrivi("Estrazioni totali " & QuantitaEstrazioniInFile(sFileBd))
Call Scrivi("")
Call Scrivi("Sito Archivio " & Left(sLink,20))
Call Scrivi("")
End If
Call Scrivi("Tempo Trascorso " & TempoTrascorso)
End Sub

 

[Ufrenk]

grazie Margot ora provo

 

[Ufrenk]

Finalmente!!!!!!!!!!!!!!! grazie di cuore
una scorciatoia davvero utilissima

 

[margot]

Finalmente!!!!!!!!!!!!!!! grazie di cuore
una scorciatoia davvero utilissima

sono contenta che son riuscita ad aiutare qualcuno.....

 

[Pandit]

Ma è lo stesso script che ti avevo messo nel 3D "Chiedo gentilmente uno script" precedente, quello del grandissimo Joe?????

 

[Ufrenk]

Ma è lo stesso script che ti avevo messo nel 3D "Chiedo gentilmente uno script" precedente, quello del grandissimo Joe?????

Ciao Pandit ti chiedo scusa non lo avevo aperto pensando fosse riferito alla richiesta che avevo fatto ossia alla ricerca di....
Comunque ringrazio vivamente anche te .