• Oleg
  • Восстановленный участник
  • На форуме с 29 апреля 2003г.
  • Сообщений: 19
  • Спасибо: 0

Тема: Программа из ACAD2002 не работает в ACAD2000

Прога отлаживалась в ACAD2002. Работает как часы.
Вчера установил ее на другой комп, где ACAD2000 и сразу же вывалилась на строке
rst.find stroka
где
Public cnn As New ADODB.Connection
Public rst As New ADODB.Recordset
........
nam = Trim(rst1.Fields("SHIFR"))
stroka = "SHIFR_OP=" & "'" & nam & "'"
при этом все остальные методы ADO (rst.Filter, rst.MoveFirst ..) работают нормально!
Сообщение выдает следующее:
"Недопустимое использование объекта"
По описанию этой ошибки подогнал к такому виду:
dim qq as Variant
Set qq = rst
qq.find stroka
И заработало!  Подскажите пожалуйста, в чем может быть дело. Это глюк какой-то или нужно все фрагменты для метода find прописывать в зависимости от версии акада?

  • bender
  • Восстановленный участник
  • На форуме с 5 мая 2003г.
  • Сообщений: 345
  • Спасибо: 0

Re: Программа из ACAD2002 не работает в ACAD2000

> Oleg

Dim qq as Object

https://www.caduser.ru/forum/topic7690.html
https://www.caduser.ru/forum/topic6703.html

  • Oleg
  • Восстановленный участник
  • На форуме с 29 апреля 2003г.
  • Сообщений: 19
  • Спасибо: 0

Re: Программа из ACAD2002 не работает в ACAD2000

Я читал эти ссылки и полностью согласен с Вами. Но в моем случае имеет место быть нечто иное, т.к.:
1. на обоих компах я сам устанавливал один и тотже дистрибутив Mdac_typ
2. на обоих компах в проекте  все ссылки соответствуют
Я думаю, если бы дело было в библиотеке, то не работал бы не только метод find...

  • Alexy
  • Восстановленный участник
  • На форуме с 31 марта 2003г.
  • Сообщений: 31
  • Спасибо: 0

Re: Программа из ACAD2002 не работает в ACAD2000

Дело в том, что в 2002 и 2000  AutoCAD используются разные версии VBA.