Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Расширение имени файла / 6 сообщений из 6, страница 1 из 1
04.10.2007, 10:38
    #34845866
shanton
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Расширение имени файла
Как можно определить расширение имени файла? Функция JUSTEXT() не подходит, поскольку в имени файла возможно присутствие точек, поскольку файлы CAD-приложений.
...
Рейтинг: 0 / 0
04.10.2007, 10:42
    #34845881
Расширение имени файла
И чем функции Justext() помешали точки внутри имени?
...
Рейтинг: 0 / 0
04.10.2007, 10:45
    #34845896
shanton
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Расширение имени файла
Когда файл без расширения.
...
Рейтинг: 0 / 0
04.10.2007, 10:46
    #34845904
Расширение имени файла
А как Вы сами в таком случае определяете наличие или отсутствие расширения? По каким признакам?
...
Рейтинг: 0 / 0
04.10.2007, 11:05
    #34845975
shanton
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Расширение имени файла
Когда перемещаю файл без расширения:
Код: plaintext
RENAME 'D:\DSERG_Log_200708301203' TO 'C:\DSERG_Log_200708301203'
получаю ошибку:
Код: plaintext
Файл 'D:\DSERG_Log_200708301203.dbf' не существует
тоесть фокс прикручмвает расширение dbf. Надо в начале определить имеет ли файл расширение, если нет, тогда:
Код: plaintext
RENAME 'D:\DSERG_Log_200708301203.' TO 'C:\DSERG_Log_200708301203.'
...
Рейтинг: 0 / 0
04.10.2007, 15:03
    #34847021
Kruchinin Pahan
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Расширение имени файла
shantonКогда перемещаю файл без расширения:
Код: plaintext
RENAME 'D:\DSERG_Log_200708301203' TO 'C:\DSERG_Log_200708301203'
получаю ошибку:
Код: plaintext
Файл 'D:\DSERG_Log_200708301203.dbf' не существует
тоесть фокс прикручмвает расширение dbf. Надо в начале определить имеет ли файл расширение, если нет, тогда:
Код: plaintext
RENAME 'D:\DSERG_Log_200708301203.' TO 'C:\DSERG_Log_200708301203.'

1.
И чем это мешает сделать EMPTY(JUSTEXT())?
Судя по представленному названию, JUSTEXT() вернет пусто.
JUSTEXT('D:\DSERG_Log_2007083.01203') вернет '01203' и скопирует.
2.
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
llOk = .T.
TRY
RENAME 'D:\DSERG_Log_200708301203' TO 'C:\DSERG_Log_200708301203'
CATCH
     llOk = .F.
ENDTRY
IF !llOk
    RENAME 'D:\DSERG_Log_200708301203.' TO 'C:\DSERG_Log_200708301203.'
ENDIF
...
Рейтинг: 0 / 0
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Расширение имени файла / 6 сообщений из 6, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]