Novità

Per chi puo aiutarmi

Ciao Cinzia,

il problema è un pochino più complesso e non è uno solo.

Il primo dipende da come l'archivio verrà interpretato dal programma che lo deve elaborare.

Quello che si vede a video... non è esattamente ... quello che c'è nell'output dello script.

E ... non è neppure quello che il "blocco note" ci fa vedere.

Per questa ragione normalmente, NON VEDIAMO se i numeri sono in colonna perché separati

dal carattere "Tab" o da degli "Spazi". (perchè sono "a destra" o "a sinistra" ecc. ecc.)

Così pure non vediamo i caratteri invisibili cioè quelli che regolano il come si va "a capo".

Con il comando LF (Line Feed) si va in una altra Linea/Riga ... quella successiva/dopo/sotto.

Oppure se assieme a questo LF c'è ANCHE (come è nello stile Windows) il CR che è il "Ritorno del Carrello",

si va all'inizio della riga.

Cioè c'è differenza se è solo "a Capo" o se è "a Capo" + "Ritorno del Carrello".

Come era nella vecchia macchina da scrivere meccanica.

Si può passare alla linea dopo e/o anche alla prima colonna a sinistra

(con il Ritorno del Carrello CR che si porta tutto a destra) avendo prima fatto avanzare la carta con il "Line Feed"

operazione che si ottiene premendo meno intensamente la stessa leva che può spostare anche il carrello.

Il secondo problema è che se non viene descritto cosa si vorrebbe ... diventa impossibile dare risposte.

Per esempio era già stato chiesto qualcosa di molto-molto-molto simile al quale avevo risposto

con il resto dello script che era:

Codice:
Option Explicit
Sub Main
   'x Milonico Aggiornatore Archivio
   'Esempio: 7095;06/05/2025;Bari;6;44;88;74;39
   'Script By Joe
   Dim Ini,Offset,Es,R,S,P,Sep,Out
   Ini = DataEstrToIdEstr(06,05,2025)
   Sep = ";"
   Offset = 7095 - Ini
   For Es = Ini To EstrazioneFin
      For S = 1 To 11
         R = S
         If S = 9 Then R = 12
         If S > 9 Then R = S - 1
         Out = Es + Offset & Sep & DataEstrazione(Es,,,"/")
         Out = Out & Sep & NomeRuota(R)
         For P = 1 To 5
            Out = Out & Sep & Estratto(Es,R,P)
         Next
         Scrivi Out
      Next
   Next
End Sub

Però se le carte in tavola sono altre o non si sa cosa si deve fare,

occorrere uno sguardo alla sfera di cristallo, che ci apre gli occhi alla visione del come, cosa, dove, quando ... perchè.

Cioè che occorre convertire l'output.csv in un formato leggermente diverso.

Ma bisogna sapere quello che è.

:)
 
Ultima modifica:
Finora per aggiornare il mio programma scarico l'archivio dalla lottomatica qua
https://www.lotto-italia.it/lotto/estratti-ruote
sostituendo il file txt ,ma ogni tanto si dimenticano di aggiornare e quindi volevo provare con un listato
che è credo quello che chiedeva anche Milonico aprendo il post.

Ciauzzzzzzz

Riguardo lo script, ho apportato alcune modifiche a quello già presentato.

Ho ritenuto utile sostituire il codice nello stesso messaggio,

perché avete fornito nuove indicazioni e specifiche che prima non erano state considerate.

Non sapendo come e dove lo script possa essere provato, non posso far altro

che cercare di accogliere le richieste per quello che di esse riesco a recepire.

:)
 

Ultima estrazione Lotto

  • Estrazione del lotto
    sabato 30 agosto 2025
    Bari
    85
    39
    37
    73
    79
    Cagliari
    73
    35
    51
    59
    10
    Firenze
    49
    44
    08
    68
    61
    Genova
    55
    05
    44
    42
    62
    Milano
    54
    79
    11
    78
    70
    Napoli
    23
    71
    09
    14
    49
    Palermo
    88
    07
    28
    30
    26
    Roma
    31
    84
    35
    48
    85
    Torino
    39
    48
    87
    16
    27
    Venezia
    56
    35
    87
    17
    73
    Nazionale
    53
    02
    90
    72
    66
    Estrazione Simbolotto
    Nazionale
    24
    15
    10
    03
    07

Ultimi Messaggi

Indietro
Alto