Pergunta : notificação

Como posso eu incorporar uma notificação do email quando os certificados são retrocedidos fora e parados. Presentemente, emite um email quando a lima não mudou o status (atualizado). Gostaria de manter esta caraterística e de adicionar notificações sempre que começa e para. Seus começo/batente programados através do planificador de tarefa, mas podem os tempos do começo e de batente ser definidos no certificado também? Agradecimentos adiantado.

strComputer = “. do “objWMIService

Set = GetObject (“winmgmts: \ \” & o strComputer & “\ raiz \ cimv2”) colFiles do

Set =

For cada um do _
de objWMIService.ExecQuery (“selecionar * de CIM_Datafile onde nome = 'C:\ \ programfiles \ \ \ do dir \ name.txt”) objFile no strOriginalTimestamp do colFiles
= no objFile.LastModified
Next

Wscript.Echo “começaram: ” & Now

Do quando colFiles de True
Wscript.Sleep 3600000
=

do _
de objWMIService.ExecQuery (“selecionar * de CIM_Datafile onde nome = 'C:\ \ programfiles \ \ \ do dir \ name.txt”) para cada um objFile no strLatestTimestamp do colFiles
= no objEmail do

Set de objFile.LastModified

do
ProcessScript do resumo do erro = no

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

objEmail.Configuration.Fields de objEmail.TextBody = de corpo”). Artigo (do “rel= " nofollow "” do _blank” do” target= " de http://schemas.microsoft.com/cdo/configuration/sendusing do href= .com/cdo/configuration/sendusing") = 2
objEmail.Configuration.Fields. Artigo (do “
objEmail.Configuration.Fields “do nome” do” rel= "” do _blank do” target= " de http://schemas.microsoft.com/cdo/configuration/smtpserver do href= .com/cdo/configuration/smtpserver") =. Artigo (do “rel= " nofollow "” do _blank” do” target= " de http://schemas.microsoft.com/cdo/configuration/smtpserverport do href= .com/cdo/configuration/smtpserverport") = 25
objEmail.Configuration.Fields. Update
    extremidade de objEmail.Send
se
Loop class= do

Resposta : notificação

Se você o programa para começar no início de cada dia, este retirará o laço em 5pm, e emite-lhe o email.  Eu fiz um par outras mudanças menores.

Eu não gosto da “espera para uma hora” que é construído no certificado ...... que este poderia significar que você não começ a notificação final até 6pm, assim que eu mudei o sono a somente um minuto, mas o certificado verific somente para ver se há a mudança da data da lima quando o valor minucioso do tempo atual é 00, que se realiza na hora.

Para esclarecer o tempo onde pôde tomar para que a lima seja verific, eu fiz o 5:05 do tempo do fim: 00 PM.

Assim, no short, isto funcionará o dia inteiro até o 5:05: 00 PM, verific a lima datam cada hora.  Porque verific a data da lima na hora, você deve começar a tarefa programada no 9:01: 00 AM cada manhã.

Considerações,

Roubo.
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 PM”

Ajustar o objWMIService = o GetObject (“winmgmts: \ \” & strComputer & “\ raiz \ cimv2”)

Ajustar colFiles = _ de objWMIService.ExecQuery
    (“Selecionar * de CIM_Datafile onde nome = “” & substituir (strFile, “\”, “\ \ ") & “” ")

Para cada um objFile nos colFiles
    strOriginalTimestamp = objFile.LastModified
Em seguida

o strSubject = da “certificado monitoração começou”
strFrom = “from.com”
strTo = “name.com”
strBody = “o certificado da monitoração começou em” & agora
strServer = “nome”
strSubject de SendEmail, strFrom, strTo, strBody, strServer

Fazer quando CDate (tempo)  < CDate="">
Outras soluções  
 
programming4us programming4us