Имя пользователя:
Пароль:
 

Показать сообщение отдельно

Ветеран


Contributor


Сообщения: 2735
Благодарности: 1699

Профиль | Отправить PM | Цитировать


Вот VBS. Сохраните скрипт в файл .vbs, сделайте на него значок, затаскивайте Ваш файл на этот значок.
Если принципиально cmd, можно придумать, используя VBS
Код: Выделить весь код
Set Args = WScript.Arguments
If Args.Count = 0 Then
    MsgBox "Имя файла не задано"
Else
    FName = CStr(Args(0))
    Set FSO = CreateObject("Scripting.FileSystemObject")
    Set InFile = FSO.GetFile(FName)
    iDate = DateDiff("d", InFile.DateLastModified, Now, 2, 1)
    MsgBox "Файл" + vbCrLf + FName + vbCrLf + "изменён " + CStr(iDate) + " дней тому назад"
End If

-------
Даже самая сложная проблема обязательно имеет простое, лёгкое для понимания, неправильное решение. Каждое решение плодит новые проблемы.


Отправлено: 17:21, 04-10-2016 | #5