Su dirección de correo electrónico no será publicada. Los campos obligatorios están marcados *
He hecho todo de acuerdo con las instrucciones, pero cuando se inicia la tarea, aparece un cuadro de diálogo que me pide que elija entre aplicaciones y me dice cómo desea abrir este archivo. ¿Qué debo usar para ejecutarlo?
Estoy tratando de hacer uso de esta publicación y el comentario publicado sobre los minutos que se agregan también. Descubrí que era una gran idea, pero preferiría modificar de alguna manera el código para leer más que "la Hora" como lo había hecho la otra persona. Intentando combinar los 2 códigos 'para que pueda hablar cada media hora y CORRECTAMENTE ya que encontré eso a pesar de usando el código original, se aferró a la "hora programada para comenzar @" en el Programador por alguna razón. Estoy enviando una copia del Código que estoy tratando de usar para lograr esta hazaña con la esperanza de una retroalimentación experimentada sobre cómo debería ser para que le dé al Spoken cada 30 minutos y con precisión ...
Dim habla, habla
currHour = hora (tiempo)
currMinute = minuto (tiempo)
Si currHour = 0 entonces
mHour = 12
meridiano = "A, M"
De lo contrario, si currHour> 12 entonces
mHour = currHour - 12
meridiano = "P, M"
más
mHour = currHour
meridiano = "A, M"
Terminara si
onesMin = currMinute Mod 10
tensMin = currMinute - onesMin
si tensMin = 0 y onesMin = 0 entonces
tensMin = 60
onesMin = 0
elseif tensMin = 10 entonces
tensMin = currMinute
onesMin = 0
terminara si
sHour = getNumberToSay (mHour)
sTens = getNumberToSay (tensMin)
sOnes = getNumberToSay (onesMin)
habla = "Ahora es" & sHour & ":" & sTens & "" & sOnes & ":" & meridian
Establecer discurso = CreateObject ("sapi.spvoice")
habla. Hablar habla
Por tu consideración;
Uso un truco similar, pero lo uso como el temporizador de pomodoro de un hombre pobre. Así que creo la tarea programada, pero la configuro en 20 minutos, luego desde la línea cmd puedo llamar "SCHTASKS / Run / TN" My Timer "" (que yo tener en un archivo por lotes, en mi ruta, llamado t.bat, por lo que realmente solo necesito escribir t) y forzar mi tarea a ejecutarse, y cuenta cada 20.
Nota: algunas de las rarezas con las cadenas se basan en obtener una pronunciación clara de SpVoice.
currHour = hora (tiempo)
currMinute = minuto (tiempo)
Si currHour = 0 entonces
mHour = 12
meridiano = "A, M"
De lo contrario, si currHour> 12 entonces
mHour = currHour - 12
meridiano = "P, M"
más
mHour = currHour
meridiano = "A, M"
Terminara si
onesMin = currMinute Mod 10
tensMin = currMinute - onesMin
si tensMin = 0 y onesMin = 0 entonces
tensMin = 60
onesMin = 0
elseif tensMin = 10 entonces
tensMin = currMinute
onesMin = 0
terminara si
sHour = getNumberToSay (mHour)
sTens = getNumberToSay (tensMin)
if onesMin 0 entonces
sOnes = getNumberToSay (onesMin)
terminara si
palabras = "El tiempo es ahora" & sHour & ":" & sTens & "" & sOnes & ":" & meridian
Establecer discurso = CreateObject ("sapi.spvoice")
habla. Hablar palabras
Función getNumberToSay (Number)
Seleccionar número de caso
Caso "0":
getNumberToSay = "O"
Caso 1":
getNumberToSay = "one"
Caso "2":
getNumberToSay = "dos"
Caso "3":
getNumberToSay = "tres"
Caso "4":
getNumberToSay = "cuatro"
Caso "5":
getNumberToSay = "cinco"
Caso "6":
getNumberToSay = "seis"
Caso "7":
getNumberToSay = "seven"
Caso "8":
getNumberToSay = "ocho"
Caso "9":
getNumberToSay = "nueve"
Caso "10":
getNumberToSay = "diez"
Caso "11":
getNumberToSay = "once"
Caso "12":
getNumberToSay = "doce"
Caso "13":
getNumberToSay = "thir teen"
Caso "14":
getNumberToSay = "cuatro adolescentes"
Caso "15":
getNumberToSay = "quince adolescentes"
Caso "16":
getNumberToSay = "seis adolescentes"
Caso "17":
getNumberToSay = "siete adolescentes"
Caso "18":
getNumberToSay = "ocho adolescentes"
Caso "19":
getNumberToSay = "nueve adolescentes"
Caso "20":
getNumberToSay = "veinte"
Caso "30":
getNumberToSay = "treinta"
Caso "40":
getNumberToSay = "cuarenta"
Caso "50":
getNumberToSay = "cincuenta"
Caso "60":
getNumberToSay = "Oh reloj"
Caso "":
WScript.quit
Seleccionar final
Función final
No estoy seguro de que esté siguiendo todo su código, pero solo para el registro: no hay un horario como "12 am" o "12 pm". Solo hay "12 del mediodía" y "12 de la medianoche". Si es un minuto antes o después de las 12, entonces "am" o "pm" es apropiado. Pero cuando son las 12 en punto, tiene que ser "12 del mediodía" o "12 de la medianoche", no "12 am" o "12 pm".
Como digo, no estoy seguro de que eso cambie su código en absoluto, solo lo estoy mencionando.
De todos modos, ¡gracias por el ingenioso código!
Mi primer intento en el programador de tareas también.
Creo que esto será de gran ayuda, cuando funcione.
Haga doble clic en el archivo en el Explorador, se ejecuta
He configurado la tarea, parece que se ejecuta a tiempo, PERO no se ejecuta. Me aparece el mensaje "¿Cómo desea abrir este archivo".
¿He configurado algo mal?
No pude encontrar una opción para editarlo. Todo lo que pude hacer fue eliminar y recrear (todavía no funcionó).