• Romik
  • Восстановленный участник
  • На форуме с 15 октября 2001г.
  • Сообщений: 142
  • Спасибо: 0

Тема: Как связаться с базой Access средствами VBA?

Не мог бы кто-нибудь прислать код, который позволил бы создавать и редактировать базы Acces в среде VBA AUTOCAD?

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

Re: Как связаться с базой Access средствами VBA?

http://am.rusimport.ru/MsAccess/default.aspx

  • pavel
  • Восстановленный участник
  • На форуме с 12 апреля 2005г.
  • Сообщений: 35
  • Спасибо: 0

Re: Как связаться с базой Access средствами VBA?

Связь с БД через ODBC(Предварительно создай источник данных , связь с твоей БД)

 Public query As String
 Public wrkspace As Workspace
 Public db As Database
 Public rs As Recordset
' связь с БД
Set wrkspace = CreateWorkspace(Name:="", UserName:="", Password:="", usetype:=dbUseODBC)
 Set db = wrkspace.OpenDatabase("Название источника данных в ODBC", dbDriverNoPrompt)
'Запросы
 query = "Здесь пиши запрос на SQL"
 Set rs = db.OpenRecordset(query, dbOpenDynamic)
'Закрытие БД
db.close