Docmd.RunSQL

[Slav]

Делаю SELECT из таблицы базы Access, но при запуске DoCmd.RunSQL и далее сама строка запроса получаю Run-time error 2342 "Для макрокоманды ЗапускЗапроса SQL требуется аргумент состоящий из инструкции SQL".
Инструкция совсем простая "SELECT * FROM MP". MP-табличка в Access.
Что не так?

[Rainbow]

Так эта штука предназначена для запуска запросов типа UPDATE, DELETE, CREATE TABLE и тд - то есть запросов, выполняющих какое-то действие в базе, а не получающих выборку...

Тебе, наверное, нужен объект Recordset и его метод Open или еще что-нибудь такое.

[Slav]

Может тогда подскажете, как в Access сделать выборку средствами VB без дополнительных объектов (если это возможно)?

[Rainbow]

Хм... А что вообще требуется-то? Что с выборкой делать надо? Задача какая?

Я не специалист в Access. Я знаю, что там есть формы, которым можно указать в качестве источника данных запрос готовый или SQL. Контролы на форме можно связывать с определенными полями запроса.

Как использовать Access из VB - это пожалуйста, отвечу. А про сам Access - сорри, только общие слова...

[Tatyanka]

Да в общем-то, надо просто этот запрос сохранить под каким-нибудь именем (что уже наверняка сделано). А запуск сделать
DoCmd.OpenQuery stDocName, acNormal, acEdit (или как тебе там надо)
А можно запрос на выборку сделать и без VBA. В окне базы делаешь "Создание запроса с помощью мастера". Он тебе поможет. Дерзай!

[Slav]

Да в общем-то, надо просто этот запрос сохранить под каким-нибудь именем (что уже наверняка сделано). А запуск сделать
DoCmd.OpenQuery stDocName, acNormal, acEdit (или как тебе там надо)
А можно запрос на выборку сделать и без VBA. В окне базы делаешь "Создание запроса с помощью мастера". Он тебе поможет. Дерзай!

Да. Все это хорошо. Но запрос должен формироваться динамически(т.е. готового и сохраненного нет) и задача стоит сделать это средствами VBA. OpenQuery здесь не подойдет. Идеально было бы запустить Select, а результат увидеть на экране или сохранить в вьюшку. Но вот чем запустить SELECT (именно его, а не SELECT...INTO), или такая возможность при работе с Access таблицами вообще не предусмотрена? В общем вопрос в следующем. Как выполнить запрос типа "SELECT" из програмного кода в VBA?

[Konst_One]

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

Dim rs as ADODB.Recordset
Dim CN as ADODB.Connection

...
rs.Open "SELECT * FROM Table1",CN
....



[snov]

Да. Все это хорошо. Но запрос должен формироваться динамически(т.е. готового и сохраненного нет) и задача стоит сделать это средствами VBA. OpenQuery здесь не подойдет. Идеально было бы запустить Select, а результат увидеть на экране или сохранить в вьюшку. Но вот чем запустить SELECT (именно его, а не SELECT...INTO), или такая возможность при работе с Access таблицами вообще не предусмотрена? В общем вопрос в следующем. Как выполнить запрос типа "SELECT" из програмного кода в VBA?

Динамическое формирование запроса делается так:

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

CurrentDb.QueryDefs("Имя запроса").SQL="собсно запрос"

Ну а дальше как и было сказано

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

DoCmd.OpenQuery stDocName, acNormal, acEdit (или как тебе там надо)

Кстати в Access'e нет как такового понятия вьюхи. там только запросы, хранимые в базе