Novità

Archivio visual lotto 7.05

buon giorno a tutti aproposito di archivi io cerco l'achivio di lotto Excell (programma) i file sono in formato drawit grazie fatemi sapere
Buongiorno Muletto,
avevo una delle prime versioni di quel programma, ma se le cose non sono cambiate, gli archivi si chiamano drawit, ma l'estensione e' mdb, quindi si possono aggiornare tramite macro che popoli le tabelle di access di microsoft.
 
Buongiorno Muletto,
avevo una delle prime versioni di quel programma, ma se le cose non sono cambiate, gli archivi si chiamano drawit, ma l'estensione e' mdb, quindi si possono aggiornare tramite macro che popoli le tabelle di access di microsoft.
ho provato non sono riuscito a trovare
 
Ciao Druid, direi un bel po'....licenziati e non....
Saluti
Francesco
ps. per muietto, questo è l'archivio di Lotto Excel 2015 Plus ovviamente licenziato.....
per lupo bianco, il software Visual Lotto è a pagamento. Basta cercare su INTERNET se vuoi acquistarlo.

Buona serata a tutti e rinnovo i miei auguri di una felice e serena Pasqua
 
Ecco l'archivio drawit
Buona Pasqua a tutti.
Ciao Druid
Francesco

Ciao firefox, grazie per aver condiviso i files.

Purtroppo ho provato a caricare il file drawit rinominato .mdb nel programma ma non funziona, sicuramente sbaglio io qualcosa.

Cortesemente potresti dirmi step by step come fare ? ho la versione 2006 con l'archivio fermo al 2.1.2021.

Grazie mille.

oracolotto
 
Ciao Oracolotto devi torgliere il suffisso .txt in modo tale che rimanga il file .rar.
Copia l'archivio decompresso nella dir del software. Non devi rinominare niente.
Poi se la versione in tuo possesso riconosce un altro tipo di archivio questo non lo so. Ma non dovresti aver problemi.
Io ho la versione 2015.
Saluti
Francesco
 
Ciao ragazzi, ho capito come aggiornare, manualmente purtroppo, l'archivio di visual lotto 7 tramite il link della pagina di televideo incorporata nel programma.
Praticamente salvo la pagina testuale in html e vado poi a modificare manualmente l'estrazione sia come data che come numeri, poichè non ho nozioni di html avanzate e cose varie, e soprattutto eliminando 3 righe di link di sottopagine.
In questo modo però si può aggiornare anche salvando e modificando il file in locale.
Vi terrò informati, se poi qualcuno più esperto ne capisce ben venga
 

Allegati

Ciao ragazzi, ho capito come aggiornare, manualmente purtroppo, l'archivio di visual lotto 7 tramite il link della pagina di televideo incorporata nel programma.
Praticamente salvo la pagina testuale in html e vado poi a modificare manualmente l'estrazione sia come data che come numeri, poichè non ho nozioni di html avanzate e cose varie, e soprattutto eliminando 3 righe di link di sottopagine.
In questo modo però si può aggiornare anche salvando e modificando il file in locale.
Vi terrò informati, se poi qualcuno più esperto ne capisce ben venga
Ciao phil79,
avendo un po' di tempo stamane ho "giochicchiato" con la tua idea, modificando del codice che avevo utizzato per altri scopi.
Inserisci questo script in visual lotto 7:
Codice:
Sub Main ()

' Definizione delle variabili
Dim objHTTP, objFSO, objFile, WScript
Dim strURL, strFilePath, strContent

' URL della pagina da scaricare
strURL = "https://www.televideo.rai.it/televideo/pub/solotesto.jsp?regione=&pagina=786"

' Percorso del file in cui salvare la pagina
strFilePath = "C:\Program Files (x86)\Visual Lotto 7\dati\televideo_786.html"

' Creazione dell'oggetto HTTP per la richiesta web
' Tenta prima con WinHttpRequest, che è più comune nei sistemi Windows moderni
On Error Resume Next
  objHTTP = CreateObject("WinHttp.WinHttpRequest.5.1")
If Err.Number <> 0 Then
    ' Se fallisce, prova con MSXML2.XMLHTTP
    Err.Clear
      objHTTP = CreateObject("MSXML2.XMLHTTP")
    If Err.Number <> 0 Then
        ' Prova anche MSXML2.ServerXMLHTTP come ultima risorsa
        Err.Clear
          objHTTP = CreateObject("MSXML2.ServerXMLHTTP")
        If Err.Number <> 0 Then
            WScript.Echo("Errore: Impossibile creare un oggetto HTTP. Verifica che le librerie necessarie siano installate.")
            WScript.Quit
        End If
    End If
End If
On Error GoTo 0

' Apertura della connessione (GET) all'URL
objHTTP.Open("GET", strURL, False)
objHTTP.Send

' Verifica che la richiesta sia andata a buon fine (codice 200)
If objHTTP.Status = 200 Then
    ' Creazione dell'oggetto FileSystemObject per la gestione dei file
      objFSO = CreateObject("Scripting.FileSystemObject")
    
     ' Verifica se la cartella C:\dati esiste, altrimenti la crea
    If Not objFSO.FolderExists("C:\Program Files (x86)\Visual Lotto 7\dati") Then
        objFSO.CreateFolder("C:\Program Files (x86)\Visual Lotto 7\dati")
    End If
    
    
    ' Ottiene il contenuto della pagina
    strContent = objHTTP.responseText
    
    ' Rimuove la stringa "<a href="solotesto.jsp?pagina=401">401</a> ALMANACCO"
    strContent = Replace(strContent, "<a href=""solotesto.jsp?pagina=401"">401</a> ALMANACCO", "")
    
    ' Crea o sovrascrive il file
      objFile = objFSO.CreateTextFile(strFilePath, True)
    
    ' Scrive il contenuto modificato nel file
    objFile.Write(strContent)
    
    ' Chiude il file
    objFile.Close
    
    ' Messaggio di conferma
    WScript.Echo("La pagina è stata scaricata con successo e salvata in " & strFilePath)
Else
    ' Messaggio di errore se la richiesta non è andata a buon fine
    WScript.Echo("Errore durante il download della pagina. Codice di stato: " & objHTTP.Status)
End If

' Libera le risorse
  objFile = Nothing
  objFSO = Nothing
  objHTTP = Nothing   
End sub

poi in "Utility - Opzioni/Preferenze" inserisci la stringa "file:///C:\Program Files (x86)\Visual Lotto 7\dati\televideo_786.html" - come da img:

Screenshot 2025-04-29 142540.png



In pratica lanciando lo script, scarica la pagina dell' ultima estrazione da Televideo e la rende utilizzabile , poi vai su "Archivi - Aggiornamento da Televideo" e scarica l'ultima estrazione inserendola nell'archivio.
Naturalmente aggiorna i vari "percorsi" se VL7 e' installato in path differenti.
Fammi sapere.....
Ciao
 
Ciao Druid, grazie del consiglio e script e funziona....ma il problema è un altro! L'archivio Vl7 è fermo al 2023 quindi devo aggiornarlo da allora.... per ora lo sto facendo a mano, se riesci a darmi una mano... si dovrebbe scaricare l'intero archivio dal 2023 o lanciare uno script tipo spaziometria ma non so se funziona....non ho nozioni
 
Comunque sto aggiornando manualmente almeno 2023 e 24 poi userò lo script di druid per il 25.
Appena finito lo posto
 

Ultima estrazione Lotto

  • Estrazione del lotto
    martedì 29 aprile 2025
    Bari
    03
    07
    32
    05
    33
    Cagliari
    66
    62
    27
    39
    26
    Firenze
    07
    41
    70
    75
    53
    Genova
    10
    26
    64
    44
    74
    Milano
    30
    76
    66
    51
    65
    Napoli
    56
    80
    34
    11
    29
    Palermo
    74
    37
    48
    13
    38
    Roma
    02
    21
    18
    51
    68
    Torino
    64
    06
    32
    88
    54
    Venezia
    66
    01
    11
    74
    54
    Nazionale
    65
    63
    50
    55
    33
    Estrazione Simbolotto
    Genova
    45
    10
    12
    24
    40

Ultimi Messaggi

Indietro
Alto