Рекордсет. Статьи

[LexRema]

Здраствуйтие. Нужно поизвращаться над рекордсетом (очень сложный запрос, который формируется онлайн). В подробности пока влазить не буду. Дайте ссылки на статьи по данной теме, пожалуйста. А дальше видно будет .
Language:
VBA Access

[alibek]

В чем будут заключаться извращения?

[Ramzes]

подозоеваю, что в изобритении нового вида транспорта под название велосибед

[alibek]

Ramzes, ты про пункт правил 5.6 не забыл?

[LexRema]

2 таблицы: т1,т2. В одной поля а,б,с, в другой - с,д,е. Как посредством подзапроса выбрать т1.а и соответствующие ему поля т2.е через промежуточное поле "с" ?



Это надо обязательно выбирать отдельно. ТОЕСТЬ ПОДЗАПРОС!
Но подзапрос такой осуществить невозможно. Поэтому нужно выбирать все, а далее работать с рекордсетом.

Выбирать отдельно каждое поле - для того , чтобы можна было установить или НЕ установить дистинкт для каждого поля в отдельности.

Также поля в конечной избранной таблице могут быть не все. (задаеться еще параметр визибилити)
...

Но все это в общем как -то сложно и грузно... пока надо разобрать рекордсет... А далее видно будет. Может, не так страшен черт.

[LexRema]

У меня даже не очень получаеться описать, что нужно
А вопросы просто от фонаря задавать не люблю. Поэтому хотел ознакомииться сначала с лит-рой.

[alibek]

Клиентский рекордсет и Filter тебе помогут.

[LexRema]

о чем бы я и хотел почитать

[LexRema]

Ладно. Пока посмотрю хелп. И на том спасибо.
Вроде велосипед уже изобрели?

[LexRema]

А что такое "Клиентский рекордсет"?

[GSerg]

LexRema
http://bbs.vbstreets.ru/viewtopic.php?p=6599824#6599824...

[LexRema]

Ок. Намек понял.

Вопрос.
есть рекордсет. В нем записи. В столбцах. как задать параметр фильтру, чтобы после отсеивания остались только те записи, которые соответствуют НЕПОВТОРЯЕМЫМ значениям в ЗАДАВАЕМОМ столбце?
Тоесть нужен сам параметр.
И, если можна, пример записи.

[GSerg]

Нет такого фильтра.
Подобный функционал обеспечивается на SQL.
Если SQL недоступен и есть только готовый рекордсет, то .Sort = "Column1", после чего ручной поиск дубликатов в Column1 становится тривиальным.

[LexRema]

Да, в принципе, вариант с поиском осуществим. И наверное Придеться осуществлять.
SQL доступен, но вот результат данной задачи не совсем тривиален. Дистинкт можна задать для всех записей, но как решить задачу, когда нужно одним столбцам (значениям в этих столбцах) приказать не повторяться, а другим - разрешить повторение?

[alibek]

Соединить два запроса через UNION (ALL)?

[GSerg]

Код: Выделить всё

SELECT *
FROM Table1
WHERE id IN (SELECT Column1 FROM Table1 GROUP BY Column1 HAVING COUNT(*) = 1)

Коряво, но работает.
Можно разбить на два запроса - тогда и INNER JOIN прокатит.

[LexRema]

Реализовываться все должно онлайн. Тоесть возможно проще будет работать с глобальной выборкой потом в рекордсете. Заглядывая за край, уточню, что выборка идет из всей базы. связи в таблицах древовидные, только по названиям полей. Тоесть выбирая из всех таблиц нужно указать where (таблица1.поле=таблица2.поле). При чем таких указываний немало - таблиц неограниченое количество.

[GSerg]

Да на здоровье, принцип от этого не меняется...

[LexRema]

Ребята, а как насчет GROUP BY. Ведь при задании этого параметра для полей, которым нельзя повторяться.... Некоторые будут повторяться, но не будет утраты данных.

[GSerg]

Мысль не ясна.

[Add]
А, нет, мысль почти ясна...
А как опредлить, что из двух повторяющихся по одному полю записей эту оставить, а эту нет?

[LexRema]

Пока и я не могу определить, какая задача поставлена. Но и этот вариант задано проработать.

Возник промежуточный вопрос... О запросе с тем же груп бай.

SELECT Заказано.КодЗаказа, Заказано.Скидка FROM Заказано GROUP BY Заказано.КодЗаказа

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

У меня же недоумение вызывает то, что синтаксические конструкции :

SELECT Заказано.Скидка FROM Заказано GROUP BY Заказано.Скидка;

SELECT Заказано.КодЗаказа, Заказано.Скидка FROM Заказано GROUP BY Заказано.КодЗаказа, Заказано.Скидка;

SELECT Заказано.Скидка FROM Заказано

работают нормально... Как это обьяснить?

[VVitafresh]

Все правильно, так и задумано.
В GROUP BY должны перечисляться все поля, которые присутствуют в SELECT (кроме тех, которые являются аргументами агрегатных функций).

[LexRema]

М-да... Удар ниже пояса...
но найден интересный вариант.
Выбирать каждое поле в отдельную темп. таблицу (задавая дистинкт или не дистинкт), а потом, привязываясь к данным в энтой табличке делать выборку следующего поля.

А, нет, мысль почти ясна...
А как опредлить, что из двух повторяющихся по одному полю записей эту оставить, а эту нет?

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

[LexRema]

Новый вопрос

ребят, очень срочно...

1.Есть две таблицы с одинаковыми полями. Как в конец одной добавить другую (програмно).

2. Есть таблица. В цыкле пройтись по всех ее записях и для каждой записи создать отдельную темп_таблицу- в которой будет только одна запись.

результатом и 1), и 2) будет таблица

Прошу, приведите примеры. Походу оно должно просто реализовываться, только если знать, как это сделать. Если не ответите, придеться открывать новую тему.

[GSerg]

1. INSERT INTO table1(f1,f2,f3) SELECT f1,f2,f3 FROM table2
2. Нафига?

[LexRema]

Извини, но с чуством юмора за день до сдачи задания у меня проблемы.

1. А это подойдет, если я буду указывать
INSERT INTO table1 SELECT table2.* FROM table2
У меня на этом шаге нет названия полей

2.Это просто нужно. Это возможно? Плиз!
Можна предыдущую таблицу грохать, тоесть создал таблицу - сделал с ней, что захотел... - грохнул, или под ее же именем создал таблицу со следующей строкой.

Это нужно, чтобы сделать очень крутую выборку. Имея такую темптаблицу, я могу через INNER JOIN выбрать соответствующее моей таблице ТОР Х елементов из другой таблицы. А потом эту выборку присоеденить к некоторой общей таблице. Общий замутизм алгоритма практически реализован. Осталось только это. Подскажите.
И пожалуйста, желательно именно это... а то переписывать и придумывать что-то новое уже некогда.

[LexRema]

такое чувство, что я покинут ... и одинок... я попробовал реализовать данную затею через рекордсет... У меня почти получилось... но пришлос ь отказаться от много чего... Поэтому идея отброшена в сторону.

Если SQL недоступен и есть только готовый рекордсет, то .Sort = "Column1", после чего ручной поиск дубликатов в Column1 становится тривиальным.

Вот так я попробовал реализовать это. Но при огромном количестве удалений появляеться ошибка.
File sharing lock count exceeded. Increase MaxLocksPerFile registry entry.
В мсдн я вычитал о подобном реестре майкрософт Джет 4.0 . Но как это обойти? А надо...

[LexRema]

НУ! КАК ЭТО ОБОЙТИ? ПОДСКАЖИТЕ,ПОЖАЛУЙСТА!!!

[VVitafresh]

:) Извини, но с чуством юмора за день до сдачи задания у меня проблемы.

Судя по дате постинга, экзамен ты уже провалил...

File sharing lock count exceeded. Increase MaxLocksPerFile registry entry.
В мсдн я вычитал о подобном реестре майкрософт Джет 4.0 . Но как это обойти? А надо...

Создай *.reg файл и примени (можешь оставить только параметр MaxLocksPerFile):

Код: Выделить всё

Windows Registry Editor Version 5.00

[HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Jet\4.0\Engines\Jet 4.0]
"PageTimeout"=dword:00001388
"LockRetry"=dword:00000014
"MaxBufferSize"=dword:00000000
"Threads"=dword:00000003
"ExclusiveAsyncDelay"=dword:000007d0
"SharedAsyncDelay"=dword:00000032
"FlushTransactionTimeout"=dword:000001f4
"MaxLocksPerFile"=dword:0007a120
"LockDelay"=dword:00000064
"RecycleLVs"=dword:00000000
"PagesLockedToTableLock"=dword:00000000
"UserCommitSync"="yes"
"ImplicitCommitSync"="no"


Если JET не 4.0 может понадобиться подправить в ветках:
[HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Jet\3.5\Engines\Jet 3.5] и [HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Jet\4.0\Engines\Jet 3.x].

[LexRema]

Спасибо! Рег Рулит!