Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > БД в Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 27.10.2009, 09:46   #1
Antoha_Gad
Пользователь
 
Регистрация: 05.04.2008
Сообщений: 11
По умолчанию ADO DataSet в Access

Помогите новичку!
Как мне с датасет вывести все в access?
Antoha_Gad вне форума Ответить с цитированием
Старый 27.10.2009, 09:58   #2
Stilet
Белик Виталий :)
Старожил
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Сообщений: 57,097
По умолчанию

Подключи ADO к базе MDB выбрав провайдер JET OLE DB и выводи запросами что нужно.
I'm learning to live...
Stilet вне форума Ответить с цитированием
Старый 27.10.2009, 10:29   #3
Antoha_Gad
Пользователь
 
Регистрация: 05.04.2008
Сообщений: 11
По умолчанию

Всё подключено, и работает, мне нужно все что в датасете выгрузить в аксесс. какнибудь пробежать по всем строкам...
Antoha_Gad вне форума Ответить с цитированием
Старый 27.10.2009, 10:37   #4
BARNEY
Участник клуба
 
Регистрация: 23.04.2009
Сообщений: 1,058
По умолчанию

через цикл бежишь и выгружаешь...если надо быстро и часто ещё и параметризуешь вставку
Если вам человек помог, не стесняйтесь говорить спасибо (весы под аватаром)
BARNEY вне форума Ответить с цитированием
Старый 27.10.2009, 11:09   #5
Antoha_Gad
Пользователь
 
Регистрация: 05.04.2008
Сообщений: 11
По умолчанию

Цитата:
Сообщение от BARNEY Посмотреть сообщение
через цикл бежишь и выгружаешь...если надо быстро и часто ещё и параметризуешь вставку
как то так примерно?

var i,j:integer;
begin
DBGrid1.DataSource.DataSet.First;
for i:=1 to DBGrid1.DataSource.DataSet.RecordCo unt do
begin
for j:=1 to DBGrid1.FieldCount do
begin
with Unit1.Form1.DBGrid1.DataSource.Data Set do
begin
insert;
edit;
что то тут........ :=DBGrid1.Fields[j].AsString;
Post;
DBGrid1.DataSource.DataSet.Next;
end;
end;
end;
end;

покажите как плиз.
Antoha_Gad вне форума Ответить с цитированием
Старый 27.10.2009, 11:34   #6
BARNEY
Участник клуба
 
Регистрация: 23.04.2009
Сообщений: 1,058
По умолчанию

обычно это делается 2 запросами

Код:
query1.sql.text:='select * from table';
while (not query1.eof) do
begin
query2.sql.text:='insert into table2 values ('''+query1..Fields[0].AsString+''',
'''+query1..Fields[1].AsString+'''....'''+query1..Fields[N].AsString+''')';
query2.execSQl;
query1.next;
end;
Если вам человек помог, не стесняйтесь говорить спасибо (весы под аватаром)
BARNEY вне форума Ответить с цитированием
Старый 27.10.2009, 12:23   #7
Antoha_Gad
Пользователь
 
Регистрация: 05.04.2008
Сообщений: 11
По умолчанию

у меня есть дата соурсу1 в нём уже есть данные.
мне нужно с него залить всё в форм1.датасоурс1
Antoha_Gad вне форума Ответить с цитированием
Старый 28.10.2009, 09:45   #8
Antoha_Gad
Пользователь
 
Регистрация: 05.04.2008
Сообщений: 11
По умолчанию

Запросом не получится из за того что кол.столбцов очень огромное...
а как построчно выводить?
Antoha_Gad вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
ADO --->Access Ekzot1k БД в Delphi 12 06.10.2009 09:09
сортировка в ADO Access eisenheim БД в Delphi 2 26.09.2009 12:06
Access и ADO stel2 БД в Delphi 3 05.06.2009 08:11
Delphi <--> ADO <--> Access acid02 БД в Delphi 4 09.04.2009 16:29
Access/ADO Anton_S БД в Delphi 2 26.05.2008 08:24