lotto

[peppino61]

cerco archivio aggiornato l8+60

 

[Oscar]

Trovare l'archivio in itz è un pò difficile , ma si potrebbe fare uno script per un archivio in TXT che poi lo importi in L8 , ma non ricordo piu come deve essere in TXT , quindi se fai un export in formato txt poi lo alleghi per vedere le caratteristiche che ha

 

[Oscar]

Dovrebbe essere così vedi se va bene

 

[Rosanna58]

cerco archivio aggiornato l8+60

Ciao peppino61, questo e' l'archivio aggiornato, devi solo rinominarlo .itz e caricarlo con l'opzione ripristina backup. Buon lavoro

 

[Rosanna58]

Ciao peppino61, questo e' l'archivio aggiornato, devi solo rinominarlo .itz e caricarlo con l'opzione ripristina backup. Buon lavoro

Correzione ho sbagliato file, quello giusto e' questo e devi rinominarlo .itzbak

 

[joe]

cerco archivio aggiornato l8+60

In L8 come in Spaziometria ci sono 2 opzioni.

* SOSTITUIRE TUTTO l'archivio con uno aggiornato.

* AGGIORNARE l'archivio aggiungendo le estrazioni mancanti.

Oscar (E ROSANNA CHE SALUTO) hanno assecondato la tua richiesta secondo la prima opzione.

Quando dovrai aggiornare ti potrà essere utile questo script.

Option Explicit
Sub Main
  '>>> SCRIPT PER SPAZIOMETRIA <<<
  'Agg_Arch_L8.txt V.3.2 del 22/07/2021
  'Script By Joe / Chicco3 / Magia
  Dim Ini,Fin,Es
  Dim R,P
  Dim sFile
  Dim sEstrazione
  sFile =(GetDirectoryTemp & "Agg_Arch_L8.txt") 'Specifica percorso di archiviazione
  Call EliminaFile(sFile) ' Elimina vecchie copie dell' archivio
  Ini = EstrazioneFin - 1500 : Fin = EstrazioneFin 'controlla/aggiorna le ultime 15 estrazioni
  For Es = Ini To Fin
    AvanzamentoElab Ini,Fin,Es
    sEstrazione = DataEstrazione(Es,,,",") & ","
    For R = 1 To 12
      If R = 11 Then R = 12
      For P = 1 To 5
        sEstrazione = sEstrazione & Format2(Estratto(Es,R,P)) & ","
      Next
    Next
    Call ScriviFile(sFile,sEstrazione) ' scrivo anche sul file preposto
  Next
  Call CloseFileHandle(sFile) ' chiudo l'handle al file
  Scrivi "In L8 selezionare :"
  Scrivi
  Scrivi "* Archivio"
  Scrivi
  Scrivi "* Scambia Estrazioni"
  Scrivi
  Scrivi "* Importa Estrazioni ..."
  Scrivi
  Scrivi " ... navigare sino all'indirizzo: "
  Scrivi
  Scrivi sFile,True,,,1 ' Percorso del file creato
  Scrivi
  Scrivi "* Premere 'Apri'"
  Scrivi
  Scrivi "* Confermare con 'Ok' i messaggi del programma"
End Sub

 

[joe]

NB:

 Ini = EstrazioneFin - 15 : Fin = EstrazioneFin 'controlla/aggiorna le ultime 15 estrazioni

NON SI DEVE SUPERARE IL LIMITE DI 500 ESTRAZIONI MANCANTI

 

[Oscar]

Lo devi rinominare in .itz
è aggiornato

 

[joe]

Oscar,

ho ricevuto in altro forum uno script capace di leggere l'archivio di cui avevamo detto.

Ti interessa ancora aggiornare da quel sito ?

Fammi sapere.

 

[Oscar]

Si grazie gli script per aggiornare sono sempre utili

 

[silop2005]

cerco archivio aggiornato l8+60

==============================

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

======================

Ciao peppino61 ,

======================

se hai ancora problemi per l'archivio .itz

puoi dare uno sguardo anche sul mio sito nella cartella di Joe

trovi sempre l'archivio per il programma L8+6 (non aggiornato)

======================

Buon mercoledì a tutto il forum.

======================

A presto

Silop