ReSQL.ru
     
powered by simpleCommunicator - 2.0.59     © 2025 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Windows [игнор отключен] [закрыт для гостей] / Скрипт для определения даты установки системы Windows 2000
8 сообщений из 8, страница 1 из 1
Скрипт для определения даты установки системы Windows 2000
    #32104238
Фотография jimmers
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
jimmers
Участник
"Переодевал" сегодня машину и стало интересно, когда же я это делал в прошлый раз. На просторах Интернета нашел информацию о том, как это узнать через реестр. Ниже приведен простой скрипт, который выводит эту информацию - может кому пригодится.

Удачи

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
' Simple script for retrieving system install date
' Run: cscript /nologo sys_install_date.vbs
' Martin Rakhmanoff, 11:18 PM 2/10/2003
' jimmers@yandex.ru

Option Explicit
On Error Resume Next

Dim objShell, InstallDate

Set objShell = CreateObject( "WScript.Shell" )
InstallDate = objShell.RegRead( "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\InstallDate" )
Set objShell = Nothing

If NOT IsEmpty(InstallDate) Then
  InstallDate = DateAdd( "s" , CLng(InstallDate),  "1970 - 01 - 01   00 : 00 ")
Else
  InstallDate =  "unknown, (Error: "  & Err.Description &  ")" 
End If

WScript.Echo( "Install date: "  & InstallDate)
...
Рейтинг: 0 / 0
10.02.2003, 23:25
| Ответить | Цитировать | Написать  
Скрипт для определения даты установки системы Windows 2000
    #32104313
Фотография AndreK
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
AndreK
Участник
Скорее всего я чего-то не понимаю, но дата создания каталога Winnt - однозначно дата последней установки. Или я не прав?
...
Рейтинг: 0 / 0
11.02.2003, 09:25
| Ответить | Цитировать | Написать  
Скрипт для определения даты установки системы Windows 2000
    #32104394
Фотография jimmers
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
jimmers
Участник
В общем случае нет. К примеру, сервис пак мог что-нибудь поменять.
...
Рейтинг: 0 / 0
11.02.2003, 11:16
| Ответить | Цитировать | Написать  
Период между сообщениями больше года.
Скрипт для определения даты установки системы Windows 2000
    #38556787
Фотография jimmers
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
jimmers
Участник
Прошло 11 лет, появились 64-х битные системы, скрипт пришлось обновить...


Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
Option Explicit

Dim objShell, InstallDate

Set objShell = CreateObject("WScript.Shell")

InstallDate = objShell.RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\InstallDate")

Set objShell = Nothing

If NOT IsEmpty(InstallDate) And InstallDate > 0 Then

  InstallDate = DateAdd("s", CLng(InstallDate), "1970-01-01 00:00")

Else

  InstallDate = "Unknown"

End If

WScript.Echo("Install date: " & InstallDate)



Запуск:

Код: powershell
1.
cscript.exe InstallDate.vbs



Результат (пример):

Код: powershell
1.
2.
3.
4.
Microsoft (R) Windows Script Host Version 5.8
Copyright (C) Microsoft Corporation. All rights reserved.

Install date: 7/22/2013 2:31:12 PM
...
Рейтинг: 0 / 0
11.02.2014, 11:22
| Ответить | Цитировать | Написать  
Скрипт для определения даты установки системы Windows 2000
    #38556955
Фотография k-nike
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
k-nike
Участник
Я обычно systeminfo в командной строке использую.
...
Рейтинг: 0 / 0
11.02.2014, 13:02
| Ответить | Цитировать | Написать  
Скрипт для определения даты установки системы Windows 2000
    #38556983
miksoft
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
miksoft
Участник
k-nike,

Дата создания каталога C:\WINNT чем не годится?

У меня 17 октября 2005 г., 17:06:22
...
Рейтинг: 0 / 0
11.02.2014, 13:13
| Ответить | Цитировать | Написать  
Скрипт для определения даты установки системы Windows 2000
    #38556993
Фотография k-nike
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
k-nike
Участник
miksoftДата создания каталога C:\WINNT чем не годится?

Не знаю, не пробовал. К тому же выше отписывались по этому поводу.
Да и вообще я так понимаю лажа все эти методы. Время при начальной установке могло неправильно быть задано.
...
Рейтинг: 0 / 0
11.02.2014, 13:17
| Ответить | Цитировать | Написать  
Скрипт для определения даты установки системы Windows 2000
    #38639265
Фотография jimmers
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
jimmers
Участник
k-nikemiksoftДата создания каталога C:\WINNT чем не годится?

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

Могло. В таком случае определить дату корректно невозможно в принципе.
...
Рейтинг: 0 / 0
12.05.2014, 23:14
| Ответить | Цитировать | Написать  
8 сообщений из 8, страница 1 из 1
Форумы / Windows [игнор отключен] [закрыт для гостей] / Скрипт для определения даты установки системы Windows 2000
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]