25.02.2015, 02:43
|
#6
|
AnyKey`щик
Регистрация: 20.11.2013
Сообщений: 18
Написано 4 полезных сообщений (для 6 пользователей)
|
Ответ: Расширение файла
Сообщение от Wegox
Function GetFileExtension$(file$, div$ = ".") Return Right$(file$,Len(file) - Instr(file, div)) End Function Print GetFileExtension("A:\Directory\file.exe")
|
Повелитель оптимизации
|
(Offline)
|
|