ADO

@viktooor · Регистрация: 08.06.2010

Студворк — интернет-сервис помощи студентам

Есть две таблицы
Из одной переношу записи во вторую.
Имеется 20 полей.
После загрузки новые данные появляются только после перегрузки программы.
Это очень неудобно. Как решить эту проблему.

@Башир · 19.07.2010, 08:59

надо обновить запрос.

Delphi
1
2
ADOQuery1.Close;
ADOQuery1.Open;

Типа такого надо поставить в программе где знаешь что на сервере поменялись данные.

@SAMZ · 19.07.2010, 09:00

1. Какую СУБД используете?
2. Если это клиент - мерверная СУБД, то как у Вас организована работа с транзакциями

@viktooor · 19.07.2010, 09:07 **[ТС]**

Access
C ADoQuery пробовал эффект тот же самый

@Mad_Dog · 19.07.2010, 10:41

viktooor, не плохо бы код посмотреть, где идет перенос данных из таблицы в таблицу.

@viktooor · 19.07.2010, 11:18 **[ТС]**

Delphi
1
2
3
frArhivZajvok.ADODataset1.Close;
frArhivZajvok.ADODataset1.CommandText := 'INSERT INTO ArhivZajvka SELECT * From  Zajvka Where  код  like''%'+ Label34.Caption +'%''';
frArhivZajvok.ADODataset1.Open;

@SAMZ · 19.07.2010, 11:48

Вообще в хелпе к АДО написано

Use the TADODataSet component's CommandText property to retrieve the dataset, specifying either a table name or an SQL statement (SELECT only). TADODataSet is not capable of issuing Data Manipulation Language (DML) SQL statements that do not return result sets (like DELETE, INSERT, and UPDATE). For this use a component like TADOCommand or TADOQuery.

Насколько я могу понять TADODataSet для инскрта использовать не надо

@viktooor · 21.07.2010, 11:19 **[ТС]**

Сделал ADOCommand, работает
Но появился новый вопрос
Выбор у меня идет по № счетчика
Интересно ,например 190 работает, 1 пишет
"Размер поля недостаточен, чтобы принять добавленные данные . Попробуйте вставить меньшее количество данных"
Добавляю по одной записи

@SAMZ · 21.07.2010, 11:28

viktooor, Чтобы ответить Вам нужно быть экстрасенсом. Что за 190, который работает и что за 1, который пишет. Представьте описание таблицы, в которую вставляете данные, тосное рписание SQL вставки и какие зарписи вставлялись. Без этого как-то трудно понять, что Вы делаете

@viktooor · 21.07.2010, 11:45 **[ТС]**

frZajvka.ADOCommand1.CommandText := 'INSERT INTO ArhivZajvka SELECT * From Zajvka Where код like''%'+ Label34.Caption +'%''';
ADOCommand1.Execute;

frArhivZajvok.ADODataset1.Close;
frArhivZajvok.ADODataset1.Open;

Выбор идет по коду
Например
Код = 190 или подобное , а если код = 1 , то появляется сообщение.
Интересно если код =102 опять сообщение,
а при код= 101 то все проходит.
Прошу прощение за корявое изложение

@SAMZ · 21.07.2010, 12:51

Вам надо убедиться в том, что типы и длины полей в Zajvka совпадают с типом и длиной полей в ArhivZajvka. Если эти атрибуты в таблицах разнятся, то это может быть источником проблем

@viktooor · 21.07.2010, 13:48 **[ТС]**

Код -целое в дух таблицах
Сейчас попробовал с кодом= 35 все прошло,
а с кодом=1 опять сообщение

@SAMZ · 21.07.2010, 13:58

Вы из одной таблицы переносите в другую ВСЕ поля, а не иолько код.

Сообщение от viktooor

Код -целое в дух таблицах

Вы из одной таблицы переносите в другую ВСЕ поля, а не иолько код. У Вас в select стоит *

@viktooor · 21.07.2010, 14:02 **[ТС]**

Да все поля, но выбор идет по коду

@SAMZ · 21.07.2010, 14:14

viktooor, выбор по коду, это разговор ни о чем. Я спрашиваю о структуре данных. Ну, пусть в одной таблице поле описано как varchar(10), а во второй как varchar(20). Вы переносите данные из varchar(20) в varchar(10). Если при этом в varchar(20) реально строка не более 10 символов, то при переносе все будет Ok. Если нет, то получите иключение. Я Вам про структуры данных в таблицах "источник" - "приемник", а Вы про одинаковость кодов.

@viktooor · 21.07.2010, 14:36 **[ТС]**

А как это проверить
Таблицу соpдавал в Accese 2007

@SAMZ · 21.07.2010, 14:44

Сообщение от viktooor

А как это проверить
Таблицу соpдавал в Accese 2007

Так, если ты ее создавал, ты и должен знать. Я к Accese правду сказать близко не подхожу.

@viktooor · 21.07.2010, 15:34 **[ТС]**

А какая база лучше
Была статья о Access там было написано об этом случае( ошибка довольно частая-проделки Макрософта,
чтобы покупали новые версии) - что видел то и говорю.
Может мне перейти на другую базу , если да , то с чем я столкнусь ,посоветуйте

@SAMZ · 21.07.2010, 17:19

Сообщение от viktooor

А какая база лучше

Что-то не сработало. Мне казалось, что я на это ответил.
Лучше - хуже - вещь субъективная. Промышленных серверов БД немало. В определенной степени это зависит от того, на какие задачи Вы нацелены. Я свои проекты в основном реализую посредством СУБД FireBird и в качестве библиотеки доступа использую FIBPlus. Размер БД, с которыми работаю, несколько Гб. Выбором доволен.

@viktooor · 21.07.2010, 18:18 **[ТС]**

Спасибо за помощь

Новые блоги и статьи Все статьи Все блоги /
Отправка уведомления на почту при изменении наименования справочника Maks 24.03.2026 Программная отправка письма электронной почты на примере изменения наименования типового справочника "Склады" в конфигурации БП3. Перед реализацией необходимо выполнить настройку системной учетной. . .	модель ЗдравоСохранения 5. Меньше увольнений- больше дохода! anaschu 24.03.2026 Теперь система здравосохранения уменьшает количество увольнений. 9TO2GP2bpX4 a42b81fb172ffc12ca589c7898261ccb/ https:/ / rutube. ru/ video/ a42b81fb172ffc12ca589c7898261ccb/ Слева синяя линия -. . .	Midnight Chicago Blues kumehtar 24.03.2026 Такой Midnight Chicago Blues, знаешь?. . Когда вечерние улицы становятся ночными, а ты не можешь уснуть. Ты идёшь в любимый старый бар, и бармен наливает тебе виски. Ты смотришь на пролетающие. . .	Контроль уникальности заводского номера - вариант №2 Maks 24.03.2026 В отличие от предыдущего варианта добавлено прерывание циклов, также добавлены новые переменные для сохранения контекста ошибки перед прерыванием цикла: Процедура ПередЗаписью(Отказ, РежимЗаписи,. . .
SDL3 для Desktop (MinGW): Вывод текста со шрифтом TTF с помощью библиотеки SDL3_ttf на Си и C++ 8Observer8 24.03.2026 Содержание блога Финальные проекты на Си и на C++: finish-text-sdl3-c. zip finish-text-sdl3-cpp. zip	Жизнь в неопределённости kumehtar 23.03.2026 Жизнь — это постоянное существование в неопределённости. Например, даже если у тебя есть список дел, невозможно дойти до точки, где всё окончательно завершено и больше ничего не осталось. В принципе,. . .	Модель здравоСохранения: работники работают быстрее после её введения. anaschu 23.03.2026 geJalZw1fLo Корпорация до введения программа здравоохранения имела много невыполненных работниками заданий, после введения программы количество заданий выросло. Но на выплатах по больничным это. . .	Контроль уникальности заводского номера - вариант №1 Maks 23.03.2026 Алгоритм контроля уникальности заводского (или серийного) номера на примере нетипового документа выдачи шин для спецтехники с табличной частью, разработанного в конфигурации КА2. Данные берутся из. . .

@viktooor 2 / 2 / 0 Регистрация: 08.06.2010 Сообщений: 72

	ADO 19.07.2010, 08:52. Показов 2465. Ответов 19 Метки нет (Все метки) Есть две таблицы Из одной переношу записи во вторую. Имеется 20 полей. После загрузки новые данные появляются только после перегрузки программы. Это очень неудобно. Как решить эту проблему. 0

@SAMZ 1263 / 706 / 62 Регистрация: 21.12.2009 Сообщений: 2,256
	19.07.2010, 09:00
	1. Какую СУБД используете? 2. Если это клиент - мерверная СУБД, то как у Вас организована работа с транзакциями 0

@viktooor 2 / 2 / 0 Регистрация: 08.06.2010 Сообщений: 72
	19.07.2010, 09:07 [ТС]
	Access C ADoQuery пробовал эффект тот же самый 0

@Mad_Dog Фрилансер 452 / 433 / 117 Регистрация: 01.06.2010 Сообщений: 1,314
	19.07.2010, 10:41
	viktooor, не плохо бы код посмотреть, где идет перенос данных из таблицы в таблицу. 0

@SAMZ 1263 / 706 / 62 Регистрация: 21.12.2009 Сообщений: 2,256
	19.07.2010, 11:48
	Вообще в хелпе к АДО написано Use the TADODataSet component's CommandText property to retrieve the dataset, specifying either a table name or an SQL statement (SELECT only). TADODataSet is not capable of issuing Data Manipulation Language (DML) SQL statements that do not return result sets (like DELETE, INSERT, and UPDATE). For this use a component like TADOCommand or TADOQuery. Насколько я могу понять TADODataSet для инскрта использовать не надо 0

@viktooor 2 / 2 / 0 Регистрация: 08.06.2010 Сообщений: 72
	21.07.2010, 11:19 [ТС]
	Сделал ADOCommand, работает Но появился новый вопрос Выбор у меня идет по № счетчика Интересно ,например 190 работает, 1 пишет "Размер поля недостаточен, чтобы принять добавленные данные . Попробуйте вставить меньшее количество данных" Добавляю по одной записи 0

@SAMZ 1263 / 706 / 62 Регистрация: 21.12.2009 Сообщений: 2,256
	21.07.2010, 11:28
	viktooor, Чтобы ответить Вам нужно быть экстрасенсом. Что за 190, который работает и что за 1, который пишет. Представьте описание таблицы, в которую вставляете данные, тосное рписание SQL вставки и какие зарписи вставлялись. Без этого как-то трудно понять, что Вы делаете 0

@viktooor 2 / 2 / 0 Регистрация: 08.06.2010 Сообщений: 72
	21.07.2010, 11:45 [ТС]
	frZajvka.ADOCommand1.CommandText := 'INSERT INTO ArhivZajvka SELECT * From Zajvka Where код like''%'+ Label34.Caption +'%'''; ADOCommand1.Execute; frArhivZajvok.ADODataset1.Close; frArhivZajvok.ADODataset1.Open; Выбор идет по коду Например Код = 190 или подобное , а если код = 1 , то появляется сообщение. Интересно если код =102 опять сообщение, а при код= 101 то все проходит. Прошу прощение за корявое изложение 0

@SAMZ 1263 / 706 / 62 Регистрация: 21.12.2009 Сообщений: 2,256
	21.07.2010, 12:51
	Вам надо убедиться в том, что типы и длины полей в Zajvka совпадают с типом и длиной полей в ArhivZajvka. Если эти атрибуты в таблицах разнятся, то это может быть источником проблем 0

@viktooor 2 / 2 / 0 Регистрация: 08.06.2010 Сообщений: 72
	21.07.2010, 13:48 [ТС]
	Код -целое в дух таблицах Сейчас попробовал с кодом= 35 все прошло, а с кодом=1 опять сообщение 0

@viktooor 2 / 2 / 0 Регистрация: 08.06.2010 Сообщений: 72
	21.07.2010, 14:02 [ТС]
	Да все поля, но выбор идет по коду 0

@SAMZ 1263 / 706 / 62 Регистрация: 21.12.2009 Сообщений: 2,256
	21.07.2010, 14:14
	viktooor, выбор по коду, это разговор ни о чем. Я спрашиваю о структуре данных. Ну, пусть в одной таблице поле описано как varchar(10), а во второй как varchar(20). Вы переносите данные из varchar(20) в varchar(10). Если при этом в varchar(20) реально строка не более 10 символов, то при переносе все будет Ok. Если нет, то получите иключение. Я Вам про структуры данных в таблицах "источник" - "приемник", а Вы про одинаковость кодов. 0

@viktooor 2 / 2 / 0 Регистрация: 08.06.2010 Сообщений: 72
	21.07.2010, 14:36 [ТС]
	А как это проверить Таблицу соpдавал в Accese 2007 0

@viktooor 2 / 2 / 0 Регистрация: 08.06.2010 Сообщений: 72
	21.07.2010, 15:34 [ТС]
	А какая база лучше Была статья о Access там было написано об этом случае( ошибка довольно частая-проделки Макрософта, чтобы покупали новые версии) - что видел то и говорю. Может мне перейти на другую базу , если да , то с чем я столкнусь ,посоветуйте 0

@viktooor 2 / 2 / 0 Регистрация: 08.06.2010 Сообщений: 72
	21.07.2010, 18:18 [ТС]
	Спасибо за помощь 0