Página 1 de 1

Problema basico de hora

Publicado: 22 Nov 2016, 02:26
por chriszga
Hola estimados, nesecito vuestra ayuda, el problema es el siguiente:

requiero escribir en un programa la hora 10 minutos antes de la actual seria la variable $ssFile, la cual solo le reste 10 a los minutos de la hora actual ($aFile[4]-10).
El problema es que cuando los minutos estan en 21:07:00 el valor que me escribe en minutos es un valor negativo obviamente.. lo cual necesito que se reste a la hora completa es decir que me muestre las 20:57:00. Ojala me puedan ayudar :c

El codigo es el siguiente:

Código: Seleccionar todo

#include <GUIConstantsEx.au3>
#include <Date.au3>
#include <WindowsConstants.au3>
#include <TrayConstants.au3>
#include <Constants.au3>

Local $tFile, $aFile, $sFile, $ssFile


	$tFile = _Date_Time_EncodeFileTime(@MON, @MDAY, @YEAR, @HOUR, @MIN, @SEC)
	$aFile = _Date_Time_FileTimeToArray($tFile)
        $sFile = StringFormat("%02d:%02d:%02d", $aFile[3], $aFile[4], $aFile[5]);Hora actual
	$ssFile = StringFormat("%02d:%02d:%02d", $aFile[3], $aFile[4]-10, $aFile[5]);*Hora 10 minutos antes*

        Send($ssFile)
Saludos.

Re: Problema basico de hora

Publicado: 22 Nov 2016, 20:56
por Chefito
Mira en la ayuda la udf Date, la función _DateAdd. Te dejo un ejemplo:

Código: Seleccionar todo

#include <Date.au3>
#include <MsgBoxConstants.au3>

; hora actual menos 10 minutos
$sNewDate = _DateAdd('n', -10, _NowCalc())
$fechaHora = StringSplit($sNewDate, " ", 2)
MsgBox($MB_SYSTEMMODAL, "Fecha y hora actual: " & _Now(), "Hora actual menos 10 minutos: " & $sNewDate & @CRLF & "Solamente la fecha: " & $fechaHora[0] & @CRLF & "Solamente la hora: " & $fechaHora[1])
Saludos.

Re: Problema basico de hora

Publicado: 28 Nov 2016, 15:58
por chriszga
Muchas gracias chefito
justo lo que necesitaba!

Saludos