* Создается файл низкого уровня NAMES.TXT, и его возвращенный номер
* Затем текстовый файл с именами сотрудников открывается с помощью
CLOSE DATABASES
SET TALK OFF
SET TEXTMERGE ON && Enable embedding of expressions and functions
STORE FCREATE('names.txt') TO _TEXT && Create low-level file
IF _TEXT = -1 && Can't create low-level file then exit program
WAIT WINDOW 'Cannot create an output file; press a key to exit'
CANCEL
ENDIF
CLOSE DATABASES
OPEN DATABASE (HOME( ) + 'samples\data\testdata')
USE customer && Opens Customer table
<<DATE( )>> <<TIME( )>>
SCAN NEXT 10
TEXT
<<contact>>
ENDTEXT
ENDSCAN
CLOSE ALL && Close the text file and the table
MODIFY FILE names.txt
ERASE names.txt
* TEXTMERGE, SET TEXTMERGE DELIMITERS, TEXT ... ENDTEXT и системной
* переменной памяти _TEXT.
* сохраняется в системной переменной памяти _TEXT. Если файл
* NAMES.TXT создать не удалось, происходит выход из программы.
* Открывается таблица
* выводятся в файл NAMES.TXT. В него записывается текст и результаты
* функций.
* команды MODIFY FILE.
Новое на сайте
-
Обновлен портфель программиста
Добавлены: Установка HTML Help (Создание справочной системы), Imagedit.zip - Графический редактор ( ico и bmp), Библиотека локализации HTML Help (Русский) -
Новые примеры программ
Установка библиотек, Игровая программа "Охота на лис", Установка библиотек "Охота на лис", plastic -"Платежки", Библиотеки (на FPD26), platan -"Платежки" (на Clipper 5.2) -
Обновленна справка
Подсказки, технология программирования и использование Visual FoxPro. Команды, функции, операторы, объекты, свойства, события и методы.