Булат12 Б Булат12 Регистрация 1 Авг 2013 Сообщения 90 Репутация 0 Спасибо 0 Монет 0 24 Июл 2016 #1 Нужен скрипт, что бы переводил время на 2 минуты в перед
SESUPER S SESUPER Регистрация 3 Июл 2013 Сообщения 87 Репутация 0 Спасибо 0 Монет 0 24 Июл 2016 #2 Чтобы яваскрипт переводил системное время? Это фантастика. Эдак сайт любого Васи сможет отправить тебя в 17-й век. P.S. Конечно, я знаю про 1 января 1970-го, про 17-й век — образное выражение. Позитивный голос 0
Чтобы яваскрипт переводил системное время? Это фантастика. Эдак сайт любого Васи сможет отправить тебя в 17-й век. P.S. Конечно, я знаю про 1 января 1970-го, про 17-й век — образное выражение.
dismalik D dismalik Регистрация 24 Дек 2013 Сообщения 79 Репутация 4 Спасибо 0 Монет 0 24 Июл 2016 #3 Dim msg getTime = time newtime = DateAdd("n", 2, getTime) MsgBox ("Системное время ="& getTime & vbcr & "Новое время = "& newtime) msg = MsgBox ("Изменить время?", 65, "Новое время") Select Case msg Case 1 Set WshShell = WScript.CreateObject("WScript.Shell") WshShell.Run "cmd.exe /c Time " & newtime, 0, true End Select Позитивный голос 0
Dim msg getTime = time newtime = DateAdd("n", 2, getTime) MsgBox ("Системное время ="& getTime & vbcr & "Новое время = "& newtime) msg = MsgBox ("Изменить время?", 65, "Новое время") Select Case msg Case 1 Set WshShell = WScript.CreateObject("WScript.Shell") WshShell.Run "cmd.exe /c Time " & newtime, 0, true End Select