Компьютерный форум OSzone.net  

Компьютерный форум OSzone.net (http://forum.oszone.net/index.php)
-   Скриптовые языки администрирования Windows (http://forum.oszone.net/forumdisplay.php?f=102)
-   -   Как узнать время работы программы в Windows 7 (http://forum.oszone.net/showthread.php?t=324164)

kerk 24-02-2017 14:03 2714412

Как узнать время работы программы в Windows 7
 
Добрый день.
Искал на интернете как узнать как долго работает та или иная программа в Windows 7. Нашел этот скрипт, но он к сожалению у любой программы пишит только 0.00:00:00. Может ктонибудь помочь с созданием ВАТ скрипта?

glukin 24-02-2017 14:16 2714417

kerk, tasklist /V | find "cmd.exe", например, и обрабатываете вывод, как Вам нужно. Далее - сам не силён в скриптах пока.

kerk 24-02-2017 14:41 2714424

glukin, это не то, это время процесора а оно другое чем время программы.

glukin 24-02-2017 17:38 2714457

kerk, Ничего не понял. У программы есть процесс в памяти? Есть. У него есть время работы? Есть. Что не так? Или неизвестен процесс, который принадлежит программе?

kerk 24-02-2017 20:12 2714485

glukin, время в нем не соответствует настоящему. После 5 минут там 00:00:01.

glukin 24-02-2017 20:57 2714492

kerk,Ваша правда, помониторил с полчаса , показывает фигню какую-то. Извините.

alpap 25-02-2017 01:22 2714536

kerk,
прекрасно на 7ке работает:
Код:

powershell /nologo /noprofile "[int]((get-date) - ((get-process 'AkelPad').starttime)).totalminutes"

Iska 25-02-2017 02:12 2714541

kerk, а что Вы вообще позразумеваете под:
Цитата:

Цитата kerk
время работы программы »

?

kerk 25-02-2017 10:48 2714583

Iska, то что написано. Запустил программу в 10:35, запустил ВАТ скрипт в 11:18 и узнал, что программа работает уже 00:00:43.

alpap, я не селен в powershell. Может разъясните куда писать название конкретной программы в ваш код?

Iska 25-02-2017 11:14 2714587

kerk, тогда проще будет WSH/PoSH.

kerk 25-02-2017 11:29 2714593

Iska, а что это, можно пример?

Iska 25-02-2017 11:50 2714598

Пример на PowerShell'е привёл выше коллега alpap. WSH — Windows Script Host, предшественник PowerShell'а, имеет по умолчанию в комплекте два языка: VBScript и JScript. Например (WSH, VBScript):
Код:

Option Explicit

Dim objSWbemObjectEx


With WScript.CreateObject("WbemScripting.SWbemDateTime")
        For Each objSWbemObjectEx In WScript.CreateObject("WbemScripting.SWbemLocator").ConnectServer(".", "root\cimv2").ExecQuery("SELECT * FROM Win32_Process WHERE Name = 'notepad.exe'")
                .Value = objSWbemObjectEx.CreationDate
                WScript.Echo "Notepad worked at " & DateDiff("n",  .GetVarDate, Now()) & " minutes"
        Next
End With

WScript.Quit 0

Цитата:

Цитата kerk
куда писать название конкретной программы в ваш код? »

Вместо слова «AkelPad». В мою — вместо «notepad.exe».

kerk 25-02-2017 12:44 2714604

Iska, вставил в код название программы vlc.exe
Код:

powershell /nologo /noprofile "[int]((get-date) - ((get-process 'vlc.exe').starttime)).totalminutes"
powershell пишит ошибку
Код:

Get-Process : Cannot find a process with the name "vlc.exe". Verify the process name and call the cmdlet again.
At line:1 char:33
+ [int]((get-date) - ((get-process <<<<  'vlc.exe').starttime)).totalminutes
    + CategoryInfo          : ObjectNotFound: (vlc.exe:String) [Get-Process], ProcessCommandException
    + FullyQualifiedErrorId : NoProcessFoundForGivenName,Microsoft.PowerShell.Commands.GetProcessCommand

Cannot find an overload for "op_Subtraction" and the argument count: "2".
At line:1 char:19
+ [int]((get-date) - <<<<  ((get-process 'vlc.exe').starttime)).totalminutes
    + CategoryInfo          : NotSpecified: (:) [], MethodException
    + FullyQualifiedErrorId : MethodCountCouldNotFindBest

VBS код конечно интересный, но хотелось бы на дни:часы:минуты и в BAT/CMD. Это вообще возможно?

Iska 25-02-2017 13:19 2714612

Цитата:

Цитата kerk
Iska, вставил в код название программы vlc.exe »

А надо было вставлять не «vlc.exe», а «vlc». С «.exe» — это для Wbem.

Цитата:

Цитата kerk
VBS код конечно интересный, но хотелось бы на дни:часы:минуты »

В предыдущем коде заменить вывод на:
Код:

WScript.Echo "Notepad worked at " & TimeSerial(0, 0, DateDiff("s",  .GetVarDate, Now()))
Цитата:

Цитата kerk
и в BAT/CMD. Это вообще возможно? »

Возможно. Но уже без меня, ибо вычисления разницы даты/времени на пакетных файлах меня не прельщают. Я для подобных вещей превосходно обхожусь WSH и не вижу никакой нужды в пакетных файлах.

greg zakharov 25-02-2017 13:36 2714616

Цитата:

Цитата Iska
Возможно. Но уже без меня, ибо вычисления разницы даты/времени на пакетных файлах меня не прельщают. Я для подобных вещей превосходно обхожусь WSH и не вижу никакой нужды в пакетных файлах.

А что сложного то в том? Элементарная математика, не более.
Цитата:

Цитата kerk
VBS код конечно интересный, но хотелось бы на дни:часы:минуты и в BAT/CMD. Это вообще возможно?

Более чем.
Код:

@echo off
  setlocal enabledelayedexpansion
  chcp 1251>nul
    set "i=0"
    for %%i in (%*) do set /a "i+=1"
    if %i% neq 1 echo:=^>err : index is out of range&goto:eof
    for /f delims^=^"^ tokens^=3 %%i in (
      'typeperf "\Процесс(%~1)\Прошло времени (сек)" -sc 1^
      ^| findstr /irc:":"'
    ) do 2>nul set /a "s=%%i" % rem : всего секунд
    if !s! equ -1 echo:=^>err : process has not been found&goto:eof
    set /a "ss=s%%60", "s/=60", "mm=s%%60", "s/=60", "hh=s%%24", "dd=s/24"
    for %%i in (%hh% %mm% %ss%) do (
      if %%i lss 10 (set "t=!t!0%%i:") else (set "t=!t!%%i:")
    )
    echo:%dd%.%t:~,-1%
  endlocal&chcp 866>nul
exit /b

Пример использования:
Код:

C:\> ttime.cmd powershell
13.05:47:23

C:\> ttime.cmd vim
7.11:23:00

О минусах данного подхода: локалезависимость, которую, впрочем, можно обойти; если запущено более одной копии указанного процесса, значение возвращается для более старшего (увы, порочность счетчиков производительности); сам командный сценарий нужно сохранять в win-1251.

Iska 25-02-2017 13:54 2714619

Цитата:

Цитата greg zakharov
А что сложного то в том? Элементарная математика, не более. »

Запутанно и нудно.

kerk 25-02-2017 21:19 2714722

greg zakharov, этот код я уже пробовал. Создал фаил test.cmd, потом запуститил командную строку с правами админа и написал C:\> test.cmd vlc.exe (пробовал так-же просто vlc). Наверно чтото делаю не так, так-как выкидывает это
Код:

C:\test>test.cmd vlc
0.00:00:00

C:\test>

Хотя VLC работает где-то 22 часа.

greg zakharov 26-02-2017 10:36 2714839

Цитата:

Цитата kerk
этот код я уже пробовал... Наверно чтото делаю не так...

Не наверное, а точно.

Как вариант могу предложить локаленезависимый способ.
Код:

@echo off
  setlocal enabledelayedexpansion
    for %%i in (lodctr.exe) do (
      if not exist "%%~$PATH:i" (
        call:err "could not retrieve required data"
        goto:eof
      )
    )
    set "i=0"
    for %%i in (%*) do set /a "i+=1"
    if !i! neq 1 call:err "argument is out of range"&goto:eof
    set "pc=%tmp%\perf.tmp"
    lodctr /s:"%pc%"
    call:findlocalestr 230 object
    call:findlocalestr 684 counter
    del /f /q "%pc%"
    for /f delims^=^"^ tokens^=3 %%i in (
      'typeperf "%object%(%~1)%counter%" -sc 1 ^| findstr /rc:":"'
    ) do 2>nul set /a "s=%%i"
    if !s! equ -1 call:err "process has not been found"&goto:eof
    set /a "ss=s%%60", "s/=60", "mm=s%%60", "s/=60", "hh=s%%24", "dd=s/24"
    for %%i in (%hh% %mm% %ss%) do (
      if %%i lss 10 (set "t=!t!0%%i:") else (set "t=!t!%%i:")
    )
    echo:%dd%.%t:~,-1%
  endlocal
exit /b

:err
  echo:=^>err : %~1
exit /b 1

:findlocalestr
  for /f "tokens=2 delims==" %%i in (
    'find "%~1=" "%pc%" ^| findstr /brc:"%~1="'
  ) do set "%2=\%%i"
exit /b


kerk 26-02-2017 12:07 2714858

greg zakharov, попробовал, запустил последний скрипт ''локаленезависимый способ''. Опять что-то делаю не так?

Может у вас дополнительные программы установлены для таких операций, что-то типа PsTools и поэтому результат другой?

Программа VLC.exe работает уже 30-40 минут.


greg zakharov 26-02-2017 12:30 2714863

kerk, уважаемый, поясните для каких целей нужно в приведенном примере такое барахло, как pstools, когда используются штатные средства?! И да, что это у Вас за чудная версия 6.6.1.7601? Что-то не припомню таковой.

kerk 26-02-2017 12:51 2714867

greg zakharov, мне PsTools даром не нужен, я подобные вещи не использую, ваш скрипт просто неработает у меня. Либо что-то недоговариваете либо у вас в ОС что-то подругому.
Версия винды у меня такаяже как на вашем скриншоте 6.1.7601. У меня легалная ось Windows 7 Pro SP1 с последними актуализациями. Не знаю откуда шестерка взялась.

greg zakharov 26-02-2017 13:25 2714882

Цитата:

Цитата kerk
Либо что-то недоговариваете либо у вас в ОС что-то подругому.

Скорее недоговаривается что-то с Вашей стороны. И для чего Вам строить догадки относительно чужой ОСи? Та же Win7, только Ultimate. А если у Вас лично что-то не работает, это не значит что оно не работает вовсе (или в недрах системы происходят потаенные процессы), и потом, смотрите что у Вас в системе не так, ибо если ver работает неверно (в "семерке" то!), в пору задуматься об исправности системы или перестать подделывать скриншоты. В общем, разберайтесь, а далее посмотрим.

kerk 26-02-2017 14:54 2714906

greg zakharov, переустанавливать свою ось не буду, долго. Попробую в виртуале отестировать на чистом Pro и Ultimate. Хотя не думаю что это из-за версии оси.

kerk 26-02-2017 21:00 2714989

Узнал где проблема но не знаю как ее решить. Скачал Windows 7 Pro с ru tracker, установил, скрипт работает. Так как у меня ось не на русском установил оригинал Windows 7 Pro на другом языке, скрипт показывает нули, так-же как в моем случае. Странно. Скачал польскую версию, таже фигня, все нули. Выходит, что скрипт работает почему-то только на русской оси. Глупость какая-то.


Время: 10:07.

Время: 10:07.
© OSzone.net 2001-