joe
Advanced Member >PLATINUM PLUS<
joe perche hai cancellato lo script al messaggio 1000 ? è QUELLO CHE MI HA CREATO IL CORNETTO MA IO LO MANGIO VEGANO.
ED è QUESTO
Option Explicit
Sub Main
Dim D,S,sFile,Riga
D = GetDirectoryAppData
S = Split(D,"\")
sFile = S(0) & "\" & S(1) & "\" & S(2) & "\Desktop\Download Archvio.bat"
Riga = """" & D & "Wget.exe" & """" & " -O " & """" & D & "BaseDatiSuperEna.Dat" & """" & " --no-check-certificate www.silop.it/spaziometria/BaseDatiSuperEna.Dat"
Call EliminaFile(sFile)
Call ScriviFile(sFile,Riga)
Call LanciaFile(sFile)
End Sub
COSA HA ELIMINATO : Call EliminaFile(sFile)
******************************************************************************
Ciao Alien
prova a controllare se con questo script risolvi il problema :
Codice:
Rimosso dall' autore
Dopo averlo eseguito chiudi e poi riavvii Spaziometria e controlli se ha trovato l'ArchivioSE.
Ultima modifica: Ieri alle 22:48
Devi considerare alcune cose :
Il regolamento del sito vorrebbe che non si mettessero indirizzi web.
E ... come vedi riportando lo script lo hai messo !
Secondo, hai scritto che ... aveva cancellato dei tuoi file. E' COSA NON VERA !
Eppoi ancora, hai sollevato dubbi ... e non ce ne possono essere perché:
A) E' un file di testo.
B) E' uno script in chiaro.
C) E' esplicito cosa cancella : SFile = "Download Archvio.bat"
D) E' esplicito cosa Crea : SFile = "Download Archvio.bat"
E) Inoltre NON ti serve e ... a detta tua non funziona.
In ultimo devi considerare che Silop, ha scritto, che rende disponibile il file necessario "a fine mese".
Si era a fine mese ed eseguirlo avrebbe aggiornato il database.
Mentre ADESSO cancellerebbe le ultime estrazioni riportando l'archivio indietro al 30/06/2026.
Pertanto non c'erano ragioni per lasciare uno script dedicato alla soluzione di un problema specifico.
In ultimo ho già spiegato alcune volte perché cancella il vecchio file prima di scrivere quello nuovo.
E' inutile continuare a chiedere cosa cancella se poi "rifiuti" il contenuto del a risposta.
Per essere esplicito e per l'ultima volta: Cancella (se c'è) il file DOWNLOAD ARCHIVIO.BAT dal Desktop per poi riscriverlo ex-novo.
