Novità

Script aggiornamento 10elotto 5 min

Purtroppo non va.
Il file2 dà prima il solito messaggio di errore, poi alla richiesta se vuoi vedere ulteriori messaggi esce ll'output come da immagine

Maurizio2.jpg


Il link lo trova invece.

Il file1 invece mi apre prima le directory di spaziometria e poi da il solito messaggio di errore
 
Che poi non ho compreso come mai da ArchiviRotanti l'archivio lotto si aggiorna regolarmente, gli altri no perchè dovrebbe rilevarli da spaziometria che non si aggiorna per niente
 
Ciao,
apre il plugin ma non aggiorna. Spaziometria da tempo non mi aggiorna più gli archivi

Vedi l'allegato 2204090
=================================================
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
======================
Ciao Mirapep ,
======================
ti ho scritto una mail con le info
come aggiornare l'archivio del 10L5M su SPMT.
Fammi sapere se ti è arrivata.
Buona giornata a tutto il forum.
======================
stickman.gif
A presto
Silop ;) ;) ;)
 
Che poi non ho compreso come mai da ArchiviRotanti l'archivio lotto si aggiorna regolarmente, gli altri no perchè dovrebbe rilevarli da spaziometria che non si aggiorna per niente

Lo script presente al Msg 49


per il lotto dovrebbe funzionare.

Ma come ho scritto prima, più si mescolano argomenti, più è difficile trovare soluzioni.

Da quello che avete scritto si ricava che lo script che avevo proposto per il 10eL5min non legge l'archivio.

Ovvero, non scarica il testo dell'archivio ... ma la pagina web.

pertanto il vostro secondo script (poi) non ha i dati corretti dai quali estrarre l'aggiornamento x il 10L5Min.

Cioè a quell'indirizzo non c'è un il testo necessario ma c'è una pagina web con il bottone con cui richiederlo.

Sinceramente non ho proprio idea di come .. e se si possa fare tutto con un solo script.

:)
 
Ultima modifica:
Ciao Silop, grazie per la gentilezza così come a quanti hanno cercato di risolvere il problema.
Purtroppo anche seguendo le tue indicazioni arriva puntualmente lo stesso messaggio di errore
Credo proprio che devo scrivermi una routine vb6.
Vedo prima come vanno le previsioni nella discussione "Speculare con ArchiviRotanti" per il lotto, poi passo al 10elotto 5M per provare la stessa tecnica se il gioco ne vale la candela.

Saluti
 
Ciao Maurizio


Ma1.jpg



Ma2.jpg
Poi non riesco a comprendere come mai nella directory di spaziometria trovo solo un plugin di aggiornamento superenalotto che se mando in esecuzione funziona e scarica le combinazioni ma non comprendo dove le registra. Infatti se lancio l'aggiornamento da spaziometria non solo la schermata plugin è diversa ma da anche errore e l'archivio non risulta aggiornato

Ma3.jpg
 
Buongiorno,
ArchiviRotanti aggiorna il 10elotto 5M da spaziometria e ha sempre dato errore. Ho inserito nella directory di spaziometria un file archivio fornito da silop. Ho provato ad aggiornare da ArchiviRotanti e Sorpresa ha eseguito l'aggiornamento. Non riesco proprio a comprendere. Da spaziometria non si aggiorna.
 
Buongiorno,
ArchiviRotanti aggiorna il 10elotto 5M da spaziometria e ha sempre dato errore. Ho inserito nella directory di spaziometria un file archivio fornito da silop. Ho provato ad aggiornare da ArchiviRotanti e Sorpresa ha eseguito l'aggiornamento. Non riesco proprio a comprendere. Da spaziometria non si aggiorna.
 
Buongiorno a tutti gli intervenuti.
Non avendo win Xp non posso testare il comando .bat
Codice:
"C:\  --PERCORSO DI WGET--  \wget.exe" --no-check-certificate https://www.lottologia.com/10elotto5minuti/?do=past-draws-archive"&"as=TXT

scarica un file chiamato

index.html@do=past-draws-archive&as=TXT

va rinominato in

"come vuoi" con estensione .txt (esempio: archivio.txt)

Chi puo' provarlo? Grazie.
Ciao
 
Ciao Druid.

Proverò appena avrò un pc.

:) Grazie.
 
Ultima modifica:
Ciao Druid
eseguito come da istruzioni, l'archivio riferito alle estrazioni del giorno è stato scaricato nella stessa directory di wget, e ora?

grazie
 
In pratica per l'aggiornamento di ArchiviRotanti è necessario aggiornare prima l'archivio 10elotto 5M di spaziometria
 
In pratica per l'aggiornamento di ArchiviRotanti è necessario aggiornare prima l'archivio 10elotto 5M di spaziometria

Prova questo .bat (scarica gli archivi da Silop), su vista funziona

Codice:
wget -O Basedati.dat --no-check-certificate https://www.silop.it/archivi/lottoItalia/BaseDati.dat
wget -O BaseDati10Elotto5M.Dat --no-check-certificate https://www.silop.it/archivi/lottoItalia/BaseDati10Elotto5M.Dat

con wget messo nella dir di SPMT.

Ciao
 
Il problema è l'aggiornamento in tempo reale. Comunque, aver scaricato la pagina web è già un buon punto di partenza. Ora se si riesce a modificare lo script di messaggio2 bene, altrimenti conoscendo la struttura dati dell'archivio e quello della pagina web creerò un programmino in vb6

Un sentito grazie a tutti
 
Allora Maurizio, passo avanti, i due script non danno più messaggio di errore al lancio. Il primo in output non da niente e il file non risulta aggiornato. Il secondo va in elaborazione, la barra di avanzamento elaborazione si ferma al penultimo rettangolino verde e dopo qualche secondo si apre l'output con la dicitura "elemento non trovato"
 
Ultima modifica:
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
'
'CAMBIARE PERCORSO DOVE SALVARE IL FILE
Dim sFile: sFile = "C:\Documents and Settings\Pippo\Desktop\Lottologia\Archivio 10eLotto5M.txt"
'

Questo è il percorso che ho indicato
 
Il problema con il wget è che se si utilizza il comando indicato da druid, si scarica nella stessa directory di wget il file index.html@do=past-draws-archive&as=TXT.
Con il comando indicato da Maurizio non viene riconosciuta la directory e il file di destinazione con l'istruzione -o
 
Ciao a tutti
Ho modificato lo script di Maurizio B.
Non avendo Xp non posso testare lo script ma su Vista funziona....
Codice:
Option Explicit
'https://forums.mydigitallife.net/
Sub Main()
Dim sPercorsoLocale : sPercorsoLocale = " C:\             \SpazioMetria\Archivio.txt"
   Dim sFileEstrazioni : sFileEstrazioni = " C:\                  \SpazioMetria\Archivio10eLotto5M.txt"
   Dim sFile : sFile = "C:\                                                       \SpazioMetria\ftp.bat"
   Call Messaggio("Download Archivio 10eLotto5M")
   
Call LanciaFile(sFile)
   Dim sFileDown: sFileDown=ScegliFile(,".*")
   Call EliminaFile(sPercorsoLocale)

   Call RinominaFile(sFileDown,sPercorsoLocale)
   If FileEsistente(sPercorsoLocale) Then
      Call Messaggio("Lettura file di testo")
      ReDim aRighe(00)
      Dim k,sOut
      Dim nRetNumEstr,sRetData
      Call LeggiRigheFileDiTesto(sPercorsoLocale,aRighe)
      For k = 03 To UBound(aRighe) - 03
         Call aGetScriviArchivio(aRighe,k,sRetData,nRetNumEstr,sOut)
         Call EliminaFile(sFileEstrazioni)
         Call ScriviFile(sFileEstrazioni,sOut)
         Call Messaggio("Colonna : " & k)
         If ScriptInterrotto Then Exit For
         Call AvanzamentoElab(00,UBound(aRighe),k)
      Next
      Call CloseFileHandle(sFileEstrazioni)
      Call LanciaFile(sFileEstrazioni)
      '
      Call LeggiRigheFileDiTesto(sFileEstrazioni,aRighe)
      For k = 000 To UBound(aRighe)
         Call Scrivi(aRighe(k))
      Next
      Call EliminaFile(sFileDown)

   End If
End Sub
Function aGetScriviArchivio(aRighe,k,sRetData,nRetNumEstr,sOut)
   aRighe(k) = Replace(aRighe(k),"-",">")
   aRighe(k) = Replace(aRighe(k),vbTab,">")
   aRighe(k) = Replace(aRighe(k),"/",">")
   aRighe(k) = Replace(aRighe(k)," ",">")
   Do While InStr(aRighe(k),">>")
      aRighe(k) = Replace(aRighe(k),">>",">")
   Loop
   ReDim aValori(000)
   Call SplitByChar(aRighe(k),">",aValori)
   Dim nGiornoCorr,nMeseCorr,nAnnoCorr
   nGiornoCorr = Int(aValori(02))
   nMeseCorr = Int(aValori(01))
   nAnnoCorr = Int(aValori(00))
   sRetData = Format2(nGiornoCorr) & "/" & Format2(nMeseCorr) & "/" & nAnnoCorr
   nRetNumEstr = Int(aValori(03))
   ReDim aRetNumVinc(24) : Dim xx
   For xx = 05 To 24
      aRetNumVinc(xx) = Int(aValori(xx))
   Next
   If IsDate(sRetData) = True Then
      If nRetNumEstr <> 00 Then
         If UBound(aRetNumVinc) = 20 Then
            aGetScriviArchivio = True
            Exit Function
         End If
      End If
   End If
   aGetScriviArchivio = False
   sOut = sRetData & ";" & FormattaStringa(nRetNumEstr,"000") & ";" & StringaNumeri(aRetNumVinc,";",True)
End Function

Il ftp.bat e' quello al post #42 con la raccomandazione di wget inserito nella stessa dir di SPMT.

Ciao
 
Ultima modifica:

Ultima estrazione Lotto

  • Estrazione del lotto
    martedì 19 novembre 2024
    Bari
    51
    20
    49
    27
    67
    Cagliari
    14
    22
    74
    60
    35
    Firenze
    79
    54
    17
    48
    58
    Genova
    86
    87
    74
    22
    25
    Milano
    12
    51
    47
    88
    49
    Napoli
    41
    30
    70
    43
    47
    Palermo
    85
    15
    75
    63
    81
    Roma
    49
    11
    50
    66
    24
    Torino
    44
    15
    03
    41
    84
    Venezia
    50
    89
    75
    47
    33
    Nazionale
    78
    03
    36
    16
    06
    Estrazione Simbolotto
    Torino
    06
    30
    14
    25
    29

Ultimi Messaggi

Indietro
Alto