Как из VB (Vbscript) изменить системную дату?

06.01.2010, 10:23. **Показов** 4192. **Ответов** 3

Author24 — интернет-сервис помощи студентам

Пытаюсь это сделать вот так:

Visual Basic

1 2	Set WshShell = WScript.CreateObject('WScript.Shell') command = 'command.com /k date 01-01-2001'

Но получается коряво, не знаю как закрывать открывающееся при этом окно command.com....
Может что подскажет решение по-лучше?

@Labuda · 06.01.2010, 14:29

Выдержка из хелпа:
Dim MyDate
MyDate = #February 12, 1985# ' Assign a date.
Date = MyDate ' Change system date.

07.01.2010, 13:53

Не... В VBscript так не работает. Это в VB так можно сделать. В скрипте DATE только возвращает системную дату. Но не устанавливает.

@t-80 · 07.01.2010, 14:27

А еще в VB я делал так:

Visual Basic

1	Call Shell(App.Path & 'SomeName.com', vbMinimizedNoFocus)

Консольное Окно сразу сворачиволось в TaskBar и закрывалось после завершения работы, есть и др. параметры, кроме vbMinimizedNoFocus, по-моему можно запустить, что и в TB не будет видно, поищи в MSDN.

@Labuda 0 / 0 / 0 Регистрация: 21.05.2009 Сообщений: 101
	06.01.2010, 14:29	2
	Выдержка из хелпа: Dim MyDate MyDate = #February 12, 1985# ' Assign a date. Date = MyDate ' Change system date. 0

al12
	07.01.2010, 13:53	3
	Не... В VBscript так не работает. Это в VB так можно сделать. В скрипте DATE только возвращает системную дату. Но не устанавливает.

	07.01.2010, 14:27

Опции темы