Cuestión : notificación

Cómo puedo incorporar una notificación del email cuando las escrituras se golpean con el pie apagado y se paran. Actualmente, envía un email cuando el archivo no ha cambiado el estado (actualizado). Quisiera guardar esta característica y agregar notificaciones siempre que comience y pare. ¿Su partida/parada programada vía planificador de tarea, pero se pueden los tiempos del comienzo y de parada definir en la escritura también? Gracias por adelantado.

strComputer = “. “objWMIService del

Set = GetObject (“winmgmts: \ \” y el strComputer y \ cimv2”) los colFiles del

Set = el

For cada uno del _
de objWMIService.ExecQuery (“seleccionar * de CIM_Datafile donde nombre = 'C:\ \ los programfiles \ \ \ \ name.txt del dir”) objFile en el strOriginalTimestamp = objFile.LastModified
Next

Wscript.Echo del colFiles
“comenzaron: ” Y Now

Do mientras que colFiles de True
Wscript.Sleep 3600000
=

del _
de objWMIService.ExecQuery (“seleccionar * de CIM_Datafile donde nombre = 'C:\ \ los programfiles \ \ \ \ name.txt del dir”) para cada uno objFile en strLatestTimestamp del colFiles
= el objEmail del

Set de objFile.LastModified

del
ProcessScript del curriculum vitae del error = del

On de CreateObject (“CDO.Message " ) si strOriginalTimestamp de Then
del strOriginalTimestamp del <> del strLatestTimestamp = strLatestTimeStamp
Else
objEmail.Subject = “tema.”
objEmail.From = “from.com”
objEmail.To = “name.com”

objEmail.Configuration.Fields de objEmail.TextBody = del cuerpo”). Artículo (“rel= " nofollow " del _blank” del” target=” de http://schemas.microsoft.com/cdo/configuration/sendusing del href= " del .com/cdo/configuration/sendusing") = 2
objEmail.Configuration.Fields. Artículo (“
objEmail.Configuration.Fields del nombre” del” rel= " del _blank “del” target=” de http://schemas.microsoft.com/cdo/configuration/smtpserver del href= " del .com/cdo/configuration/smtpserver") =. Artículo (“rel= " nofollow " del _blank” del” target=” de http://schemas.microsoft.com/cdo/configuration/smtpserverport del href= " del .com/cdo/configuration/smtpserverport") = 25
objEmail.Configuration.Fields. Update
    extremo de objEmail.Send
si
Loop
class= del

Respuesta : notificación

Si usted lo programa para comenzar al principio de cada día, éste saldrá el lazo en 5pm, y le envía el email.  He realizado uces par de otros cambios de menor importancia.

No tengo gusto de la “espera para una hora” que se incorpore a la escritura ...... que ésta podría significar que usted no consigue la notificación final hasta 6pm, así que he cambiado el sueño a solamente un minuto, pero la escritura comprobará solamente para saber si hay el cambio de la fecha del archivo cuando el valor minucioso del tiempo actual es 00, que es en la hora.

Para explicar el tiempo que puede ser que lleve para que el archivo sea comprobado, he hecho el 5:05 del tiempo del final: 00 P.M.

Así pues, en fin, esto funcionará todo el dia hasta 5:05: 00 P.M., comprobando el archivo fechan cada hora.  Porque comprueba la fecha del archivo en la hora, usted debe comenzar la tarea programada en el 9:01: 00 cada mañana.

Respetos,

Robo.
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
26:
27:
28:
29:
30:
31:
32:
33:
34:
35:
36:
37:
38:
39:
40:
41:
42:
43:
44:
45:
46:
47:
48:
49:
50:
51:
52:
53:
54:
55:
56:
57:
58:
59:
60:
61:
62:
63:
64:
65:
66:
67:
68:
69:
70:
71:
72:
strComputer = “.”
strFile = “C:\program files\dir\name.txt”
dteEndTime = “5: 05: 00 P.M.”

Fijar el objWMIService = GetObject (“winmgmts: \ \” y strComputer y “\ raíz \ cimv2”)

Fijar los colFiles = el _ de objWMIService.ExecQuery
    (“Seleccionar * de CIM_Datafile donde nombre = “” y substituir (strFile, “\”, “\ \ ") y “” ")

Para cada uno objFile en colFiles
    strOriginalTimestamp = objFile.LastModified
Después

el strSubject = “escritura de la supervisión comenzó”
strFrom = “from.com”
strTo = “name.com”
strBody = “la escritura de la supervisión ha comenzado en” y ahora
strServer = “nombre”
strSubject de SendEmail, strFrom, strTo, strBody, strServer

Hacer mientras que CDate (tiempo)  < CDate="">
           
Otras soluciones  
 
programming4us programming4us