Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 09.11.2013, 23:08   #1
Sle7vin
Новичок
Джуниор
 
Регистрация: 09.11.2013
Сообщений: 1
По умолчанию VBS Помогите

2 строка 1 символ Синтаксическая ощибка
Код:
csrComputer = "."
set objWMI = GetObject("winmgmts:\\" &strComputer & "\root\cimv2")
set colOS = objWMI.InstancesOf("Win32_OperatingSystem")
for each objOS in colOS
bd = objOS.LastBootUpTime
bd1 = Mid(bd,1,4) & "-" & Mid(bd,5,2) & "-" & Mid(bd,7,2) & " " & Mid(bd,9,2) & ":" & Mid(bd,11,2) & ":" & Mid(bd,13,2)
s = abs(datediff("s",bd1,now))
m = s \ 60
h = m \ 60
m = m mod 60
s = s mod 60

Wscript.Echo "Время работы системы:" & right("00" & h, 2) & ":" & right("00" & m, 2) & ":" & right("00" & s, 2) & vbcrlf
next

Последний раз редактировалось Stilet; 09.11.2013 в 23:18.
Sle7vin вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
VBS + Excel PrincNochi Microsoft Office Excel 5 29.03.2013 14:36
VBS Массивы tecak94 Помощь студентам 0 13.12.2012 18:07
vbs Shout Помощь студентам 0 23.07.2011 12:31
VBS-скрипты ardor JavaScript, Ajax 0 10.03.2011 00:03