65 / 56 / 14
Регистрация: 22.10.2012
Сообщений: 284
1

Работа с БД MS Access и ошибка "object variable or with block variable not set"

22.10.2012, 15:20. Показов 3273. Ответов 4
Метки нет (Все метки)

В источниках данных ODBC есть такая штука "База данных MS Access", и назначена ей база "D:\БД СПМК-73.mdb"

если делать обычный запрос из excel то все работает, могу получить нужный запрос

Но мне необходимо обработать полученные данные.
Пишу следующее:

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
  Dim qSql As String
  Dim cn As New ADODB.Connection 
  Dim rs As ADODB.Recordset
 
cn.ConnectionString = "Provider=MSDASQL.1;Persist Security Info=False;Data Source=База данных MS Access"
  
cn.Open
rs.Open "SELECT * FROM Spisok", cn
 
rs.Close
cn.Close
на строке 9 выдает ошибка "object variable or with block variable not set"

я начинающий, не могу понять что не так
__________________
Помощь в написании контрольных, курсовых и дипломных работ, диссертаций здесь
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
22.10.2012, 15:20
Ответы с готовыми решениями:

Ошибка "object variable or With block variable not set" при попытке обращения к форме. VBA Access 7.0.
Добрый день. Данный код Dim frm As Form Set frm = Form_frmAdd_EditWareList ...

Ошибка при закрытии макроса с диаграммой "Object variable or With block variable not set"
Здравствуйте. Я только начал изучать VBA поэтому не закидывайте помидорами :black_eye.: В общем,...

ошибка "Run-time error '91': Object variable or With block variable not set"
приветствую! имеется документ на нескольких листах, заполняется по дням соответственно на многих...

Вылетает ошибка "Object variable or With block variable not set"
Всем привет! Вот такой код. Вылетает ошибка "Object variable or With block variable not set" -...

4
Модератор
Эксперт функциональных языков программированияЭксперт Python
31544 / 17463 / 3663
Регистрация: 12.02.2012
Сообщений: 29,406
Записей в блоге: 5
22.10.2012, 18:34 2
4-ю строку запиши так:

Visual Basic
1
Dim rs As New ADODB.Recordset
1
65 / 56 / 14
Регистрация: 22.10.2012
Сообщений: 284
23.10.2012, 09:20  [ТС] 3
спс ошибки больше нет, вот только recordset пустой оказывается
0
Модератор
Эксперт функциональных языков программированияЭксперт Python
31544 / 17463 / 3663
Регистрация: 12.02.2012
Сообщений: 29,406
Записей в блоге: 5
23.10.2012, 12:17 4
1) у Open есть два доп. параметра. Попробуй так:

Visual Basic
1
rs.Open "SELECT * FROM Spisok", cn,3,3
2) а может, таблица пуста?
3) ты часом обрабатываешь rs не после close?
0
65 / 56 / 14
Регистрация: 22.10.2012
Сообщений: 284
24.10.2012, 14:51  [ТС] 5
я разобрался и научился извлекать данные, пока что вопросов нет, изучаю "матчасть"
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
24.10.2012, 14:51
Помогаю со студенческими работами здесь

"Object variable or With block variable not set "
Всем доброго дня !! Sub oop() Dim ra As Range ra = Range("A239:A255") For Each Cell In ra...

Ошибка Run Time Error 91 (Object variable or block variable not set)
Добрый день! Есть код для VBA Outlook для открытия файла Excel, копирования из него диапазона, и...

Создание класса и ошибка 'object variable or with block variable not set'
Всем привет! Почему когда описываешь класс вот так: Dim a, b, c As Integer Private Sub...

Ошибка object variable or with block variable not set по непонятной причине
По непонятной причине вылетает object variable or with block variable not set при попытке архивации...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
5
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2022, CyberForum.ru