OPEN DATABASE (HOME( ) + 'samples\data\testdata')
USE customer && Opens Customer table
SET TALK OFF
STORE 0 TO gnCount
LOCATE FOR ALLTRIM(UPPER(country)) = 'FRANCE'
DO WHILE FOUND( )
gnCount = gnCount + 1
? 'Total customers from France: '+ LTRIM(STR(gnCount))
* Франции и на экран выдается полученное значение. Все записи ищутся с
* помощью одной команды LOCATE, а также команды CONTINUE в цикле.
Новое на сайте
-
Обновлен портфель программиста
Добавлены: Установка HTML Help (Создание справочной системы), Imagedit.zip - Графический редактор ( ico и bmp), Библиотека локализации HTML Help (Русский) -
Новые примеры программ
Установка библиотек, Игровая программа "Охота на лис", Установка библиотек "Охота на лис", plastic -"Платежки", Библиотеки (на FPD26), platan -"Платежки" (на Clipper 5.2) -
Обновленна справка
Подсказки, технология программирования и использование Visual FoxPro. Команды, функции, операторы, объекты, свойства, события и методы.