Веб программирование

Получение расширения файла [VB] (Сарай)

 
 

В статье на http://vbbook.ru//polychenie-rasshirenie-faila/ сказано:

Text1.Text = Right(s, 3)   ' получаем в Text1 только расширение

В этом коде получает расширение состоящие из 3 символов, но существуют файлы с количеством символов в расширении более 3-х.

Для общего случая, когда заренее неизвестно количество символов, в значении расширении файла удобнее применить

Text1.Text = Right(s, InStr(StrReverse(s), ".") - 1)

В этом случае получаем значение расширения вне зависимости от числа его знаков.

*********

Я прошу прощения у модераторов этого сайта за эту публикацию, но я просто не нашел, как по другому сделать дополнение к сообщению Алексея.


Есть вопросы? Спроси на нашем форуме!!
УХТИ [29.10.2012 13:51]

ДА

Алексей(alex13sh) [29.10.2012 20:02]

Михаил Сорокин, я могу как нибудь на мудрить и всунуть это дополнение в статью Алексея , с авторством))

Алексей(alex13sh) [29.10.2012 20:02]

Михаил Сорокин, вы за?

-Гепард97- [31.10.2012 21:45]

Клиника, ой-вей!

Получаете объект файла через расово кошерный VB6 и получаете расширение функцией...

-Гепард97- [31.10.2012 21:45]

Не забудьте подключить FSO trollface

123 [04.11.2012 19:38]

В сарай!

Кулхацкер [05.11.2012 10:49]

По просьбе трудящихся, пожизненный [s]эцих[/s] сарай с гвоздями.



Оставлять комментарии можно только зарегистрированным




Предупреждение: Вся информация представлена исключительно в образовательных целях.
Ни авторы, ни администрация не несут ответственности в случае ее использования в противозаконных целях.