Предыдущая страница реферата | 1  2  3  4  5  6  7  8 | Следующая страница реферата

Dim fso As New FileSystemObject, fil As File

Set fil = fso.GetFile("c:test.txt")

Обратите внимание, однако, что Вы не должны использовать методы "Get" для недавно созданных объектов, так как функции "Get" уже возвращает программе обработки недавно созданный объект. Например, если Вы создаете новую папку, используя метод CreateFolder, Вы затем не должны использовать метод GetFolder , чтобы обратиться к свойствам, типа Name, Path, Size и т.д. Только объявите переменную функции CreateFolder, чтобы получить программу обработки недавно созданной папке, затем обратитесь к свойствам, методам, и событиям:

Private Sub Create_Folder()

Dim fso As New FileSystemObject, fldr As Folder

Set fldr = fso.CreateFolder("C:MyTest")

MsgBox "Created folder: " & fldr.Name

End Sub

Обращение к Properties (Свойствам) Объекта

Как только Вы имеете код обработки объекта, Вы можете обращаться к его свойствам. Например, если Вы хотите получить имя специфической папки. Сначала Вы создаете образец объекта, затем Вы получаете код для его обработки соответствующим методом (в этом случае метод GetFolder, так как папка уже существует):

Set fldr = fso.GetFolder("c:")

Теперь, когда Вы имеете код обработки объекта Folder, Вы можете проверить свойство Name:

Debug.Print "Folder name is: "; fldr.Name

Если Вы хотите выяснять когда в последний раз, файл изменялся, используется следующий синтаксис:

Dim fso As New FileSystemObject, fil As File

'Получаем объект File, чтобы сделать запрос

Set fil = fso.GetFile ( "C:detlog.txt" )

'Печатаем информацию

Debug.Print "File last modified: "; fil.DateLastModified

Работа с Drives (Дисководами) и Folders (Папками)

Объектная модель FSO может программно работать с дисководами и папками, точно так, как Вы с Windows Explorer в интерактивном режиме. Вы можете копировать и перемещать папки, получать информацию относительно дисководов и папок, и т.д. Получение информации относительно Drives (Дисководов) Объект Drive позволяет Вам получать информацию относительно различных дисководов, присоединенных к системе или физически или через сеть. Свойства позволяют Вам получить информацию относительно:

Полный размера дисковода в байтах (свойство TotalSize);

Количество доступного свободного места на дисководе в байтах (свойства AvailableSpace или FreeSpace);

Буквенного обозначения дисковода (свойство DriveLetter);

Какого типа дисковод, сменный, фиксированный, сетевой, CD-ROM или RAM (свойство DriveType);

Рекомендуем скачать другие рефераты по теме: товар реферат, доклад по обж.





Предыдущая страница реферата | 1  2  3  4  5  6  7  8 | Следующая страница реферата