:: Visual Foxpro, Foxpro for DOS
File()
rusl
Автор

Сообщений: 200
Откуда: СПб
Дата регистрации: 01.02.2005
? File ()
If File (DataTable)
If Used(DataTable)
Select DataTable
Else
Use (DataTable) In 0 Again
Endif
Else
Create Table (DataTable) (FileNameID I, SubWord C(50), Frequency N(12,10))
ENDIF

На вопрос ? File (DataTable) Фокс отвечает .F. , а когда доходит до Create Table ругается, что "файл уже существует как часть базы данных"?

DataTable переменное имя таблицы без ".DBF"

Как добавить расширение к переменному имени таблицы?
Ratings: 0 negative/0 positive
Re: File()
Syberex

Сообщений: 1432
Откуда: Кострома
Дата регистрации: 19.01.2004
LOCAL lcDataTable
lcDataTable = 'Table1'
IF FILE (lcDataTable+'.dbf')
IF USED(lcDataTable)
SELECT (lcDataTable)
ELSE
USE (lcDataTable) IN 0 AGAIN
ENDIF
ELSE
CREATE TABLE (lcDataTable) (FileNameID I, SubWord C(50), Frequency N(12,10)) && FREE
ENDIF
Вот теперь работает




------------------
Ratings: 0 negative/0 positive
Re: File()
rusl
Автор

Сообщений: 200
Откуда: СПб
Дата регистрации: 01.02.2005
Спасибо.
Ratings: 0 negative/0 positive
Re: File()
Igor Korolyov

Сообщений: 34580
Дата регистрации: 28.05.2002
Hi rusl!

FORCEEXT(), INDBC(), DBGETPROP("MyTable", "TABLE", "Path")




------------------
WBR, Igor
Ratings: 0 negative/0 positive


Извините, только зарегистрированные пользователи могут оставлять сообщения в этом форуме.

On-line: 27 alex;  (Гостей: 26)

© 2000-2024 Fox Club 
Яндекс.Метрика