Lo riga che crea il nuovo file dovrebbe essere questa:
If oFSO.FileExists(sFile) Then
Set objFile = oFSO.CreateTextFile(WScript.Arguments.Item(1) &
"\volumi_test" & giorno & mese & Right(Year(Date),2) & ".dat")
io vorrei che il primo script crei il file volumi_test.dat e quelli
seguenti non sovrascrivano quello presente ma aggiungano i dati..
e' possibile farlo semplicemente modificando la riga che vi ho
postato?
considerate che non capisco nulla di programmazione quindi se la
spiegazione e' complicata lasciamo perdere...se non altro per non
farvi perdere tempo..
grazie
ciao
rent
Ciao Rent,
Usando la funzione CreateTextFile dici a vb di ricreare da zero ogni
volta il file. Dovresti usare invece la funzione OpenTextFile, dove
puoi specificare se vuoi fare l'append dei dati.
La tua riga dovrebbe diventare:
Set objFile=objFso.OpenTextFile(WScript.Arguments.Item(1) &
"\volumi_test" & giorno & mese & Right(Year(Date),2) & ".dat", 8)
La cosa importante è quel ",8" che vuol dire "forAppending"
Fabrizio
mille grazie... io immaginavo una cosa tipo, AppendTextFile.... ci ho
provato pure ma non ha funzionato, ora provo con questa modifica e
vedo se va.
grazie ancora
rent