Скажите, пожалуйста, почему те работает следуюсчий пример. Ошибка: невозможно преобразование типов. Почему-то тип recordsetS для rst в данном случае срабатывает, но ето совсем не радует: дальше-то надо с recordset работать.

Dim db As Database
Dim rst As Recordset

Set db = CurrentDb()
Set rst = db.OpenRecordset("SELECT * FROM SiemensCWs")

Спасибо

В какой строке ошибка-то? какие компоненты и референсы подключены? И вообще - какая версия ОС и Офиса?

Ошибка - в последней строке. Подключено VBA, Microsoft Access 10.0 Object library, OLE Automation, Microsoft ActiveX Data Objects 2.1 library, Microsoft DAO 3.6 Object Library. Office XP & Windows XP 2002

Давай так - перечисли отдельно выдираемые поля, а не звезду... сдается мне что проблема в преобразовании типа поля, а не рекордсета...

Поля перечислять я пробовала - не помогает. Пробовала с одним полем - результат тот же. Разве есть разница; какие поля? рекордсет-то новый. другого кода у меня не написано, во всяком случае до того, что я написала.

Весьма странно - код-то ну просто нормальный... у меня в Офисе-2003 на ура...

Из дурацких советов: попробуй эту строку запроса загнать в SQL-редактор запросов и открыть его - матюгнется или нет? хоть понять, с объектом рекордсета проблемы или с запросом... кстати, а наличие ошибки связано с указанной таблицей или на любую таблицу так лается?

И еще - дай точную, до запятой, фразу ошибки. Или скриншот. Может тут что отыщется...

И последнее - на компе какие-нить среды прграммирования, нестандартные ODBC и аналогичное что-нить не проставлено?

В редакторе запрос выполняется, ни ошибок ни предупреждений не выдает. Попробовала с другой таблицей - результат тот же.
Не знаю, на сколько поможет фраза ошибки, но вот она

Laufzeit fehler '13': Typen unverträglich

Надеюсь, мой перевод был точным.
Я за етим компом всего неделю, насколько я могу судить, ничего екстраординарного тут не стоит. тут даже ни одной среды программирования не установлено, кроме VBA, да и то потому что он встроен в офис.
Странно всё ето...

давай бить запрос на части:

Код

strSQL="SELECT * FROM SiemensCWs" Set rst = db.OpenRecordset(strSQL)

тоже облается?
А если попробовать заменить Database и Recordset на ADODB.Database и ADODB.Recordset - тоже лается?

Со строкой пробовала - не помогает. На ADODB.Database регается как на пользовательский тип. Не знаю, какую есчо библиотеку надо подключить

MS ActiveX Data Object Library

Подключена Microsoft ActiveX Data Objects 2.7 Library. Но тип database всё равно не известен

Всё настолько безнадёжно?!

П.С. Скоро в совершенстве овладею транслитом: научилась писать буквы "щ" и "э". Хоть одна хорошая новость.

Цитата(Zahny @ 11.4.2005, 12:42)

Подключена Microsoft ActiveX Data Objects 2.7 Library. Но тип database всё равно не известен

A ADODB и OLEDB-кусты появились? А DAO-тип?

ADODB (но без Database, хоть с Recordset) и DAO есть, а вот OLEDB - нет.
Добавлено @ 15:03
Написала DAO. перед recordset, database и оно заработало!!! Спасибо!!!

Ну дык!

Пишешь Dim xxx As - у тебя выворачивается список... набираешь ADODB (ну пока на него не перепрыгнет), дальше нажимаешь точку - и вот она, твоя Database...

ADO лучше чем DAO - во всяком случае переносимее...