|
8.1: узнать время на сервере | ☑ | ||
---|---|---|---|---|
0
Dmitriy_
Kolesnikov 18.04.12
✎
20:34
|
Здравствуйте!
Есть платформа 8.1.15.14, переход на 8.2 невозможен, УТ 10.3. Как узнать серверное время? Менеждеры, редиски, повадились переводить время на компах назад и менять статусы заказов задним числом... |
|||
1
Живой Ископаемый
18.04.12
✎
20:47
|
менеджерам премию, админов и программеров наказать....
ах, да.... нанять еще специального человека, который будет узнавать время на сервере. |
|||
2
Dmitriy_
Kolesnikov 18.04.12
✎
20:50
|
Как распорядитесь. Завтра будет сделано.
А вопрос в силе. |
|||
3
Живой Ископаемый
18.04.12
✎
20:52
|
в вопросе нет важной информации, без которой на него не ответить.
|
|||
4
BigShmax
18.04.12
✎
20:55
|
(0) сервер есть домена нет?
|
|||
5
aleks-id
18.04.12
✎
21:03
|
отнять у менеджеров права установки времени еще не предлагали?
|
|||
6
mikeA
18.04.12
✎
21:16
|
(0)
ИмяКомпьютера= "<ИмяСервера>"; ScrptCtrl= Новый COMОбъект("MSScriptControl.ScriptControl"); ScrptCtrl.Language="vbscript"; ScrptCtrl.AddCode(" |Function GetTime() |Set objWMIService = GetObject(""winmgmts:\\" + ИмяКомпьютера + "\root\cimv2"") |Set colItems = objWMIService.ExecQuery(""Select * From Win32_LocalTime"") |For Each objItem in colItems | strTime = objItem.Year & ""."" & objItem.Month & ""."" & objItem.Day & "" "" & objItem.Hour & "":"" & objItem.Minute & "":"" & objItem.Second |Next |GetTime= strTime |End Function |"); ДатаВремяКомпьютераСтрокой= ScrptCtrl.Run("GetTime")); |
|||
7
mikeA
18.04.12
✎
21:21
|
(6)+ в последней строке последняя скобка лишняя
и это на 8.2, на 8.1 хз как там COM объекты создавались, наверное примерно так же |
|||
8
Живой Ископаемый
18.04.12
✎
21:23
|
2(7) а как ты понял что база у него файловая?
|
|||
9
mikeA
18.04.12
✎
21:27
|
(8) когда есть сервер, достаточно на нём вызвать ТекущаяДата() и вернуть на клиента )))
|
|||
10
Живой Ископаемый
18.04.12
✎
21:33
|
хм... тоже верно
|
|||
11
acsent
18.04.12
✎
21:46
|
вроде дата запрета никак не ориентируется на время компа
|
|||
12
Лефмихалыч
18.04.12
✎
22:36
|
(0) рецепт прост, как мычание: журнал регистрации, служебка на директора с доказульками, объяснительные (план Б - репресии)
автоматизация не нужна |
|||
13
zak555
18.04.12
✎
22:43
|
> переход на 8.2 невозможен
почему ? |
|||
14
Лефмихалыч
18.04.12
✎
22:44
|
(13) возвижу - это филиал, а головная компания ни чего менять не желает
|
|||
15
Dmitriy_
Kolesnikov 19.04.12
✎
13:54
|
(6) благодарю.
А как в vbscript авторизоваться на сервере? Патамушта === Ошибка при вызове метода контекста (Run): Произошла исключительная ситуация (Ошибка выполнения Microsoft VBScript): Разрешение отклонено: 'GetObject' === Насколько я понимаю, причина в том, что гостям нельзя исполнять скрипты на сервере. |
|||
16
Maxus43
19.04.12
✎
13:56
|
может легче запрос через инет на время по атомным часам сделать?
|
|||
17
Dmitriy_
Kolesnikov 19.04.12
✎
14:19
|
(16) интересная мысль, поищу реализации. Возможно, в одной из системных библиотек есть функция запроса времени на time.windows.com.
|
Форум | Правила | Описание | Объявления | Секции | Поиск | Книга знаний | Вики-миста |