Нужно ли объявить Fil?

Программирование на Visual Basic, главный форум. Обсуждение тем программирования на VB 1—6.
Даже если вы плохо разбираетесь в VB и программировании вообще — тут вам помогут. В разумных пределах, конечно.
Правила форума
Темы, в которых будет сначала написано «что нужно сделать», а затем просьба «помогите», будут закрыты.
Читайте требования к создаваемым темам.
Don Leno
Постоялец
Постоялец
Аватара пользователя
 
Сообщения: 421
Зарегистрирован: 13.10.2013 (Вс) 14:05

Нужно ли объявить Fil?

Сообщение Don Leno » 28.05.2016 (Сб) 5:47

Столкнулся с кодом FSO, который проверяет наличие файла:
Код: Выделить всё
Set fso = CreateObject("Scripting.FileSystemObject")
st = Trim(tx.Text) ' Путь к файлу
Set fil = fso.GetFile(st)
MsgBox fil.Name


Переменную Fil здесь необходимо объявлять, если да, то как?

ger_kar
Продвинутый гуру
Продвинутый гуру
Аватара пользователя
 
Сообщения: 1957
Зарегистрирован: 19.05.2011 (Чт) 19:23
Откуда: Кыргызстан, Иссык-Куль, г. Каракол

Re: Нужно ли объявить Fil?

Сообщение ger_kar » 28.05.2016 (Сб) 7:16

Ну вообще лучший вариант это установка директивы Option Explicit и объявления всех переменных.
Приведенный код, это код для Visual Basic Script, для объявления по типу позднего связывания, достаточно объявить Dim fil As Object, но гораздо лучше подключить соответствующую библиотеку.
Подключение.png
Подключение.png (3.57 Кб) Просмотров: 1473

И там найти искомый тип и использовать его
Получение.png
Получение.png (9.32 Кб) Просмотров: 1473

Соответственно объявление будет выглядеть так:
Dim fil As File
Или (так гораздо лучше)
Dim fil As Scripting.File
Бороться и искать, найти и перепрятать

Don Leno
Постоялец
Постоялец
Аватара пользователя
 
Сообщения: 421
Зарегистрирован: 13.10.2013 (Вс) 14:05

Re: Нужно ли объявить Fil?

Сообщение Don Leno » 28.05.2016 (Сб) 18:24

Спасибо за подробный ответ!


Вернуться в Visual Basic 1–6

Кто сейчас на конференции

Сейчас этот форум просматривают: Google-бот, Majestic-12 [Bot] и гости: 16

    TopList