SQL-запрос в Visual FoxPro 9.0 sp2

[star007]

Сообщение от Stilet

Фокспро. О_о. Или ты о чем?

Есть команда USE <имя таблицы>. А вообще в Фоксе и SELECT сам подключит.

PUBLIC strFam
strFam = form1.edit1.text
USE table1.dbf
SELECT Table1.id, Table1.firstname, Table1.name, Table1.lastname,;
  Table1.birthdate, Table1.sex, Table1.profecy, Table1.workdate, Table1.box;

Стопарнулся сдесь, незнаю как дальше делать

[Stilet]

SELECT Table1.id, Table1.firstname, Table1.name, Table1.lastname,;
  Table1.birthdate, Table1.sex, Table1.profecy, Table1.workdate, Table1.box;
 from...
...
  where strFam = LEFT(Table1.firstname,1)

Насколько я помню.

[star007]

Сообщение от Stilet

SELECT Table1.id, Table1.firstname, Table1.name, Table1.lastname,;
  Table1.birthdate, Table1.sex, Table1.profecy, Table1.workdate, Table1.box;
 from...
...
  where strFam = LEFT(Table1.firstname,1)

Насколько я помню.

Написал так :

PUBLIC strFam
strFam = form1.edit1.text
USE table1.dbf
SELECT Table1.id, Table1.firstname, Table1.name, Table1.lastname,;
  Table1.birthdate, Table1.sex, Table1.profecy, Table1.workdate, Table1.box;
FROM Table1.firstname 
WHERE strFam = LEFT(Table1.firstname,1)

при попытке запуска пишет Unricognized command verb на строке

WHERE strFam = LEFT(Table1.firstname,1)

[Аватар]

FROM Table1.firstname

Это как перевести?

[Stilet]

FROM Table1.firstname

; забыл поставить )

Это как перевести?

Ахахах, кстати да - это ересь. FROM Table1 - надо писать.

[Аватар]

Та не. Что это за имя таблицы? Просто Table1

[star007]

Сообщение от Аватар

Это как перевести?

Я так понял там должно быть

FROM table1

На данный момент код такой:

PUBLIC strFam
strFam = form1.edit1.text
USE D:\ðàáîòà\foxPro\table1.dbf
SELECT Table1.id, Table1.firstname, Table1.name, Table1.lastname,;
  Table1.birthdate, Table1.sex, Table1.profecy, Table1.workdate, Table1.box;
FROM Table1;
WHERE strFam = LEFT(Table1.firstname,1);
ENDPROC

когда программа запущена и в введена в поле edit буква, то при нажатии на копку выдает ошибку Command contains unricognized phrase/keyword ссылаясь на строку

 PUBLIC strFam
strFam = form1.edit1.text
USE D:\work\foxPro\table1.dbf
SELECT Table1.id, Table1.firstname, Table1.name, Table1.lastname,;
  Table1.birthdate, Table1.sex, Table1.profecy, Table1.workdate, Table1.box;
FROM Table1;
WHERE strFam = LEFT(Table1.firstname,1);
ENDPROC

[Аватар]

Ну и ; не забывай

[star007]

Всем спасибо) Заработало!
Вот код

 PUBLIC strFam
strFam = form1.edit1.text
USE D:\работа\foxPro\table1.dbf
SELECT Table1.id, Table1.firstname, Table1.name, Table1.lastname,;
  Table1.birthdate, Table1.sex, Table1.profecy, Table1.workdate, Table1.box;
FROM Table1;
WHERE strFam = LEFT(Table1.firstname,1);

Все происходит при нажатии на кнопку. Но замечен следующий косяк: когда закрываем форму с выведенным результатом, то при попытке получить результат по другой или той же букве выводит ошибку File in use

[Stilet]

А ты пропиши в конце либо

use

без параметров либо

close data