paolo the best(ia) |
|
| ciao a tutti, θ da poco che studio l'AutoIt, e mi θ venuta un' idea... studio informatica, e il prof dice sempre "Non modificate i file dopo la scadenza, tanto io guardo la data di creazione e modifica..." ebbene ho creato un piccolo ed inutile prog per chiunque avesse, come me, questo problema (purtroppo θ un pς lungo... non sapevo in che altro modo fare, rendendolo semplice) CODICE ;Programma che cambia l'orario di un file #include <process.au3> $percorso=InputBox("File", "Inserisci il precorso del file") if Not FileExists($percorso) Then msgbox(48+0, "Errore", "Il file indicato non esiste...") Exit endIf msgbox(48+0, "Info", "Le informazioni successive dovranno essere inserite sotto - forma di numeri") msgbox(0, "Fase 1", "Modifica del parametro 'Data Creazione'") $anno=InputBox("Anno", "Inserisci l'anno (YYYY)") $mese=inputbox("Mese", "Inserisci il mese (MM)") $giorno=InputBox("Giorno", "Inserisci il giorno (DD)") $ora=inputbox("Ore", "Inserisci l'ora (HH)") $min=InputBox("Minuti", "Inserisci i minuti (MM)") $sec=inputbox("Secondi", "Inserisci i secondi (SS)") $tempo_c=$anno & $mese & $giorno & $ora & $min & $sec msgbox(0, "Fase 2", "Modifica del parametro 'Modificato'") $anno_1=InputBox("Anno", "Inserisci l'anno (YYYY)") $mese_1=inputbox("Mese", "Inserisci il mese (MM)") $giorno_1=InputBox("Giorno", "Inserisci il giorno (DD)") $ora_1=inputbox("Ore", "Inserisci l'ora (HH)") $min_1=InputBox("Minuti", "Inserisci i minuti (MM)") $sec_1=inputbox("Secondi", "Inserisci i secondi (SS)") $tempo_m=$anno_1 & $mese_1 & $giorno_1 & $ora_1 & $min_1 & $sec_1 FileSetTime("" & $percorso, "" & $tempo_c, 1) FileSetTime("" & $percorso, "" & $tempo_m, 0) msgbox(64, "Fine", "Operazione effettuata") MsgBox(64, "Credits", "Edit by paolo the best(ia)") spero possa essere utile a qualcuno... ciao
|
| |