By 26 Novembre 2014

VbScript – Attivare un Avviso sul cambio di Data di Modifica di un File

Il seguente “spezzone” di codice in linguaggio in VbScript ( Windows Script Host ) si utilizza per il monitoraggio della data di modifica di un file.
E’ estremamente semplice ed invia una e-mail al cambiamento della data di modifica (forzata nel codice)

</pre>
strFile = "C:Rootwww.***.itindex.html"

SET objFSO = CREATEOBJECT("Scripting.FileSystemObject")
SET objFile = objFSO.GetFile(strFile)
'wscript.echo "File Modified: " & CDATE( objFile.DateLastModified)
modifica = CDATE( objFile.DateLastModified)

If modifica <> "24/11/2014 16.13.06" then
 Const MAIL_MODE = 2
 Const MAIL_SERV = "mail.****"
 Const MAIL_PORT = 25

 Set objEmail = CreateObject("CDO.Message")
 With objEmail
 .From = "****"
 .To = "****"
 .Subject = "[FILE MODIFICATO]"
 .Textbody = "TESTO"
 .Configuration.Fields.Item("https://schemas.microsoft.com/c­do/configuration/sendusing") = MAIL_MODE
 .Configuration.Fields.Item("https://schemas.microsoft.com/c­do/configuration/smtpserver") = MAIL_SERV
 .Configuration.Fields.Item("https://schemas.microsoft.com/c­do/configuration/smtpserverport") = MAIL_PORT
 .Configuration.Fields.Update
 .Send
 End With
End If
<pre>

Altri script in VbScript che potrebbero interessarti :

    Fonti : Data di Modifica di un File, Vbscript Data di Modifica di un File, Leggere Data di Modifica di un File, Alert su Data di Modifica di un File, Avviso Data di Modifica di un File, Avviso via e-mail cambiamento Data di Modifica di un File, Data di Modifica di un File

    Posted in: Hacker - Difesa, Script Vbscript

    About the Author:

    shared on wplocker.com