Follow along with the video below to see how to install our site as a web app on your home screen.
Nota: This feature may not be available in some browsers.
Segui le istruzioni.salve
avevo gia chiesto qui
Archivi Rotanti:non si aggiornano le estrazioni lotto
ma non ho avuto risposte
in che formato e' l' archivio
se e' TXT o CSV , puoi postare l' archivio od anche una sola esrazione ,
per vedere come e' strutturato,
01/12/2022;144;74;30;07;16;48;15;23;22;60;02;21;53;40;16;17;10;86;75;56;37;15;49;61;38;14;78;35;31;88;27;10;63;06;13;76;48;59;60;10;35;06;22;81;27;09;70;72;47;68;22;31;26;27;42;53
ciao alla gentile attenzione siete riusciti ad aggiornare l'archivio di questo fantastico programma? grazieciao!!! Alla gentile attenzione di mirap potresti realizzarmi un utilità per aggiornare l archivio lotto di archivi rotanti? In attesa della gentile risposta ti ringrazio
Option Explicit
Sub Main
'Crea File Estrazioni per Archivi Rotanti
'Script By Joe 06/12/2022
Dim sFile,Riga
Dim Ini,Fin,Es,R,P
sFile = "C:\Users\computer\AppData\Roaming\ArchiviRotanti\Estrazioni.txt"
Ini = 1 : Fin = EstrazioniArchivio
Messaggio("Creazione Archivio")
Call EliminaFile(sFile)
For Es = Ini To Fin
Call AvanzamentoElab(Ini,Fin,Es)
Riga = DataEstrazione(Es,,,"/")
Riga = Riga & ";" & FormatSpace(IndiceAnnuale(Es),3,1)
For R = 1 To 12 : If R = 11 Then R = 12
For P = 1 To 5
Riga = Riga & ";" & Format2(Estratto(Es,R,P))
Next
Next
Call ScriviFile(sFile,Riga)
Next
Call CloseFileHandle(sFile)
End Sub
mirapep , hai scritto che l' archivio di spaziometria a dei problemi .
hai provato il link che ti ho indicato ?
se ti funziona , su spaziometria ed xp , si puo modificare per , conforme alle tue esigenze .
comunque , si continua a non rispondere a semplici domande.
allego il file fatto con lo script di Joe.