Сложение 2-х таблиц из БД - Microsoft Office Excel - Страница 3

Dimarik163 · 02.06.2011, 18:04

Ругается на rs1.MoveLast - набор строк не поддерживает обратную передачу.
Можно это в ListObjects выгрузить, но опять же я не знаю как к нему прибавить вторую базу.

R Dmitry · 02.06.2011, 18:17

Цитата:

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

Ругается на rs1.MoveLast - набор строк не поддерживает обратную передачу.
Можно это в ListObjects выгрузить, но опять же я не знаю как к нему прибавить вторую базу.

CursorType надо бы поменять на статический

попробуйте заменить
Set rs1 = cn1.Execute(CommandText)
на
rs1.Open CommandText, cn1, adOpenStatic, adLockReadOnly

R Dmitry · 02.06.2011, 18:20

и в догонку тут почитайте
ПОЧИТАТЬ!

R Dmitry · 02.06.2011, 18:47

и еще Вам один вариант

Код:

Cells(1, 1).CopyFromRecordset rs1
R_Count = Cells(Rows.Count, 1).End(xlUp).Row
Cells(1 + R_Count, 1).CopyFromRecordset rs2

rs1.Close
cn1.Close

rs2.Close
cn2.Close

Dimarik163 · 02.06.2011, 18:56

Вот последний вариант заработал! Большое спасибо!!! А с предыдущим я чета не разобрался.

02.06.2011, 18:04	#21
Dimarik163 Пользователь Регистрация: 01.06.2011 Сообщений: 13	Ругается на rs1.MoveLast - набор строк не поддерживает обратную передачу. Можно это в ListObjects выгрузить, но опять же я не знаю как к нему прибавить вторую базу. Последний раз редактировалось Dimarik163; 02.06.2011 в 18:07.

02.06.2011, 18:20	#23
R Dmitry Форумчанин Регистрация: 07.03.2010 Сообщений: 796	и в догонку тут почитайте ПОЧИТАТЬ! Логика?!.... она где то рядом... E_mail: dg_rusak@mail.ru Если спасибо мало: Яндекс . Деньги - 41001731366021 WM R269866874234

02.06.2011, 18:47	#24
R Dmitry Форумчанин Регистрация: 07.03.2010 Сообщений: 796	и еще Вам один вариант Код: `Cells(1, 1).CopyFromRecordset rs1 R_Count = Cells(Rows.Count, 1).End(xlUp).Row Cells(1 + R_Count, 1).CopyFromRecordset rs2 rs1.Close cn1.Close rs2.Close cn2.Close` Логика?!.... она где то рядом... E_mail: dg_rusak@mail.ru Если спасибо мало: Яндекс . Деньги - 41001731366021 WM R269866874234

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Cформировать из 30 таблиц 1 500 000 000 таблиц, за 2 часа.	kola672	Фриланс	12	02.11.2010 20:43
Сформировать из 30 таблиц 15 000 таблиц, за 15 минут.	kola672	Фриланс	31	19.10.2010 01:22
Сложение операнд.	rosemary	Помощь студентам	7	23.06.2010 17:06
Сложение в БД	Oleg Romanchuk	Помощь студентам	5	24.11.2009 09:30
Сложение	Droid	Общие вопросы Delphi	14	07.05.2008 13:23

02.06.2011, 18:56	#25
Dimarik163 Пользователь Регистрация: 01.06.2011 Сообщений: 13	Вот последний вариант заработал! Большое спасибо!!! А с предыдущим я чета не разобрался.