//SINCRONIZA HORARIO COM A HORA DO SERVIDOR
PathFile is string = fCurrentDir ( fCurrentDrive() ) +"\config.ini"
IF CBOX_Sincronizar..Value = True THEN Sincronizar = "S" ok is boolean = INIWrite("Nagyro", "Sincronizar", Sincronizar , PathFile) IF ErrorOccurred = True AND Sincronizar = "" THEN Error() END ELSE Sincronizar = "N" ok is boolean = INIWrite("Nagyro", "Sincronizar", Sincronizar , PathFile) IF ErrorOccurred = True AND Sincronizar = "" THEN Error() END END
IF Sincronizar = "S" THEN ExeRun("NET TIME \\192.168.1.180 /SET /YES",exeIconize,exeDontWait) END |