В этой статье я покажу вам, как можно получить и отобразить данные о каком-либо файле при помощи скриптового языка программирования VBScript.
Код скрипта:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 |
Option Explicit ' Команда, которая требует явного объявления переменных. Советую её использовать. Dim oFSO ' Объявление переменных Dim oFileInfo Set oFSO = CreateObject("Scripting.FileSystemObject") ' Создание объекта для работы с файловой системой Set oFileInfo = oFSO.GetFile("D:\Data\123.txt") ' Получение файла ' Вывод информации о файле из объекта oFileInfo MsgBox( _ "Имя файла - " & oFileInfo.Name & vbCrLf & _ "Дата создания - " & oFileInfo.DateCreated & vbCrLf & _ "Дата последней модификации - " & oFileInfo.DateLastModified & vbCrLf & _ "Диск, где находится файл - " & oFileInfo.Drive & vbCrLf & _ "Путь до корневой папки - " & oFileInfo.ParentFolder & vbCrLf & _ "Полный путь - " & oFileInfo.Path & vbCrLf & _ "Размер файла - " & oFileInfo.Size & " байт" & vbCrLf & _ "Тип файла - " & oFileInfo.Type) |
Результат:
Имеющиеся вопросы можете задать в комментариях.