Esiste un modo per fare una funzione che va a scrivere e manipolare file che si attiva una volta all'anno?
Praticamente io ogni 1 gennaio di ogni anno avrei la necessità di fare un backup del DB e vorrei che il porgramma lo facesse in automatico.
Come potrei fare?
dim datadbackup as date
datadibackup = 'qui metti la data
if datadibackup = date then 'COMPATTA DB
Vascello fantasma dei mentecatti nonchè baronetto della scara corona alcolica, piccolo spuccello di pezza dislessico e ubriaco- Colui che ha modificato l'orribile scritta - Gran Evacuatore Mentecatto - Tristo Mietitore Mentecatto chi usa uTonter danneggia anche te
Avevo pensato ad una cosa simile ma se questo quel giorno non apre il programma e non accende il pc che succede? Il Backup non viene fatto...
sarebbe comunque difficile farlo a pc spento...
Logicamente vorrei che se quel giorno non accendesse il pc lo facesse il giorno dopo...
Non si può fare una cosa simile a quella consigliata da xegallo ma al posto dell'uguale un operatore <
Ho provato ma non funge...
è difficile anche fare il caffè con la caffettiera spentaOriginariamente inviato da optime
sarebbe comunque difficile farlo a pc spento...
Vascello fantasma dei mentecatti nonchè baronetto della scara corona alcolica, piccolo spuccello di pezza dislessico e ubriaco- Colui che ha modificato l'orribile scritta - Gran Evacuatore Mentecatto - Tristo Mietitore Mentecatto chi usa uTonter danneggia anche te
1. leggi la data dell'ultimo backup da un apposito file
2. se non c'e', vai a 4
3. se l'anno e' uguale all'anno corrente, l'hai gia' fatto, vai a 6
4. fai il backup
5. scrivi in un file la data di oggi
6. continui il lavoro come di consueto
con la caffettiera spenta si puo' fare il backup, ma il pc acceso non fa il caffe'. se lo fa, chiama l'assistenza.
Il tuo consiglio è perfetto, solo che mi dovresti aiutare un pò a farlo.
Da dove potrei partire per poter operare con i file? Mi indicheresti una buona guida?
scrivi open evidenzialo e premi f1 è spiegato benissimoOriginariamente inviato da damar3
Il tuo consiglio è perfetto, solo che mi dovresti aiutare un pò a farlo.
Da dove potrei partire per poter operare con i file? Mi indicheresti una buona guida?
Vascello fantasma dei mentecatti nonchè baronetto della scara corona alcolica, piccolo spuccello di pezza dislessico e ubriaco- Colui che ha modificato l'orribile scritta - Gran Evacuatore Mentecatto - Tristo Mietitore Mentecatto chi usa uTonter danneggia anche te
Sto cercando di capire come funzionano i file e partendo da F1 sono arrivato a questo esempio:
Dim fso As New FileSystemObject, txtfile, fil1 As File, ts As TextStream
Set fil1 = fso.GetFile("C:\text.txt")
Set ts = fil1.OpenAsTextStream(ForWriting)
ts.Write "Salve, gente"
ts.Close
' Legge il contenuto del file.
Set ts = fil1.OpenAsTextStream(ForReading)
s = ts.ReadLine
MsgBox s
ts.Close
Sto cercando di farlo funzionare ma non va... Dov'è l'inghippo? Mi da questo errore:
Tipo definito dall'utente non definito
Permessi di invio
Rispondi quotando