Воскресенье, 24.06.2018, 04:14
Поиск
Никнэйм
Сертификат на никнейм Olelucoye, зарегистрирован на Тимофеев Константин Михайлович
Зарегистрируй свой никнейм
Обратная связь
olelucoye.tk@yandex.ru
Реклама AdSense
Реклама
Друзья сайта
  • Лига медицинского права
  • Гостиница "Зай"
  • FAQ по системе
  • Инструкции для uCoz
  • Главная » Статьи » Скрипты в блокноте

    Автоматическое выключение компьютера (вариант 2)

    Продолжаем тему выключения компьютера автоматически.

    Бывает нужно выключить компьютер не через какое-то время, а в конкретные час и минуты. Для этого пишем в блокноте следующий скрипт.

    Dim v, h, m, c ' объявляем переменные
    Set c = WScript.CreateObject("WScript.Shell") 'создаем объект
    v=inputbox ("Введите время когда нужно выключить компьютер?","Время")
    'Время вводим в формате десятичной дроби
    if IsNumeric(v) then 'Проверяем числовое ли значение введено
    If v>0 Then 'Проверяем больше ли нуля введенное значение
    h = int(v) 'Получаем часы
    m=Round((v-h)*100, 0) 'Получаем минуты
    msgbox "В "& h & " час " & m & " мин. компьютер будет отключен",0,"" 'Выводим сообщение
    Do While 1 'Создаем бесконечный цикл
    if (Hour(Time) = h and Minute(Time) = m) Then exit do 'Если текущее время совпадает с введенным, выходим из цикла
    WScript.sleep 20000 'Пауза 20 секунд
    Loop
    c.run("shutdown.exe -s -t 2") ' Запускаем shutdown.exe
    else msgbox "меньше 1 мин" , 0 , "Ошибка" 'Выводим сообщение об ошибке
    End If
    else msgbox "Введена не цифра", 0, "Ошибка" 'Выводим сообщение об ошибке
    end if
    set c = nothing 'уничтожаем объект

    Время вводим как десятичную дробь. Например, 20,35 - это 20 часов 35 минут.

    Нужно иметь ввиду, что окно с сообщением является модальным. Это означает, что пока оно открыто, программа не продолжит выполнение. Так что не забываем нажимать кнопку ОК. Либо строку с информационным сообщением можно удалить.

    Ну и сам файлик

    Категория: Скрипты в блокноте | Добавил: Olelucoye (24.10.2013)
    Просмотров: 441
    | Теги: выключение компьютера, Скрипт, блокнот, vbscript | Рейтинг: 0.0/0
    Всего комментариев: 0
    Добавлять комментарии могут только зарегистрированные пользователи.
    [ Регистрация | Вход ]
    Меню сайта
    Категории раздела
    Андроид разработка [23]
    libGDX [24]
    Мои андроид проекты [6]
    Excel [7]
    Железяки [5]
    Скрипты в блокноте [4]
    Разное [1]
    Форма входа
    Статистика

    Онлайн всего: 1
    Гостей: 1
    Пользователей: 0
    Яндекс Метрика
    Яндекс.Метрика