lotto_tom75
Advanced Premium Member
Come salvare in un file txt il report visualizzato a video da qualsiasi script e generato dalle funzioni predisposte?
O meglio...
Date ad esempio queste righe di codice di esempio con le relative funzioni generatrici di output
Come si può fare per "passare" i valori che mostrano nell'output ad un file txt secondo ad esempio questo codice di scrittura file sottostante?
Grazie!
O meglio...
Date ad esempio queste righe di codice di esempio con le relative funzioni generatrici di output
Codice:
Call ImpostaGiocata(1,ambata,ruota,posta,k,1)
Call ImpostaGiocata(2,ambata2,ruota,posta,k,1)
Call ImpostaGiocata(3,ambata3,ruota,posta,k,1)
Call ImpostaGiocata(4,ambata4,ruota,posta,k,1)
Call ImpostaGiocata(5,ambata5,ruota,posta,k,1)
Call ScriviDistribuzioneEsiti(True)
Call ScriviDistribuzioneCasiInCorso(True,"1,2,3,4,5")
Gioca es,False,False,0,0,False
Scrivi : ScriviResoconto
Come si può fare per "passare" i valori che mostrano nell'output ad un file txt secondo ad esempio questo codice di scrittura file sottostante?
Codice:
'scrittura file code
Dim path
Dim sfile
Dim Intestazione1
Dim report-output-doc
path = "percorsovoluto\"
sfile = path & "report-file-x-" & "numero-spia-1" & ".txt"
report-output-doc= ' cosa ci metto qui per avere salvato tutto l'output dello script mostrato a video ??? :-)
Call ScriviFile(sfile,report-output-doc,False,True) ' scrivo anche sul file preposto
CloseFileHandle(sfile)
' fine scrittura file
Grazie!
Ultima modifica: