powered by simpleCommunicator - 2.0.53     © 2025 Programmizd 02
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / FoxPro 2.6 запрос в общем
34 сообщений из 34, показаны все 2 страниц
FoxPro 2.6 запрос в общем
    #37068158
Chek_Fedor
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
SELECT 6 && справочник "дисциплины"
USE new_disc INDEX ipred
SET ORDER TO TAG ipr_2
GO TOP

Разжуйте пожалуйста вот это...
Из всего что написано я понял только USE new_disc (т.е. открываем базу для дальнейшего использования). Что такое INDEX и т.д. как это работает при переводе на русский или Delphi, С++. Cпасибо.
...
Рейтинг: 0 / 0
FoxPro 2.6 запрос в общем
    #37068180
Dima T
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Код: plaintext
1.
2.
3.
SELECT  6  && сделать текущей  6 -ю рабочую область
USE new_disc INDEX ipred && открыть файл new_disc.dbf в текущей рабочей области с индексным файлом ipred.cdx
SET ORDER TO TAG ipr_2 && установить порядок сортировки по тэгу ipr_2 (он в ipred.cdx)
GO TOP && перейти на первую запись (с учетом сортировки)
...
Рейтинг: 0 / 0
FoxPro 2.6 запрос в общем
    #37068381
Chek_Fedor
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Спасибо. Точно файлы CDX есть только вот чем они открываются, если открываются и для чего они нужны. Еще один вопросик возможно стандартными SQL запросами заполнить таблицу. Сейчас происходит примерно следующие из таблицы NEW_disc читаются записи на понятном мне "языке"
Код: plaintext
1.
select * from new_disc where new_disc.ID=[значение переменной]
а мне нужно прочитать записи из одной таблицы и вставить в другую попутно заполнив столбцы значениями взятыми из переменных типа a:=StrToInt(Label.text) (только в FoxPro, а Delphi).
что то типа

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
1Таблица
a1 b1
1  а
2  b
3  c
2 Таблица
a1 b2 b1
1  10   а
2  11   b
3  12   c
реализуется
Код: plaintext
1.
select a1, b1 from [ 1  Таблица] insert into [ 2  Таблица] a1, b2, b1 Values(a1, $b, b1)
помоему так или я ошибаюсь
Пытался удалить записи из таблицы как сказано в книге по FoxPro
Код: plaintext
1.
delete from table
не получилось. Как это реализовать в Fox Pro 2.6
...
Рейтинг: 0 / 0
FoxPro 2.6 запрос в общем
    #37068439
tanglir
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Chek_Fedor, если так хочется именно sql-запросами, то читаем F1 -> "SELECT - SQL" -> INTO.

Находим:
1)into array - если надо до писать данные в таблицу (потом делаем insert from array).
2)into dbf|table - если надо за писать данные (таблица либо создаётся, либо перезаписывается).

А sql-ного аналога delete нету (под рукой только 2.0, не помню есть ли в 2.6, но наверное, тоже нет). Переходите в соотв. раб. область и удаляйте с помощью команды delete for <условие>. И про set deleted прочитайте.
...
Рейтинг: 0 / 0
FoxPro 2.6 запрос в общем
    #37068444
Dima T
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Chek_FedorСпасибо. Точно файлы CDX есть только вот чем они открываются, если открываются и для чего они нужны.
Это индексы.

По поводу остального советую книжку по FoxPro 2.x поискать, там из SQL только select есть и то очень ограниченный. Остальная поддержка SQL-я потом появилось. Работа с данными идет на языке XBASE.
Писать долго, в кратце так:
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
* Добавление 
sele new_disc && переход в рабочую область где открыта new_disc.dbf
append blank && добавление пустой записи
repl Field with Value && запись в поле Field значение Value
* удаление
delete && удаление текущей записи
delete for <условие> && удаление записей подходящих под <условие>
...
Рейтинг: 0 / 0
FoxPro 2.6 запрос в общем
    #37068463
Chek_FedorСпасибо. Точно файлы CDX есть только вот чем они открываются, если открываются и для чего они нужны.Это индексы. Их открывать не нужно, они открываются автоматически при открытии соответствующей таблицы. Нужны для ускорения поисков. Еще один вопросик возможно стандартными SQL запросами заполнить таблицу. Сейчас происходит примерно следующие из таблицы NEW_disc читаются записи на понятном мне "языке"
Код: plaintext
1.
select * from new_disc where new_disc.ID=[значение переменной]
а мне нужно прочитать записи из одной таблицы и вставить в другую попутно заполнив столбцы значениями взятыми из переменных типа a:=StrToInt(Label.text) (только в FoxPro, а Delphi).
что то типа

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
1Таблица
a1 b1
1  а
2  b
3  c
2 Таблица
a1 b2 b1
1  10   а
2  11   b
3  12   c
реализуется
Код: plaintext
1.
select a1, b1 from [ 1  Таблица] insert into [ 2  Таблица] a1, b2, b1 Values(a1, $b, b1)
помоему так или я ошибаюсьОшибаетесь. Схема должна быть такая (используя Ваши шаблоны):
select [1 Таблица]
append from [2 Таблица]
replace all b2 with $b
Пытался удалить записи из таблицы как сказано в книге по FoxPro
Код: plaintext
1.
delete from table
не получилось.Так и написало - не получаюсь?
Выданная Вами команда помечает на удаление одну запись. Как это реализовать в Fox Pro 2.6Если надо удалить все записи и очистить таблицу, то ZAP. Но есть большие подозрения, что Вы изобретаете очередной велосипед с временной таблицей.
Не расскажете саму задачку? Глядишь более прямое решение найдется.
...
Рейтинг: 0 / 0
FoxPro 2.6 запрос в общем
    #37068479
Dima T
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
проходящий.Chek_FedorСпасибо. Точно файлы CDX есть только вот чем они открываются, если открываются и для чего они нужны.Это индексы. Их открывать не нужно, они открываются автоматически при открытии соответствующей таблицы
...
автоматически если имя файла CDX совпадает с именем DBF, в данном случае это не так.
Chek_FedorUSE new_disc INDEX ipred
...
Рейтинг: 0 / 0
FoxPro 2.6 запрос в общем
    #37068484
tanglir
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
проходящий.Chek_FedorПытался удалить записи из таблицы как сказано в книге по FoxPro
Код: plaintext
delete from table
не получилось.Так и написало - не получаюсь?
Выданная Вами команда помечает на удаление одну запись.В 2.0 - Feature not available (и в хелпе нету delete-sql). В 2.6 добавили?

>Но есть большие подозрения, что Вы изобретаете очередной велосипед с временной таблицей.
Не расскажете саму задачку? Глядишь более прямое решение найдется.
+1
...
Рейтинг: 0 / 0
FoxPro 2.6 запрос в общем
    #37068515
tanglirпроходящий.пропущено...
Так и написало - не получаюсь?
Выданная Вами команда помечает на удаление одну запись.В 2.0 - Feature not available (и в хелпе нету delete-sql). В 2.6 добавили?Не-а, не добавили. Это я уже начал подзабывать сию версию.
...
Рейтинг: 0 / 0
FoxPro 2.6 запрос в общем
    #37069376
Chek_Fedor
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Блин что-то я...
Вот "связка" которая почти "работает"
Код: plaintext
1.
2.
3.
4.
5.
6.
use New_Disc
select [New_Disc] 
use Disc
select [disc]
append blank [Disc]
repl Name with 'name'
только что-то всеравно не то
Мне нужно пройтсь по всей таблице New_Disc и вставить в таблицу Disc данные из New_Disc изменив попутно часть данных в столбцах
Будем пробыват через SQL запрос
Спасибо
...
Рейтинг: 0 / 0
FoxPro 2.6 запрос в общем
    #37069438
Dima T
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Chek_FedorВот "связка" которая почти "работает"
это чушь полная:
Код: plaintext
1.
2.
3.
use New_Disc && открыть New_Disc.dbf в текущей рабочей области
select [New_Disc] && перейти в рабочую область где открыта New_Disc.dbf (она уже текущая)
use Disc && открыть Disc.dbf в текущей рабочей области (при этом New_Disc закроется автоматом)
...
тебя выше уже несколько раз спросили зачем тебе именно фокс 2.6, если что-то новое пишешь - перегони данные в какой-нибудь SQL сервер и пользуйся SQL-ем, или 9-й фокс возьми, там полноценный SQL

Если же 2.6 очень надо - ищи книжку и основы XBASE изучай, на предложение написать за тебя код с нуля тут вряд ли кто откликнется.
...
Рейтинг: 0 / 0
FoxPro 2.6 запрос в общем
    #37069522
Chek_Fedor
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Да не нужен мне "фокс" это нужно моим работодателям была прога уже написаная нужно немного подправить как сказали быстренько разобраться и сделать, я блин FOXPRO первый раз вчера увидел... так как вставить?
...
Рейтинг: 0 / 0
FoxPro 2.6 запрос в общем
    #37069538
Chek_FedorБлин что-то я...
Вот "связка" которая почти "работает"
Код: plaintext
1.
2.
3.
4.
5.
6.
use New_Disc
select [New_Disc] 
use Disc
select [disc]
append blank [Disc]
repl Name with 'name'
только что-то всеравно не тоРазумеется. Откуда blank взялся? Куда делся from? Что за самодеятельность? Зачем открывать и тут же закрывать Disk? Мне нужно пройтсь по всей таблице New_Disc и вставить в таблицу Disc данные из New_Disc изменив попутно часть данных в столбцахНу так может таки приведете какую-нибудь конкретику? Что менять, где менять, как менять? Будем пробыват через SQL запросПробОвать с таким подходом и на SQL будет трудно. Ибо нет точной формулировки жедлаемого.
...
Рейтинг: 0 / 0
FoxPro 2.6 запрос в общем
    #37069596
Chek_Fedor
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Выше было есть таблица1(поле1, поле2) берем из нее строки и вставляем в таблицу2 (поле1, поле2, поле3) где поле1 и поле2 идентичны в двух таблицах а в поле 3 пишем значение переменной.
...
Рейтинг: 0 / 0
FoxPro 2.6 запрос в общем
    #37069624
Dima T
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Chek_FedorВыше было есть таблица1(поле1, поле2) берем из нее строки и вставляем в таблицу2 (поле1, поле2, поле3) где поле1 и поле2 идентичны в двух таблицах а в поле 3 пишем значение переменной.
"Лучше день потерять потом за час долететь", ищи книжку по FoxPro 2.x, читай про работу с данными.

в простейшем случае это так делается:
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
sele  0  && переход в свободную рабочую область
use таблица2 
sele  0 
use таблица1
scan && перебор всех записей в таблица1
   переменная = ...
   sele таблица2 
   append blank
   repl поле1 with таблица1.поле1, поле2 with таблица1.поле2, поле3 with переменная
endscan
...
Рейтинг: 0 / 0
FoxPro 2.6 запрос в общем
    #37069640
Chek_FedorВыше было есть таблица1(поле1, поле2) берем из нее строки и вставляем в таблицу2 (поле1, поле2, поле3) где поле1 и поле2 идентичны в двух таблицах а в поле 3 пишем значение переменной.Не надо повторять одно и тоже, понятность от этого не повышается. К тому же, для этого объяснения код схема уже показана. Просто надо поменьше придумывать отсебятины.
...
Рейтинг: 0 / 0
FoxPro 2.6 запрос в общем
    #37069805
Chek_Fedor
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Спасибо всем!!!
...
Рейтинг: 0 / 0
FoxPro 2.6 запрос в общем
    #37071901
Chek_Fedor
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
в простейшем случае это так делается:
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
sele  0  && переход в свободную рабочую область
use таблица2 
sele  0 
use таблица1
scan && перебор всех записей в таблица1
   переменная = ...
   sele таблица2 
   append blank
   repl поле1 with таблица1.поле1, поле2 with таблица1.поле2, поле3 with переменная
endscan
[/quot]
Вывел данный код на отдельную кнопку соответственно приповторном нажатии прога ругается на use таблица2 они же уже открыты на команды
SET DATABASE TO [таблица2]
ругается Error in line 303: Unrecognized phrase/keyword in command.
CLOSE DATABASES
Впрос как закрыть нужную мне базу? Спасибо
...
Рейтинг: 0 / 0
FoxPro 2.6 запрос в общем
    #37072005
Dima T
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Добавь в конец
Код: plaintext
1.
2.
3.
sele таблица2 
use 
sele таблица1
use
...
Рейтинг: 0 / 0
FoxPro 2.6 запрос в общем
    #37072022
Chek_Fedor
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Спасибо. Добавил в начало
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
IF .NOT. USED("Disc")  
sele  0  && переход в свободную рабочую область
use Disc
endif
IF .NOT. USED("Disc1")  
sele  0  && переход в свободную рабочую область
use Disc1
endif
теперь думаю, переделывать?
...
Рейтинг: 0 / 0
FoxPro 2.6 запрос в общем
    #37072042
Dima T
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
можешь так оставить
...
Рейтинг: 0 / 0
FoxPro 2.6 запрос в общем
    #37074373
Chek_Fedor
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Снова я, не ругайте сильно...
Пытаюсь проверить наличие совпадений в "таблица1" с "таблица2" по столбцу "name"
не подскажите как реализовать
Чушь писать не буду (как прошлый раз)
...
Рейтинг: 0 / 0
FoxPro 2.6 запрос в общем
    #37074405
Chek_Fedor
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Вот какой то код "навоял"
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
CASE vybd1= 6    && КНОПКА1
SELECT  6 
IF .NOT. USED("Disc1")  
sele  0  && переход в свободную рабочую область
use Disc1
endif

Flag_F=.F.
GO TOP
	DO WHILE .NOT. EOF()
	IF Disc1.name='name'
	Flag_F=.T.
ENDIF
SKIP
   	ENDDO

  IF Flag_F=.T.
	  sele Disc1
	  append blank
    repl Name with 'ЕСТЬ'
else 
	  sele Disc1
	  append blank
       repl Name with 'НЕТ'
endif
	_CUROBJ= 6 
В таблице Disc1 присутствует поле name c данными "name"
Только вот при первом нажатии этот код добавляет в таблицу "ЕСТЬ" т.е. реагирует правильно с последующими нажатиями пишет "НЕТ" разве GO TO не должно возвращать курсор на первую запись?
...
Рейтинг: 0 / 0
FoxPro 2.6 запрос в общем
    #37074406
Chek_Fedor
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
читать GO TOP вместо GO TO
...
Рейтинг: 0 / 0
FoxPro 2.6 запрос в общем
    #37074436
Dima T
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Chek_Fedor разве GO TOP не должно возвращать курсор на первую запись?
Должно и возвращает, только в текущей рабочей области. SKIP и EOF() тоже выполняются в текущей рабочей области.
А перейти в нее ты забыл:
Код: plaintext
1.
2.
3.
4.
5.
IF .NOT. USED("Disc1")  
  sele  0  && переход в свободную рабочую область
  use Disc1
else
  sele Disc1
endif

И вот это:
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
Flag_F=.F.
GO TOP
DO WHILE .NOT. EOF()
   IF Disc1.name='name'
	Flag_F=.T.
   ENDIF
   SKIP
ENDDO

IF Flag_F=.T.
...

пишется так:
Код: plaintext
1.
2.
locate for Disc1.name='name'
if found()
...
PS Странная логика какая-то у тебя: ищем в Disc1 name='name' и если есть то еще раз добавляем запись, там случайно "append blank" не лишний?

PPS При установленной настройке среды SET EXACT OFF (оно обычно так и стоит) сравнение строк идет до окончания правой, т.е. сравнение 'nameXXX' = 'name' вернет истину.
...
Рейтинг: 0 / 0
FoxPro 2.6 запрос в общем
    #37074538
Chek_Fedor
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
PS Странная логика какая-то у тебя: ищем в Disc1 name='name' и если есть то еще раз добавляем запись, там случайно "append blank" не лишний?

PPS При установленной настройке среды SET EXACT OFF (оно обычно так и стоит) сравнение строк идет до окончания правой, т.е. сравнение 'nameXXX' = 'name' вернет истину.
Спасибо! Весь приведенный выше код это так... для отладки, на самом деле мне нужно проверить... если берем запись из одной "таблицы1" проверяем если она не входит в "таблицу2" добовляем в "таблицу2" иначе пропускаем.
...
Рейтинг: 0 / 0
FoxPro 2.6 запрос в общем
    #37074868
Chek_Fedor
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Ну опять в "луже"
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
IF .NOT. USED("Disc_S")  
  sele  0  && переход в свободную рабочую область
  use Disc_S
else
  sele Disc_S
endif

GO TOP
scan && перебор всех записей в таблица1

	locate for New_Disc.name=Disc_S.name
	if found()
  	sele New_Disc && тут опять для удобства
   	append blank
   	repl Name with 'ЕСТЬ'

else 
  	sele New_Disc 
   	append blank
   	repl Name with Disc_S.name
endif
endscan
По моей задумке код должен брать 1 запись из Disc_S сравнить с записями из таблицы New_Disc если сходство не найдено то вставить ее в New_Disc из Disc_S иначе перейти к следующей записи из Disc_S и т.д. пока не достигнем последней записи таблицы Disc_S.
scan && тут мы пепербираем поля из таблицы New_Disc или?
или просто прицепить вместо него DO WHILE .NOT. EOF() всеравно не понятно в какой таблице ждем конца записей?
...
Рейтинг: 0 / 0
FoxPro 2.6 запрос в общем
    #37075030
tanglir
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
sele Disc_S &&в конечном итоге окажемся тут
GO TOP
scan && перебор всех записей в Disc_S

	locate for New_Disc.name=Disc_S.name 
&&на пред. строке вы ищете в таблице Disc_S запись, удовл. условию New_Disc.name=Disc_S.name
&&соотв-но скан вполне вероятно накрывается медным тазом
	if found()
&&и если мы нашли в Disc_S эту запись, то добавляем пустую запись в New_Disc
  	sele New_Disc
   	append blank
   	repl Name with 'ЕСТЬ'
else 
&&а если НЕ нашли, то всё равно добавляем пустую запись в New_Disc
&&и зачем, спрашивается?
  	sele New_Disc 
   	append blank
   	repl Name with Disc_S.name
endif
endscan
решение - между сканом и локейтом поставить таки select new_disc
...
Рейтинг: 0 / 0
FoxPro 2.6 запрос в общем
    #37075104
Chek_Fedor
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Спасибо! Огромное!
...
Рейтинг: 0 / 0
FoxPro 2.6 запрос в общем
    #37076005
Chek_Fedor
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Ну эти области...
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
IF .NOT. USED("Disc_s")  
  	sele  0  && переход в свободную рабочую область
  	use Disc_s
   else
  	sele Disc_s
   endif
IF .NOT. USED("New_Disc")  
  	sele  0  && переход в свободную рабочую область
  	use New_Disc
   else
  	sele New_Disc
   endif

GO TOP
scan  && перебор всех записей в New_Disc
      sele Disc_s 
      APPEND BLANK
	repl Name with New_Disc.Name
endscan

есть таблица
[1] [name]
1 34
2 23
3 20
Это, new_disk, открывается т.е. use New_Disc до этого кода и загружается не вся а только та часть которая находится нужна (3 23) я так понял этой части выделена область (sele...) вообщем есть способ перекинуть всю таблицу в Disk_s сейчас копируется только строка №3
...
Рейтинг: 0 / 0
FoxPro 2.6 запрос в общем
    #37076152
tanglir
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Chek_Fedorвообщем есть способ перекинуть всю таблицу в Disk_s сейчас копируется только строка №3Это был вопрос? Тогда ответов несколько:
copy file

copy to

scan+(scatter+gather)+endscan

select into array / insert from array

А в вашем примере скорее всего 1-я таблица уже открыта и указатель стоит на последней записи. Напишите GO TOP перед проверкой использования New_Disc.
...
Рейтинг: 0 / 0
FoxPro 2.6 запрос в общем
    #37076604
Dima T
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Chek_FedorНу эти области...

И не лень тебе методом научного тыка фокс изучать Давно бы книжку качнул и почитал. Время бы свое сэкономил.

Области это основа языка. Все операции с данными привязаны к областям. Сначала переход в нужную область (SELECT ... или сокращенно SELE ...), а потом работа с таблицей (DBF-кой) которая в этой области открыта.
Все команды перемещающие указатель в таблице выполняются в текущей области (USE, APPEND, REPL, LOCATE, SCAN, SEEK)
В 2.x только так, в поздних версиях можно не переключаться указав ключевое слово "IN"

Код немного избыточный:
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
IF .NOT. USED("Disc_s")  
  	sele  0  && переход в свободную рабочую область
  	use Disc_s
   else
  	sele Disc_s && Это лишнее, т.к. дальше sele New_Disc
   endif
IF .NOT. USED("New_Disc")  
  	sele  0  && переход в свободную рабочую область
  	use New_Disc
   else
  	sele New_Disc
   endif

 GO TOP && Это лишнее, т.к. SCAN начинает с первой записи
scan  && перебор всех записей в New_Disc
      sele Disc_s 
      APPEND BLANK
	repl Name with New_Disc.Name
endscan

Chek_Fedorесть таблица
[1] [name]
1 34
2 23
3 20
Это, new_disk, открывается т.е. use New_Disc до этого кода и загружается не вся а только та часть которая находится нужна (3 23) я так понял этой части выделена область (sele...) вообщем есть способ перекинуть всю таблицу в Disk_s сейчас копируется только строка №3
Не совсем понял чего тебе надо, но в коде выше ты переносишь из New_Disc в Disc_s, а как я понимаю тебе надо наоборот.
...
Рейтинг: 0 / 0
FoxPro 2.6 запрос в общем
    #37076689
Chek_Fedor
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Dima TИ не лень тебе методом научного тыка фокс изучать Давно бы книжку качнул и почитал. Время бы свое сэкономил.
.
Есть одна "Программирование в FoxPro для WINDOWS на примерах" долго в ней искал значение ALLT нашел, только не в книге, а интернете. И так со всеми своими, может быть порой глупыми, вопросами.

Код: plaintext
Не совсем понял чего тебе надо, но в коде выше ты переносишь из New_Disc в Disc_s, а как я понимаю тебе надо наоборот
Тут все правильно "Т.З." и пожелания меняются на глазах :-). Выше посоветовали GO TOP поставить... ставил, пробовал во всех местах, от отчаяния, не помогло. Ну да ладно проблема решилась сменой задачи, хотя мне по прежнему интересно.
...
Рейтинг: 0 / 0
FoxPro 2.6 запрос в общем
    #37076748
Dima T
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Chek_FedorDima TИ не лень тебе методом научного тыка фокс изучать Давно бы книжку качнул и почитал. Время бы свое сэкономил.
.
Есть одна "Программирование в FoxPro для WINDOWS на примерах" долго в ней искал значение ALLT нашел, только не в книге, а интернете. И так со всеми своими, может быть порой глупыми, вопросами.
Имена команд/функций можно сокращать до 4-х букв. ALLT - сокращенно ALLTRIM(), русский хэлп на VFP9 там можешь описания функций смотреть. Почти все что в 2.x было работает в 9ке.

По книжкам в форуме поищи. Неплохо написано по FoxPro 2.x автор Попов, по FoxPro 6 - Базиян.
...
Рейтинг: 0 / 0
34 сообщений из 34, показаны все 2 страниц
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / FoxPro 2.6 запрос в общем
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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