С Новым годом! Форум программистов, компьютерный форум, киберфорум
Delphi: Базы данных
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
 
Рейтинг 5.00/19: Рейтинг темы: голосов - 19, средняя оценка - 5.00
 Аватар для shilovec5377
33 / 58 / 13
Регистрация: 26.05.2011
Сообщений: 756

Занести данные в другую таблицу

12.12.2011, 13:25. Показов 3687. Ответов 33
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
привет всем.
у меня такой вопрос????????????
у меня в таблице есть два поля: 1 (дата возврата) и 2 (фактическая дата возврата).
можно ли занести данные из этой таблицы в другую.
мне необходимо если (фактическая дата возврата) больше (дата возврата) то записи занести в другую таблицу.
Подскажите пж как это можно сделать.
0
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
12.12.2011, 13:25
Ответы с готовыми решениями:

Как выделенную строку таблицы занести в другую таблицу?
На форме1 есть таблица базы данных: товар и цена. нужно как то сделать, чтоб при нажатии на кнопку данные из выделеной строки заносились в...

Посчитать количество в одной таблице и занести данные в другую SQL запросом
Как написать этот запрос? Update book set kol=Kol Where id in (select count(status) from inv_nomer where status='В наличии')

По нажатию кнопки перенести данные в другую таблицу
Имеется форма с двумя таблицами DBGRID(использовала ACCESS). Как по нажатию на кнопку перенести выделенную запись с одной таблицы на...

33
4217 / 3059 / 583
Регистрация: 21.01.2011
Сообщений: 13,203
12.12.2011, 13:45
Зависит от твоей СУБД. Чаще всего такие вещи делают с пом. триггеров (разумеется, если СУБД их поддерживает)
1
 Аватар для shilovec5377
33 / 58 / 13
Регистрация: 26.05.2011
Сообщений: 756
12.12.2011, 14:21  [ТС]
у меня она на ACCEESS 2010.
0
1263 / 706 / 62
Регистрация: 21.12.2009
Сообщений: 2,256
12.12.2011, 14:39
shilovec5377, Объясните, ради бога, для чего это надо. У вас есть таблица и в записях этой таблицы, насколько можно понять, содержится информация о нормативной и фактической дате возврата. По этой информации всегда можно сделать запрос (или въюшку) и получить набор в соответствии с сформулированным условием. Хранить это зачем, это жн просто мусор!
1
 Аватар для shilovec5377
33 / 58 / 13
Регистрация: 26.05.2011
Сообщений: 756
12.12.2011, 14:45  [ТС]
у меня просто база данных "БИБЛИОТЕКА" и мне необходимо если человек сдал книгу позже, то занести его в таблицу задолжники.


Помоги пж.
0
1263 / 706 / 62
Регистрация: 21.12.2009
Сообщений: 2,256
12.12.2011, 14:55
Цитата Сообщение от shilovec5377 Посмотреть сообщение
необходимо если человек сдал книгу позже, то занести его в таблицу задолжники
Вот об этом и писал, уже есть инфа, по которой можно вычислить задолженников. Если истек срок давности прегрешения читателя, то нужно хранить признак об этом. Вот некто икс задолженник, следовательно, негодяй и книг ему не давать. Но он покаялся, сдедал для библиотеки доброе дело, ставим ему признак: "игнорировать" эту запись о прегрешении читателя. Ну, это же просто, наморщи слегка мозг!
0
 Аватар для shilovec5377
33 / 58 / 13
Регистрация: 26.05.2011
Сообщений: 756
12.12.2011, 15:02  [ТС]
я пробовал переменой присваивать поле DBGrida:
Delphi
1
2
3
4
s:=DBGrid1.Columns[1];
ss:=DBGrid1.Columns[2];
 begin
  if ss>s then
но у вы, нет получаеться.
0
1263 / 706 / 62
Регистрация: 21.12.2009
Сообщений: 2,256
12.12.2011, 15:22
Цитата Сообщение от shilovec5377 Посмотреть сообщение
я пробовал переменой присваивать поле DBGrida
Но, это же - чешуя 100- процентная. Вы бы умные книжечки про SQL почитали! Вы действительно полагаете, что все на свете можно взять каваллерийской атакой. О чем здесь можно говорить!
0
 Аватар для shilovec5377
33 / 58 / 13
Регистрация: 26.05.2011
Сообщений: 756
12.12.2011, 20:51  [ТС]
sql-запрос, то я напишу. просто я не понимаю как или с чего начать.

Добавлено через 5 часов 25 минут
пробую писать вот такой запрос:
Delphi
1
2
3
4
5
6
7
8
9
procedure TForm1.Button2Click(Sender: TObject);
begin
Form2.ADOQuery1.Close;
Form2.ADOQuery1.SQL.Clear;
Form2.ADOQuery1.SQL.Add('SELECT перенос.[Код], перенос.[дата возврата], перенос.[фактическая дата возврата] '+
'FROM перенос where ("фактическая дата возврата> дата возврата")');
Form2.ADOQuery1.Open;
end;
end.
но выводит во вторую таблицу все даты.
0
 Аватар для shilovec5377
33 / 58 / 13
Регистрация: 26.05.2011
Сообщений: 756
14.12.2011, 22:45  [ТС]
помогите люди добрые.
очень срочно нужно.
объесните пж почему выводит все даты?

Добавлено через 9 часов 28 минут
пробую писать вот такой запрос:
Delphi
1
2
3
4
5
6
7
8
9
 procedure TForm1.Button2Click(Sender: TObject);
 begin
 Form2.ADOQuery1.Close;
 Form2.ADOQuery1.SQL.Clear;
 Form2.ADOQuery1.SQL.Add('SELECT перенос.[Код], перенос.[дата возврата], перенос.[фактическая дата возврата] '+
 'FROM перенос where ("фактическая дата возврата> дата возврата")');
 Form2.ADOQuery1.Open;
 end;
 end.
но выводит во вторую таблицу все даты.
0
 Аватар для shilovec5377
33 / 58 / 13
Регистрация: 26.05.2011
Сообщений: 756
17.12.2011, 12:46  [ТС]
Пишу следующее условие:
Delphi
1
2
3
4
5
6
7
8
9
 procedure TForm1.Button2Click(Sender: TObject);
 begin
 Form2.ADOQuery1.Close;
 Form2.ADOQuery1.SQL.Clear;
 Form2.ADOQuery1.SQL.Add('SELECT перенос.[Код], перенос.[дата возврата], перенос.[фактическая дата возврата] '+
 'FROM перенос where ("фактическая дата возврата> дата возврата")');
 Form2.ADOQuery1.Open;
 end;
 end.
но переносит все даты
0
 Аватар для albor
504 / 106 / 16
Регистрация: 01.12.2011
Сообщений: 399
17.12.2011, 13:51
Самого переноса Вы вообще нам не показали. Только открытие таблицы..
1
 Аватар для shilovec5377
33 / 58 / 13
Регистрация: 26.05.2011
Сообщений: 756
17.12.2011, 20:35  [ТС]
при нажатии на эту кнопку все данные переносяться в другую таблицу на 2-й форме

Добавлено через 7 минут
эта кнопка находится на первой форме
0
 Аватар для albor
504 / 106 / 16
Регистрация: 01.12.2011
Сообщений: 399
17.12.2011, 20:47
Цитата Сообщение от shilovec5377 Посмотреть сообщение
при нажатии на эту кнопку все данные переносяться в другую таблицу на 2-й форме..
При нажатии на кнопку выполняется процедура состоящая из четырех строк.
В какой именно строке происходит копирование или перенос данных в другую таблицу?
1
 Аватар для shilovec5377
33 / 58 / 13
Регистрация: 26.05.2011
Сообщений: 756
18.12.2011, 00:59  [ТС]
В какой именно строке происходит копирование или перенос данных в другую таблицу?
Delphi
1
2
3
 Form2.ADOQuery1.SQL.Add('SELECT перенос.[Код], перенос.[дата возврата], перенос.[фактическая дата возврата] '+
 'FROM перенос where ("фактическая дата возврата> дата возврата")');
 Form2.ADOQuery1.Open;
0
 Аватар для albor
504 / 106 / 16
Регистрация: 01.12.2011
Сообщений: 399
18.12.2011, 10:47
Цитата Сообщение от shilovec5377 Посмотреть сообщение
Form2.ADOQuery1.SQL.Add('SELECT перенос.[Код], перенос.[дата возврата], перенос.[фактическая дата возврата] '+
'FROM перенос where ("фактическая дата возврата> дата возврата")');
Form2.ADOQuery1.Open;
Ууууууу.. Вы действительно считаете, что инструкция SELECT * FROM выполняет перенос данных в базе?

О_о
1
 Аватар для rdama
569 / 292 / 12
Регистрация: 28.01.2011
Сообщений: 1,326
18.12.2011, 14:08
Ушел туда
Дорогой ТС что делает ваш код?
Во всяком случае тот что вы выложили?
Вы пожалуйста сами разберитесь. Чтоб не казаться...
Ну или есть вероятность что это не ваш код...
Ну тогда тем более потрудитесь понять что он делает.
1
 Аватар для shilovec5377
33 / 58 / 13
Регистрация: 26.05.2011
Сообщений: 756
18.12.2011, 22:24  [ТС]
так помогите пж или подскажите как это сделать.
0
 Аватар для albor
504 / 106 / 16
Регистрация: 01.12.2011
Сообщений: 399
18.12.2011, 22:38
Цитата Сообщение от shilovec5377 Посмотреть сообщение
так помогите пж или подскажите как это сделать.
Вы нарисовали кусочек программы в которой открывается какая-то таблица.
Как данные в нее были записаны совершенно непонятно.
Почему Ваше условие работает не так как Вы хотите? - А фиг его знает.

Покажите как Вы переносили туда данные. Тогда можно что-то сказать..
1
 Аватар для shilovec5377
33 / 58 / 13
Регистрация: 26.05.2011
Сообщений: 756
18.12.2011, 23:21  [ТС]
Вот моя прога. Это просто проба перенести таблицу.

при нажатии кнопки перенести, переносяться все данные.
если не нажимать, то данные не переносяться.
Вложения
Тип файла: rar перенос таблицы.rar (387.9 Кб, 16 просмотров)
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
18.12.2011, 23:21
Помогаю со студенческими работами здесь

Скопировать id с одной таблицы на другую таблицу другую форму
Добрый день! Подскажите, как и где написать,чтобы id с одной таблицы скопировался в другую таблицу (связанную), или в запросе надо...

Занести в таблицу
С кодом unit Unit9; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs,...

Не могу занести оценку в таблицу
у меня программа тестирования, в конце теста выводится это сообщение. Showmessage('Тест завершен'+#13+'Ваша оценка:'+inttostr(ball) ...

Занести в таблицу значения с TEdit
Помогите пожалкуста Надо по нажатию кнопки "да", соедениться с mysql, и занести значения в базу данных Одно поле - в один столбик,...

Как занести в таблицу результат запроса?
Можно ли результат запроса, выполненный на SQL при помощи компонента Query, занести в отдельную таблицу?? Таблицы по запросы и конечная...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
20
Ответ Создать тему
Новые блоги и статьи
Изучаю kubernetes
lagorue 13.01.2026
А пригодятся-ли мне знания kubernetes в России?
Сукцессия микоризы: основная теория в виде двух уравнений.
anaschu 11.01.2026
https:/ / rutube. ru/ video/ 7a537f578d808e67a3c6fd818a44a5c4/
WordPad для Windows 11
Jel 10.01.2026
WordPad для Windows 11 — это приложение, которое восстанавливает классический текстовый редактор WordPad в операционной системе Windows 11. После того как Microsoft исключила WordPad из. . .
Classic Notepad for Windows 11
Jel 10.01.2026
Old Classic Notepad for Windows 11 Приложение для Windows 11, позволяющее пользователям вернуть классическую версию текстового редактора «Блокнот» из Windows 10. Программа предоставляет более. . .
Почему дизайн решает?
Neotwalker 09.01.2026
В современном мире, где конкуренция за внимание потребителя достигла пика, дизайн становится мощным инструментом для успеха бренда. Это не просто красивый внешний вид продукта или сайта — это. . .
Модель микоризы: классовый агентный подход 3
anaschu 06.01.2026
aa0a7f55b50dd51c5ec569d2d10c54f6/ O1rJuneU_ls https:/ / vkvideo. ru/ video-115721503_456239114
Owen Logic: О недопустимости использования связки «аналоговый ПИД» + RegKZR
ФедосеевПавел 06.01.2026
Owen Logic: О недопустимости использования связки «аналоговый ПИД» + RegKZR ВВЕДЕНИЕ Введу сокращения: аналоговый ПИД — ПИД регулятор с управляющим выходом в виде числа в диапазоне от 0% до. . .
Модель микоризы: классовый агентный подход 2
anaschu 06.01.2026
репозиторий https:/ / github. com/ shumilovas/ fungi ветка по-частям. коммит Create переделка под биомассу. txt вход sc, но sm считается внутри мицелия. кстати, обьем тоже должен там считаться. . . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru