разбить dbf файл на несколько / FoxPro, Visual FoxPro

ReSQL.ru

2.0.55

Планшетная версия Контакт Правила FAQ Помощь

Гость

Войти | Профиль | Очистить

Нов. | Гор. | Избр.

Написать

Автор*:

Ввести пароль для входа

Тема*:

Сообщение

Данное сообщение тематическое

Сообщение содержит картинки или видео 18+

Автор:

ВНИМАНИЕ! На данном подфоруме действуют строгие правила. Удостоверьтесь, что ваше сообщение соответствует им!

Форум или тема закрыты для гостей. Необходима авторизация!

Загрузить последнюю сохраненную версию

Вставить как галерею

Максимальный размер вложений: 4,0 МБ, аудио/видео: 8,0 МБ. Картинки большего размера ужимаются, если возможно.

Введите код, изображенный на картинке. Если код нечитаемый, кликните картинку, чтобы загрузить другой вариант.

Отправляя сообщение, я выражаю свое согласие с правилами форума и принимаю пользовательское соглашение.

Действия ...

Доб. в избранное
Игнор. тему
Прикреп. тему
Пометить прочит. / непрочит.
Фильтр:
Сообщения автора темы
Сообщение содержит вложения
Сообщение содержит картинки
Сообщение содержит видеоклипы
Сообщение содержит аудиоклипы
Сообщение содержит картинки или видео 18+

Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / разбить dbf файл на несколько / 9 сообщений из 9, страница 1 из 1

02.08.2009, 16:28

#36122100

ralero

Гость

разбить dbf файл на несколько

Подскажите, пожалуйста,каким образом с помощью Visual FoxPro 9.0 разбить dbf файл на несколько dbf файлов. Например, в dbf файле 300 000 строк, мне нужно сохранить первые 60 000 строк в новый dbf файл

...

Рейтинг:

0 / 0

| Ответить | Цитировать | Написать

02.08.2009, 16:47

#36122106

Burn

Участник

Откуда: Днепропетровск, Украина
Сообщения: 1 194
Рейтинг: 0 / 0

разбить dbf файл на несколько

GO top
COPY TO new_table NEXT 60000

А ваще - курите мануалы они рулез

...

Рейтинг:

0 / 0

| Ответить | Цитировать | Написать

02.08.2009, 16:54

#36122109

ralero

Гость

разбить dbf файл на несколько

BurnGO top
COPY TO new_table NEXT 60000

А ваще - курите мануалы они рулез

спасибо большое! я просто не работаю в foxpro. Извините, вы не могли бы еще сказать где нужно исполнить этот запрос. я не могу найти к сожаленью

...

Рейтинг:

0 / 0

| Ответить | Цитировать | Написать

02.08.2009, 17:03

#36122111

ralero

Гость

разбить dbf файл на несколько

raleroBurnGO top
COPY TO new_table NEXT 60000

А ваще - курите мануалы они рулез

спасибо большое! я просто не работаю в foxpro. Извините, вы не могли бы еще сказать где нужно исполнить этот запрос. я не могу найти к сожаленью

Спасибо большое! в Command window.

А если нужно выбрать следующие 60000 тысяч записей? ( т.е. с 60001 по 120 000)

...

Рейтинг:

0 / 0

| Ответить | Цитировать | Написать

02.08.2009, 20:35

#36122210

tanglir

Участник

Сообщения: 30 379
Рейтинг: 0 / 0

разбить dbf файл на несколько

ralero,
ну организуйте цикл

Код: plaintext

1.
2.
3.

go top
for ii= 1  to (reccount() div  60000 )+ 1 
  COPY TO new_table_name(ii) NEXT  60000 
endfor

Только не помню, не надо ли будет вручную переходить (командой skip 60000) на (60000i+1)-ю запись после копирования.

...

Рейтинг:

0 / 0

| Ответить | Цитировать | Написать

02.08.2009, 23:19

#36122320

Sergey Ch

Участник

Откуда: Благовещенск
Сообщения: 6 775
Рейтинг: 0 / 0

разбить dbf файл на несколько

Надо бы советовать что-то посовременний, типа SELECT INTO...

...

Рейтинг:

0 / 0

| Ответить | Цитировать | Написать

03.08.2009, 21:01

#36124152

tanglir

Участник

Сообщения: 30 379
Рейтинг: 0 / 0

разбить dbf файл на несколько

Sergey ChНадо бы советовать что-то посовременний, типа SELECT INTO...
Просветите, как с помощью sql-select в фоксе брать по N записей по порядку (по условию ТС, в общем). Не писать же where between(recno(),ii*N+1,(ii+1)*N) - это КМК куда тормознее будет.
ЗЫ. в copy to можно сразу указать кодировку, формат и т.п.

...

Рейтинг:

0 / 0

| Ответить | Цитировать | Написать

04.08.2009, 16:40

#36126070

Tohan_ORA

Гость

разбить dbf файл на несколько

Код: plaintext

1.
2.
3.
4.

v_cnt= 60000 
select 'MyTable'
for i= 1  to CEILING(reccount('MyTable')/v_cnt)
	copy to 't_'+LTRIM(str(i)) for between(recno(),(i- 1 )*v_cnt+ 1 ,i*v_cnt)
endfor

...

Рейтинг:

0 / 0

| Ответить | Цитировать | Написать

04.08.2009, 16:59

#36126129

tanglir

Участник

Сообщения: 30 379
Рейтинг: 0 / 0

разбить dbf файл на несколько

Tohan_ORA,
TanglirНе писать же where between(recno(),ii*N+1,(ii+1)*N) - это КМК куда тормознее будет. Неужели так быстрее будет? Ведь придётся всю таблицу сканить на предмет битвина, а NEXT N возьмёт записей по порядку сколько надо и остановится.

...

Рейтинг:

0 / 0

| Ответить | Цитировать | Написать

Читали тему (0):

Читали форум (0):

Пользователи онлайн (0):

start [/forum/topic.php?fid=41&mobile=1&tid=1586178]:	0ms
get settings:	8ms
get forum list:	12ms
check forum access:	3ms
check topic access:	3ms
track hit:	28ms
get topic data:	10ms
get forum data:	2ms
get page messages:	45ms
get tp. blocked users:	1ms
others:	327ms

total:	439ms