powered by simpleCommunicator - 2.0.53     © 2025 Programmizd 02
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Дополнение данных в таблицу
16 сообщений из 16, страница 1 из 1
Дополнение данных в таблицу
    #36966285
dima_18
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Здравствуйте всем!

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

Есть таблица с 2 столбцами (id,name)- заполненная. Есть другая таблица также с такими же двумя столбцами (id,name). Первая таблица заполнена данными, нужно данные из первой таблицы добавить во вторую.

Спасибо большое заранее!
...
Рейтинг: 0 / 0
Дополнение данных в таблицу
    #36966288
dima_18Здравствуйте всем!

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

Есть таблица с 2 столбцами (id,name)- заполненная. Есть другая таблица также с такими же двумя столбцами (id,name). Первая таблица заполнена данными, нужно данные из первой таблицы добавить во вторую.

Спасибо большое заранее!
Код: plaintext
1.
select таблица2 
append from таблица1 

Код: plaintext
insert into таблица2 select * from таблица1 
Достаточно, а то есть еще варианты.
...
Рейтинг: 0 / 0
Дополнение данных в таблицу
    #36969843
dima_18
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
большое спасибо, проходящий!

все получилось что я думал пока лишнего ничего не надо!
...
Рейтинг: 0 / 0
Дополнение данных в таблицу
    #36976811
Shuva
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
проходящий.,
подскажите, как к пустой таблице itog.dbf добавлять данные из нескольких таблиц с такой - же структурой, но с постоянно меняющимися именами. например сегодня добавляем kplzav20101124.dbf, kpltum20101124.dbf, kplish20101124.dbf и.т.д, а завтра kplzav20101125.dbf, kpltum20101125.dbf, kplish20101125.dbf.
У всех таблиц общее только первые 3 буквы, а остальное всегда разное.
...
Рейтинг: 0 / 0
Дополнение данных в таблицу
    #36976829
Shuva,
элементарно!

Набросок на коленке, не проверял.

Код: plaintext
1.
2.
3.
4.
5.
6.
Use itog
For i =  1  to ADir(arDbfs, 'kpl???'+Dtos(Date()- 1 ))
	Append From arDbfs[ 1 ]
	* или  
	Insert into itog select * from arDbfs[ 1 ]
Next
brow
...
Рейтинг: 0 / 0
Дополнение данных в таблицу
    #36977011
Shuva
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
проходящий.,
Благодарю, проба выдала ошибку: nesting error
на строке
For i = 1 to ADir(arDbfs, 'kpl???'+Dtos(Date()-1))
после игнорирования ошибки выдала второе сообщение об ошибке:File 'arDbfs.prg' does not exist
на строке
Append From arDbfs[1]
и выдала пустую таблицу itog,
В чём здесь ошибка?....
...
Рейтинг: 0 / 0
Дополнение данных в таблицу
    #36977057
Shuva
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
проходящий.,

Что за ошибка вложения?
DECLARE arDbfs[1]
Use itog
For i = 1 to ADir(arDbfs,'kpl???'+Dtos(Date()-1))
Append From array arDbfs[1]
brow
...
Рейтинг: 0 / 0
Дополнение данных в таблицу
    #36977101
Shuva,
замени на строку
Код: plaintext
For i =  1  to ADir(arDbfs, 'kpl???'+Dtos(Date()- 1 )+'.dbf')
Объявлять массив совершенно необязательно. Он все равно заново создается.
...
Рейтинг: 0 / 0
Дополнение данных в таблицу
    #36977122
Фотография AndreTM
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Может, у вас Фокс не воспринимает aDir после FOR?
И еще - почему не исправили arDbfs[ 1 ]?
Что выдает код:
Код: plaintext
1.
2.
3.
4.
5.
Use itog
=aDir(arDbfs, 'kpl???'+Dtos(Date()- 1 )+'.dbf')
For i =  1  to aLen(arDbfs, 1 )
    Append From arDbfs(i, 1 )
Next
brow
?
...
Рейтинг: 0 / 0
Дополнение данных в таблицу
    #36977157
Юристишко-выпускник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Append From (lcFileName)
...
Рейтинг: 0 / 0
Дополнение данных в таблицу
    #36977176
Народ, а самим подправить косяки никак? Надо только готовый рабочий код давать?
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
Use itog
For i =  1  to ADir(arDbfs, 'kpl???'+Dtos(Date()- 1 )+'.dbf')
	?arDbfs[i, 1 ]
	Append From (arDbfs[i, 1 ])
	* или
	Insert into itog select * from (arDbfs[i, 1 ])
Next
brow
...
Рейтинг: 0 / 0
Дополнение данных в таблицу
    #36977290
Фотография AndreTM
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Не, ну про выражения имени мы помним.
Я просто уже когда запостил - только обратил внимание ещё и на это.
Ну и надо же дать и ТС поразбираться с кодом...
...
Рейтинг: 0 / 0
Дополнение данных в таблицу
    #36978763
Shuva
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
проходящий.,

Спасибо, сейчас ошибки на вложение не выдаёт, но и не добавляет, база itog.dbf пустая
Толи массив не перебирается...
Use itog
For i = 1 to ADir(arDbfs, 'kpl*'+Dtos(Date()-1)+'.dbf')
?arDbfs[i,1]
Append From (arDbfs[i,1])
Next
brow
...
Рейтинг: 0 / 0
Дополнение данных в таблицу
    #36978784
Shuva,
если массив не перебирается, значит он пустой. Вы в каком каталоге запускаете? А в нем есть нужные файлы? Или я еще и должен отгадать путь к Вашим файлам? Может таки сами что-то предпримете?
...
Рейтинг: 0 / 0
Дополнение данных в таблицу
    #36980485
Фотография AndreTM
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
ShuvaFor i = 1 to ADir(arDbfs, 'kpl * '+Dtos(Date()-1)+'.dbf')
А зачем менять шаблон было?
Вы в курсе, что '*' означает "любое количество символов", поэтому остальная часть строки бессмысленна?
...
Рейтинг: 0 / 0
Дополнение данных в таблицу
    #36982484
Shuva
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
проходящий.,

Ура! Все 6 таблиц сложились, просто я уменьшил имена таблиц до 8 символов, оставил первые kp*.
Спасибо, друзья за помощь! Не приходилось мне раньше работать с массивами.
...
Рейтинг: 0 / 0
16 сообщений из 16, страница 1 из 1
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Дополнение данных в таблицу
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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