Per chi puo aiutarmi

[joe]

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:

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 è.

 

[DjNomade]

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

 

[joe]

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.

 

[DjNomade]

Appena provato, perfetto....... copiato l'estrazioni mancanti ed è ripartito perfettamente
Grazie Joe
Grazie Cinzia27

 

[Cinzia27]

Grazie, Joe, della spiegazione.

 

[joe]

Ringrazio io, perché nelle richieste piu disparate, si trovano modi di esplorare lo scibile, secondo prospettive che la fantasia, di un solo soggetto, non ha capacità di concepire.