Автоматизация (VB) экспорта данных из Access 2007
Добрый день!
В Access 2007 на вкладке "Внешние данные" есть раздел "Экспорт". В этом разделе есть мастера с помощью которых можно экспортировать данные с Access в RTF, XML, Excel, PDF, CSV.
Кто-то знает как работать с этим мастером через VBA или VB (Visual Strudio 2008)?
Напишите пожалуйста маленький кусочек кода который иллюстрирует работу с этим мастером.
Заранее всем спасибо!
В Access 2007 на вкладке "Внешние данные" есть раздел "Экспорт". В этом разделе есть мастера с помощью которых можно экспортировать данные с Access в RTF, XML, Excel, PDF, CSV.
Кто-то знает как работать с этим мастером через VBA или VB (Visual Strudio 2008)?
Напишите пожалуйста маленький кусочек кода который иллюстрирует работу с этим мастером.
Заранее всем спасибо!
Написал код:
Dim oAccess As Access.Application
oAccess = New Access.Application
oAccess.OpenCurrentDatabase("D:\База.accdb", False)
oAccess.DoCmd.OutputTo(Microsoft.Office.Interop.Access.AcOutputObjectType.acOutputTable, _
"Таблица результаты торгов", _
"XML", _
"D:\auto.xml", _
True)
oAccess.Quit()
oAccess = Nothing
Но выпадает ошибка:
Error 1 'OutputTo' is ambiguous because multiple kinds of members with this name exist in interface 'Microsoft.Office.Interop.Access.DoCmd'. C:\WindowsApplication1\Form1.vb 34 9 WindowsApplication1
КТО НИБУДЬ МОЖЕТ ПОМОЧЬ???
Dim oAccess As Access.Application
oAccess = New Access.Application
oAccess.OpenCurrentDatabase("D:\База.accdb", False)
oAccess.DoCmd.OutputTo(Microsoft.Office.Interop.Access.AcOutputObjectType.acOutputTable, _
"Таблица результаты торгов", _
"XML", _
"D:\auto.xml", _
True)
oAccess.Quit()
oAccess = Nothing
Но выпадает ошибка:
Error 1 'OutputTo' is ambiguous because multiple kinds of members with this name exist in interface 'Microsoft.Office.Interop.Access.DoCmd'. C:\WindowsApplication1\Form1.vb 34 9 WindowsApplication1
КТО НИБУДЬ МОЖЕТ ПОМОЧЬ???