No funciona bien el script para crear puntos de restauración automáticos.

Buenas tardes:
Antes de formatear mi PC, siempre la primera vez que prendia la máquina en
el día, no importando si me quedé hasta la madrugada la noche anterior
(digamos si me quedé trabajando hasta las 2am del Lunes y vuelvo a prender
la PC a las 7am del mismo día lunes), siempre me creaba el punto de
restauración correspondiente al día.

Ahora ha dejado de hacer esto. Es más, uno lo creo a las 6:02pm ignoro por
que.

El script es el siguiente

CreateRP.VBS

' Creates a SR point during the first startup of the day
' December 18, 2005
' For Windows® XP
' © 2005 Ramesh Srinivasan
' Website: http://windowsxp.mvps.org

Option Explicit
Dim SRP, CSRP, objWMI, clsPoint
Dim RPDate, D1, D2, dtmInstallDate, DMatch
DMatch = 0
Set SRP = getobject("winmgmts:\\.\root\default:Systemrestore ")
Set dtmInstallDate = CreateObject("WbemScripting.SWbemDateTime")
Set objWMI = getobject( _
"winmgmts:\\.\root\default").InstancesOf ("systemrestore")
For Each clsPoint In objWMI
RPDate = getmytime(clsPoint.creationtime)
D1 = Month(RPDate) & "/" & Day(RPDate) & "/" & Year(RPDate)
D2 = Month(Date) & "/" & Day(Date) & "/" & Year(Date)
If D1 = D2 Then DMatch = 1
Next

Function getmytime(wmitime)
dtmInstallDate.Value = wmitime
getmytime = dtmInstallDate.GetVarDate
end Function

If DMatch = 0 Then
CSRP = SRP.createrestorepoint ("Punto de restauración diario", 0, 100)
End If



Lo he ubicado de la siguiente forma:

Inicio - Ejecutar - gpedit.msc

Ahi voy a Directiva Equipo local - Configuración de usuario - Configuración
de Windows - Secuencia de comandos (inicio de sesión/cierre de sesión)

En Inicio he cargado el archivo CreateRP.VBS

Pero hoy por ejemplo...... me quedé trabajando hasta la 1pm de hoy Sábado,
apagué la PC y la volví a prender a las 6:45am y no me ha creado el punto de
restauración diario que siempre creaba antes.

¿Alguien me puede decir que estoy haciendo mal y como solucionarlo?

Muchas gracias por el apoyo que me brinden
Un saludo desde Lima, Perú
ACD