Конференция VBStreets

**FSO** » 13.05.2005 (Пт) 14:30

Почему у меня не отображается информация о файле находящиеся не в корневом каталоге с прогой???

Код: Выделить всё: Dim InfoFile As File Set InfoFile = fso.GetFile(File1.FileName) Label1.Caption = "Èìÿ ôàéëà " & InfoFile.Name & "\" & File1 Label8.Caption = "Òèï: " & InfoFile.Type Label2.Caption = "Ïîëíûé ïóòü " & vbCrLf & InfoFile.Path Label3.Caption = "Äàòà ñîçäàíèÿ " & InfoFile.DateCreated Label4.Caption = "Äàòà ìîäèôèêàöèè " & InfoFile.DateLastModified Label5.Caption = "Äàòà ïîñëåäíåãî äîñòóïà " & InfoFile.DateLastAccessed Label6.Caption = "Ðàçìåð ôàéëà " & InfoFile.Size

**alibek** » 13.05.2005 (Пт) 14:31

А подумать?

**FSO** » 13.05.2005 (Пт) 15:16

alibek писал(а):А подумать?

Просвяти меня

**alibek** » 13.05.2005 (Пт) 15:39

Путь указывать кто будет?

**alibek** » 13.05.2005 (Пт) 15:43

Это имя файла (если File1 это FileListBox). Пути не вижу в упор.

[EDIT] А удалять сообщения нехорошо...

**Павлуша** » 13.05.2005 (Пт) 15:45

Попробуй с кодировкой побуянить.
Может чего получится?

**Джеффи** » 13.05.2005 (Пт) 15:47

alibek писал(а):Это имя файла (если File1 это FileListBox). Пути не вижу в упор.

[EDIT] А удалять сообщения нехорошо...

Потому что тупому сообщению нет места на форуме!

**Джеффи** » 13.05.2005 (Пт) 15:47

Павлуша писал(а):Попробуй с кодировкой побуянить.
Может чего получится?

Дело не в этом, просто при копировании кода необходимо чтобы в самом VB раскладка была устанволена RU.

**Igor_123** » 13.05.2005 (Пт) 17:05

Во блин!!! :shock:

А я ворд открываю и исправляю поврежденный текст.
:cry:

А удалять сообщения нехорошо... Поддерживаю!!!

А че было то хоть??? А...

Информация о файле