Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Помогите!!!!!! Просто зашиваюсь! / 5 сообщений из 5, страница 1 из 1
13.05.2004, 12:24
    #32516069
paule
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Помогите!!!!!! Просто зашиваюсь!
ПОмогите плизз..

Необходимо на фоксе 2.5 сделать прогу, которая из таблицы V в таблицу C перебросит данные. В обоих таблицах есть поля fio и account.
Так вот необходимо из таблицы С перебросить значение account в таблицу V, в строку где fio совпадают.

Помогите. Блин хелпа по фоксу нет, на другом это сделать не могу так как драйверов нет!!!!

Напишите код ..
С фоксом не работал раньше!!!!!!


Плиииззз.
А необходимо в течении часа это сделать!!!!!!!!!
...
Рейтинг: 0 / 0
13.05.2004, 12:43
    #32516120
Urri
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Помогите!!!!!! Просто зашиваюсь!
Примерно так можно

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
set exact on
use v in  0  alias vt
use c in  0  alias ct
select vt
index on fio to fio.idx
select ct
set relation to fio into vt
scan for !empty(fio) and found('vt') and ct.account <> vt.account
  replace account with vt.account
endscan
close data
erase fio.idx

Пиво по факсу ;-)
...
Рейтинг: 0 / 0
13.05.2004, 13:13
    #32516186
paule
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Помогите!!!!!! Просто зашиваюсь!
Нет наврал я, в таблице V поля соответственно name и lizchet

Как в этом то случае, что поменять.
И без команды scan можно это сделать както
В таблице, куда вставлять надо, уже у некоторых есть лицевые, и их трогать не надо, а у тех кого нет - вставить.
А прога наоборот, удаляет у тех у кого есть, и вставляет тем у кого нет!
...
Рейтинг: 0 / 0
13.05.2004, 13:14
    #32516191
paule
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Помогите!!!!!! Просто зашиваюсь!
Ток не бросайте меня, люди добрые! :(((
...
Рейтинг: 0 / 0
13.05.2004, 14:17
    #32516321
Urri
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Помогите!!!!!! Просто зашиваюсь!
Да, предполагается, что у name длина та же, что и у fio!!!

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
set exact on
use v in  0  alias vt
use c in  0  alias ct
nlen = len(ct.fio)
select vt
index on padr(name,nlen) to fio.idx
select ct
set relation to fio into vt
scan for !empty(fio) and found('vt') and ct.account <> vt.lizchet and empty(ct.account)
  replace account with vt.lizchet
endscan
close data
erase fio.idx

Без scan'а, можно, но думать надо.
Help update, например. (В fp 2.5 update не имеет отношения к sql.)
...
Рейтинг: 0 / 0
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Помогите!!!!!! Просто зашиваюсь! / 5 сообщений из 5, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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