Codicebinario
Advanced Member >PLATINUM<
RIPETO: spzm,basedati,aggiornamento lotto,aggiorna da web,spunta anche la casellina "al termine aggiorna visuallotto".rispondi al quesito,si,e si aggiorna ad oggi......
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.
Ciao Joe,sono riuscita ad aggiornare al 29/04/23 ( per circa 10 mila estrazioni da fine 800) come posso aggiungere le ultime senza cancellare il resto? ho provato a fare copia incolla del file dati del programma che sul vecchio pc che si è quasi rotto completamente. ma mi cancella un sacco di estrazioni, come posso dunque aggiungere qui sul nuovo pc le estrazioni da aprile ad oggi senza cancellare il resto?
Option Explicit
Sub Main
Dim sDirTemp
Dim sLink
Dim nAnnoPart,nAnnoCorr,sNuovaData
Dim k
Dim id
Dim sDataEstr,sCData,nSalvate,sFileBd
Dim sV,r,e,x
Dim b,nEstrTot,sDataLastEstr,iA,z
nAnnoPart = Year(Now) - 1
nAnnoCorr = Year(Now)
sFileBd = GetDirectoryAppData & "BaseDati.dat"
sDirTemp = GetDirectoryTemp & "lottologia.txt"
Call EliminaFile(sDirTemp)
If EstrazioniArchivio = 0 Then nAnnoPart = 1871 : b = True
For sNuovaData = nAnnoPart To nAnnoCorr
If ScriptInterrotto Then Exit For
Call Messaggio(sNuovaData)
Call AvanzamentoElab(nAnnoPart,nAnnoCorr,sNuovaData)
sLink = "https://www.lottologia.com/lotto/archivio-estrazioni/?as=TXT&year=" & sNuovaData
If DownloadFromWeb(sLink,sDirTemp) Then
nEstrTot = EstrazioniArchivio
sDataLastEstr = DataEstrazione(nEstrTot,,,"/")
z = Right(sDataLastEstr,4)
id = IndiceAnnuale(nEstrTot)
ReDim aRighe(0)
If LeggiRigheFileDiTesto(sDirTemp,aRighe) Then
If EliminaFile(sDirTemp) Then
If Trim(aRighe(k)) <> "" Then
For k = UBound(aRighe) - 3 To 2 Step - 1
aRighe(k) = Replace(aRighe(k),vbTab,"")
aRighe(k) = Replace(aRighe(k),"-","")
'Call Scrivi(id & " ",0,0)
sDataEstr = Mid(aRighe(k),7,2) & "/" & Mid(aRighe(k),5,2) & "/" & Left(aRighe(k),4)
If z <> Left(aRighe(k),4) Then id = 0 : z = Left(aRighe(k),4)
'Call Scrivi(sDataEstr)
sV = Right(aRighe(k),110)
'Call Scrivi (sV)
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(sV,x,2)
If e = 5 Then r = r + 1 : e = 0
Next
'ScriviMatrice(aEstr)
If b = True Then
If sCData <> sDataEstr Then
id = id + 1
If SalvaEstrazione(aEstr,sDataEstr,id,sFileBd) Then
sCData = sDataEstr
nSalvate = nSalvate + 1
Call Messaggio(nSalvate)
End If
Else
ColoreTesto 2
Scrivi "ATTENZIONE " & sDataEstr & " ESTRAZIONE DUPLICATA",True
ColoreTesto 0
End If
End If
If sDataEstr = sDataLastEstr Then b = True
'
Next
End If
End If
End If
End If
If ScriptInterrotto Then Exit For
Next
If nSalvate > 0 Then
AllineaArchivi
Call Scrivi()
Call Scrivi("Script per Spaziometria V.4.0 di LuigiB & Giomi Rev by Joe",True,,,vbBlue)
Call Scrivi()
Call Scrivi("Sono state aggiunte " & nSalvate & " estrazioni")
Call Scrivi("")
Call Scrivi("Estrazioni totali " & EstrazioniArchivio)
Call Scrivi()
Call Scrivi("Utilizzato Archivio del sito www.lottologia.com")
Call Scrivi()
Else
Call Scrivi("NON HO TROVATO NUOVE ESTRAZIONI !",1,,,2)
End If
End Sub
mi raccomando segui la guida per un istallazione veramente pulitaNon ho parole per ringraziarvi tutti! Provero' a scaricare di nuovo il programma,sperando di non commettere errori e che tutto vada a buon fine! Grazie ancora!
|
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 SpazioLight.net V.1.0.38 |
====================== |
AVVISO a TUTTI , |
====================== |
per coloro che aggiornano dalla pagina del TELEVIDEO RAI |
fate attenzione la pagina 786 con la data del 30/12/2023 NON VA BENE |
riporta ancora le estrazioni del 29/12/2023 ovvero gli estratti del giorno 29/12/2023. |
Aspettate che aggiustano la pagina |
====================== |
Buon sabato a tutto il forum. |
====================== |
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 SpazioLight.net V.1.0.38 |
====================== |
AVVISO a TUTTI , |
====================== |
tutto bene |
ripristinata la pagina del TELEVIDEO RAI |
====================== |
Buon sabato a tutto il forum. |
====================== |
A presto |
Silop |
=============================Grazie di tutto silop2005 e Buon Anno!
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 SpazioLight.net V.1.0.38 |
====================== |
Ciao Lotto_Tom75 , |
====================== |
Grazie degli auguri che ricambio a te e a tutti gli amici (incluso LuigiB) di questo bellissimo forum. |
AUGURI di Buon anno 2024 |
Ringrazio per il pollicione : claudio8 |
====================== |
Buona VIGILIA di CAPODANNO a tutto il forum. |
====================== |
A presto |
Silop |
=====================================Ciao una cortesia ,non so perchè ho aggiornato l'archivio superenalotto mi mette 2 estrazioni doppie una in bianco ed una con l'estrazione, come posso ovviare,grazieò. E BUON ANNO.
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 SpazioLight.net V.1.0.38 |
====================== |
Ciao Alien , |
====================== |
è semplice |
all'apertura di SPMT clicca su : Base dati |
poi |
Aggiornamento superenalotto |
e Tronca archivio |
ti posizioni DUE estrazioni prima |
e cosi elimina quella in bianco e quella buona |
poi inserisci manualmente quella/e che manca/no. |
Buona anno anche a te. |
Ringrazio per il pollicione : zagort |
====================== |
Buona VIGILIA di CAPODANNO a tutto il forum. |
====================== |
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 SpazioLight.net V.1.0.38 |
====================== |
Ciao Alien , |
====================== |
per fare prima |
sarebbe opportuno che mi contatti tramite email |
cosi ti invio l'archivio del superenalotto aggiornato al 30/12/2023 |
e lo inserisci sotto SPMT al posto del tuo. |
No, non devi installare di nuovo SPMT. |
Fammi sapere |
====================== |
Buon martedì a tutto il forum. |
====================== |
A presto |
Silop |
================================buona sera silop scusa se ti disturbo anche io avrei bisogno dell'ARCHIVIO del superenalotto aggiornato ,purtroppo non ho la tua email e non so come recuperarla se mi puoi aiutare 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 SpazioLight.net V.1.0.38 |
====================== |
Ciao cele , |
====================== |
vedo che sei un nuovo iscritto a questo forum |
se usi il programma free Spaziometria by LuigiB |
ti posso inviare l'archivio intero del Superenalotto aggiornato al 02/01/2024 |
Su questo forum non si possono mettere email personali e ne link dei siti, |
ma se cerchi su altri forum il mio nick: silop2005 |
mi trovi facilmente e ci possiamo mettere in contatto con mp. |
Oppure su un motore di ricerca scrivi : IN_DIRETTA_by_Silop |
e poi vedi i miei contatti. |
====================== |
Buon mercoledì a tutto il forum. |
====================== |
A presto |
Silop |