| Вопрос: Взять Аттрибуты файла ??? | Добавлено: 23.09.04 23:34 |
Автор вопроса:  Alban | ICQ: 319660391 |
| Как узнать аттрибут файла "Открыт: такогото числа" ? Спасибо заранее. |
| Ответы | Всего ответов: 3 |
|
Номер ответа: 1 Автор ответа:  cresta Вопросов: 117 Ответов: 1538 |
Профиль | | #1 | Добавлено: 23.09.04 23:52 |
|
Private Type WIN32_FIND_DATA
dwFileAttributes As Long ftCreationTime As FILETIME ftLastAccessTime As FILETIME ftLastWriteTime As FILETIME nFileSizeHigh As Long nFileSizeLow As Long dwReserved0 As Long dwReserved1 As Long cFileName As String * MAX_PATH cAlternate As String * 14 End Type Private Type FILETIME dwLowDateTime As Long dwHighDateTime As Long End Type Private Declare Function FindFirstFile Lib "kernel32" Alias "FindFirstFileA" (ByVal lpFileName As String, lpFindFileData As WIN32_FIND_DATA) As Long Private Declare Function FindClose Lib "kernel32" (ByVal hFindFile As Long) As Long Эти ф-ции найдут файл и в структуре WIN32_FIND_DATA будет твоё время |
||
|
Номер ответа: 2 Автор ответа: Diavolo Вопросов: 6 Ответов: 46 |
Профиль | | #2 | Добавлено: 24.09.04 17:17 |
|
Imports System.IO
Dim MyFile As FileInfo MyFile = New FileInfo("**filename**" 
А дальше смотрим необходимые аттрибуты, например: MyFile.CreationTime.Date() С ув. Виталий |
||
|
Номер ответа: 3 Автор ответа: DiavoloВопросов: 6 Ответов: 46 |
Профиль | | #3 | Добавлено: 02.10.04 08:58 |
|
Imports System.IO либо прописывается в коде, в модуле, где будет использоваться, до объявления класса, либо на Property Pages твоего проекта в Common Properties->Imports. Можно и не прописывать, но тогда нужно будет делать объявления вроде:
[CODE] Dim MyFile As System.IO.FileInfo MyFile = New System.IO.FileInfo("**filename**") [/CODE] |
||
Страница: 1 |