El asistente del botón del teléfono móvil ha escrito un script y quiere que este script se ejecute automáticamente a las 8 en punto todos los días. ¿Alguien puede darme alguna orientación?
En primer lugar, el efecto que desea no es que el script se ejecute automáticamente a las 8 en punto todos los días, sino que el script siempre esté ejecutándose y solo comience a funcionar de manera efectiva a las 8 en punto. reloj todos los días y siempre está funcionando en otros momentos de "espera".
Si estás de acuerdo con lo que dije anteriormente, entonces continúa leyendo.
Hay dos formas de resolver este problema:
La primera: primero calcule el tiempo de ejecución efectivo de su script, como 1 hora, luego el tiempo restante en "estado de espera". Son 23 horas. En otras palabras, después de ejecutar el script una vez, debe esperar 23 horas. El comando para esperar el tiempo en el asistente de botones tiene un retraso, pero es necesario convertirlo porque su unidad es milisegundos. Tienes que igualar 23 horas. Para calcular el número de milisegundos, se recomienda utilizar una calculadora para calcularlo.
Una desventaja de este método es que debes realizar la primera operación a las 8 en punto. Completa un ciclo de ejecución en 24 horas y en realidad no se realizará a las 8 en punto, sino a una hora determinada. hora todos los días. Se ejecuta a una hora fija, este punto de tiempo depende de la hora de inicio de su primera ejecución.
El segundo método:
El principio es obtener la hora actual del sistema y luego determinar si la hora obtenida son las 8 en punto. Si son las 8 en punto, comience. ejecutando el script efectivo. Si no son las 8 en punto, vuelva a adquirir la hora del sistema y juzgue nuevamente. Este proceso se repite hasta las 8 en punto.
La desventaja es que el guión es agotador para emitir juicios todo el tiempo, pero la ventaja es que puede emitir juicios precisos.
El código es el siguiente:
Do
Dim t
t = Now()
TracePrint t
Dim r
r = UTF8.Right(t, 13)
TracePrint r
Dim l
l = UTF8.Left(r, 5)
TracePrint l
Si l = "08:00" ¿Entonces?
TracePrint "Depuración exitosa, use su script para reemplazar esta línea"
Salir Do
Elseif l = "08:01" ¿Entonces?
TracePrint "La depuración fue exitosa, reemplace esta línea con su script "
Salir Do
Else
TracePrint "Error de depuración"
Finalizar si
Retraso 60000
p>Bucle
Explica un poco.
Para facilitar la visualización, no he fusionado las variables.
Porque el El significado en inglés de 7 "semanas" es La longitud de la escritura es diferente, por lo que la duración de la fecha también es diferente. Entonces, en términos del método para obtener las 8 en punto, elegí mirar de atrás hacia adelante.
Para evitar que el script no pueda ejecutarse de manera efectiva debido a un retraso y faltar las 8 en punto durante el juicio, se agregó un juicio de que el script se puede ejecutar incluso a las 8:01. Por supuesto, esto significa que el guión no comenzó a las 8 en punto. Si comenzara, no continuaría juzgando a las 8:01.
Si tienes alguna duda, puedes preguntar, o seguir mi cuenta oficial: 3 Minutes School.
Probé este código en mi computadora y adjunté una captura de pantalla de mi operación: