Речь в этой статье пойдет, разумеется, не об испорченных сроком программах, а о ситуации, с которой многие сталкивались, а именно: программа рассчитана на определенное время работы в операционной системе Windows, после чего она перестает запускаться либо у неё отключаются определенные функции. Если проблема решается простым переводом времени на некоторое количество дней назад, то процесс этот можно упростить - автоматизировать.

У моего коллеги дома да и на работе имеется YarMap который по умолчанию нормально работает три месяца с даты установки очередного релиза, после чего его надо обновлять, иначе на карте города отключается поиск. У него эта проблема всегда возникала неожиданно и  первое время она даже меняел дату системы и опять запускал Yarmap  (или скачивал и устанавливал обновление, что лично я рекомендую). Иногда случалось, что он забывал установить дату обратно на текущее время в связи с чем возникали определенные неудобства. В конце концов, последняя капля упала в чашу его терпения…. Он взял и написал специальный скрипт  (для этого нужно создать в блокноте текстовый файл и сохранить его с расширением vbs)… 

Далее представлен исходный код файла YarMap.vbs:

Код:

Set WshShell = CreateObject («WScript.Shell») '1
asd = date '2 запоминаем текущую дату
Set WshExec = WshShell.Exec («cmd.exe /C» + « date 01.01.2001») '3 устанавливаем далекое прошлое
Set WshExec = WshShell.Exec («C:\Program Files\Yarmap\Yarmap.exe») '4 запускаем yarmap (путь где лежит ярмап у
' вас может быть другим)
WScript.Sleep 1000′5 ждем 1 секунду
WshShell.AppActivate (WshExec.ProcessID) '6 делаем yarmap активным окном
WshShell.SendKeys «+^» '7 нажимаем левый ctrl+alt переходим на русский язык
' (у кого то может быть сразу русский
' тогда строчку лучше удалить)
Set WshExec = WshShell.Exec («cmd.exe /C»+" date " + FormatDateTime (asd)) '8 возвращает текущую дату

P.S. В файле также прописано автоматическое переключение клавиатуры в русскую раскладку
P.P.S. Кнопка добавить файл не работает в IE 6.0.

Add comment


Security code
Refresh